From 4545985868a32085ad6cec0b3934a3befae5762d Mon Sep 17 00:00:00 2001 From: Valko Laszlo Date: Sun, 14 Oct 2018 23:49:10 +0200 Subject: [PATCH] Fixed bug in OS version detection code. --- logging.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/logging.pm b/logging.pm index 3ae951c..1e4b751 100644 --- a/logging.pm +++ b/logging.pm @@ -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) {