[differences between cumulative patch application and perl5.004_01]

[p5sagit/p5-mst-13.2.git] / vms / fndvers.com

diff --git a/vms/fndvers.com b/vms/fndvers.com
old mode 100644 (file)
new mode 100755 (executable)
index f1ddc03..2e49ae6
--- a/vms/fndvers.com
+++ b/vms/fndvers.com
@@ -58,6 +58,11 @@ $ If .not.teststs Then Exit teststs
 $!
 $ If teststs.ne.1 ! current values in config.vms are appropriate
 $ Then
+$   token = """""""""VMS_''arch'  /**/"""""""""
+$   Call update_file "''p2'" "#define ARCHNAME" "''token'"
+$   teststs = $Status
+$   If .not.teststs Then Exit teststs
+$!
 $   token = """""""""/perl_root/lib/VMS_''arch'""""""""  /**/"
 $   Call update_file "''p2'" "#define OLDARCHLIB_EXP" "''token'"
 $   If .not.$Status Then Exit $Status