Fixed bug in OS version detection code.

This commit is contained in:
László Valkó 2018-10-14 23:49:10 +02:00
parent 1856924df3
commit 4545985868

View file

@ -227,10 +227,10 @@ sub get_default_vars (;$)
$$vars{arch} = $arch;
$$vars{xarch} = $xarch;
my ($osver, $osmajor, $osminor, $osbuild) = Win32::GetOSVersion();
if ($osmajor == 5 && $$osminor == 1) {
if ($osmajor == 5 && $osminor == 1) {
$$vars{os} = 'xp';
}
elsif ($osmajor == 6 && $$osminor == 1) {
elsif ($osmajor == 6 && $osminor == 1) {
$$vars{os} = '7';
}
elsif ($osmajor == 10) {