diff options
Diffstat (limited to 'win32')
| -rw-r--r-- | win32/config_sh.PL | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/win32/config_sh.PL b/win32/config_sh.PL index b4af906757..884db4a537 100644 --- a/win32/config_sh.PL +++ b/win32/config_sh.PL @@ -73,8 +73,13 @@ $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{'osvers'} = join '.', (Win32::GetOSVersion())[1,2]; -$opt{'osvers'} = "4.0"; +my $ver = `ver 2>nul`; +if ($ver =~ /Version (\d+\.\d+)/) { + $opt{'osvers'} = $1; +} +else { + $opt{'osvers'} = '4.0'; +} if (exists $opt{cc}) { # cl and bcc32 version detection borrowed from Test::Smoke's configsmoke.pl |