Fix utils/perldoc.PL for dos-djgpp:

[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 2e49ae6..f668666
--- a/vms/fndvers.com
+++ b/vms/fndvers.com
@@ -58,7 +58,7 @@ $ If .not.teststs Then Exit teststs
 $!
 $ If teststs.ne.1 ! current values in config.vms are appropriate
 $ Then
-$   token = """""""""VMS_''arch'  /**/"""""""""
+$   token = """""""""VMS_''arch'""""""""  /**/"
 $   Call update_file "''p2'" "#define ARCHNAME" "''token'"
 $   teststs = $Status
 $   If .not.teststs Then Exit teststs