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
index 2e49ae6..f668666 100755 (executable)
--- 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