Change 34075 by [EMAIL PROTECTED] on 2008/06/20 15:55:48
Make the version string more consistent between Windows and other
platforms.
Noticed and reported by Dave Golden.
Affected files ...
... //depot/perl/win32/config_sh.PL#45 edit
Differences ...
==== //depot/perl/win32/config_sh.PL#45 (text) ====
Index: perl/win32/config_sh.PL
--- perl/win32/config_sh.PL#44~33347~ 2008-02-22 09:10:50.000000000 -0800
+++ perl/win32/config_sh.PL 2008-06-20 08:55:48.000000000 -0700
@@ -78,7 +78,7 @@
$opt{VERSION} = "$opt{PERL_REVISION}.$opt{PERL_VERSION}.$opt{PERL_SUBVERSION}";
$opt{INST_VER} =~ s|~VERSION~|$opt{VERSION}|g;
$opt{'version_patchlevel_string'} = "version $opt{PERL_VERSION} subversion
$opt{PERL_SUBVERSION}";
-$opt{'version_patchlevel_string'} .= " patchlevel $opt{PERL_PATCHLEVEL}" if
exists $opt{PERL_PATCHLEVEL};
+$opt{'version_patchlevel_string'} .= " patch $opt{PERL_PATCHLEVEL}" if exists
$opt{PERL_PATCHLEVEL};
my $ver = `ver 2>nul`;
if ($ver =~ /Version (\d+\.\d+)/) {
End of Patch.
