diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-16 04:09:47 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-16 04:09:47 +0000 |
| commit | cceca5ed003bac658cb0392a14bb2f26d434bd78 (patch) | |
| tree | 286c2340276a7cbefe1899f0f01767791bb31ea4 /vms/myconfig.com | |
| parent | a9fb271febef206f32659f8abc5f9029ae2f7a25 (diff) | |
| download | perl-cceca5ed003bac658cb0392a14bb2f26d434bd78.tar.gz | |
propagate PERL_VERSION everywhere, add to pod
p4raw-id: //depot/perl@2957
Diffstat (limited to 'vms/myconfig.com')
| -rw-r--r-- | vms/myconfig.com | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/vms/myconfig.com b/vms/myconfig.com index 6af094357c..1429f86de8 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,7 +297,7 @@ $ endif $spit_it_out: $! $spitshell = ECHO !<<!GROK!THIS! $ ECHO " " -$ ECHO "Summary of my ''$package' (patchlevel ''$PATCHLEVEL' subversion ''$SUBVERSION') configuration:" +$ ECHO "Summary of my ''$package' (version ''$PATCHLEVEL' subversion ''$SUBVERSION') configuration:" $ ECHO " Platform:" $ ECHO " osname=''$osname', osvers=''$osvers', archname=''$archname'" $ ECHO " uname=''$myuname'" !->d_has_uname? |