From 1856924df348272d2868a1f67edfd7eede9038fb Mon Sep 17 00:00:00 2001
From: Valko Laszlo <valko@linux.karinthy.hu>
Date: Sun, 14 Oct 2018 22:01:23 +0200
Subject: [PATCH] Implemented OS version name variable '%os%'.

---
 logging.pm | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/logging.pm b/logging.pm
index 66de890..3ae951c 100644
--- a/logging.pm
+++ b/logging.pm
@@ -227,6 +227,18 @@ sub get_default_vars (;$)
 	$$vars{arch} = $arch;
 	$$vars{xarch} = $xarch;
 	my ($osver, $osmajor, $osminor, $osbuild) = Win32::GetOSVersion();
+	if ($osmajor == 5 && $$osminor == 1) {
+		$$vars{os} = 'xp';
+	}
+	elsif ($osmajor == 6 && $$osminor == 1) {
+		$$vars{os} = '7';
+	}
+	elsif ($osmajor == 10) {
+		$$vars{os} = '10';
+	}
+	else {
+		$$vars{os} = 'unknown';
+	}
 	$$vars{osversion} = $osmajor.'.'.$osminor;
 	$$vars{osmajor} = $osmajor;
 	$$vars{osminor} = $osminor;