X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=vms%2Fmyconfig.com;h=1429f86de825ad0da98cd494a63e8de1c1e7272a;hb=13e080377416312a935982b1a5c15673e6ce0d66;hp=7fb728eb62bd9cd89c81f671922dd0203903fb66;hpb=6a6d91dccb584bbee729c8e0a68697fa2c2007fe;p=p5sagit%2Fp5-mst-13.2.git diff --git a/vms/myconfig.com b/vms/myconfig.com index 7fb728e..1429f86 100644 --- a/vms/myconfig.com +++ b/vms/myconfig.com @@ -120,13 +120,13 @@ $ endif $ open/read RATHER_LONG_CONFIG_FILE_HANDLE 'RATHER_LONG_FILENAME_SEARCH' $read_patchlevel_h: $ read/end_of_file = patchlevel_h_Done RATHER_LONG_CONFIG_FILE_HANDLE line -$ if f$locate("PATCHLEVEL",line).ne.f$length(line) +$ if f$locate("PERL_VERSION",line).ne.f$length(line) $ then $ line = f$edit(line,"TRIM,COMPRESS") $ $PATCHLEVEL = f$element(2," ",line) $ if f$type($SUBVERSION).nes."" then goto patchlevel_h_Done $ endif -$ if f$locate("SUBVERSION",line).ne.f$length(line) +$ if f$locate("PERL_SUBVERSION",line).ne.f$length(line) $ then $ line = f$edit(line,"TRIM,COMPRESS") $ $SUBVERSION = f$element(2," ",line) @@ -138,7 +138,7 @@ $patchlevel_h_Done: $ close RATHER_LONG_CONFIG_FILE_HANDLE $ if $PATCHLEVEL.eqs."" $ then -$ echo "warning: PATCHLEVEL was not found in ''RATHER_LONG_FILENAME_TO_FIND':" +$ echo "warning: PERL_VERSION was not found in ''RATHER_LONG_FILENAME_TO_FIND':" $ endif $look_for_genconfig_pl: @@ -297,9 +297,9 @@ $ endif $spit_it_out: $! $spitshell = ECHO !<d_has_uname? $ ECHO " hint=''$hint' d_sigaction='undef'" !->hintfile? $ ECHO " static exts=''$staticexts'" ! added for VMS