FS-4219 --resolve correct windows version

libs/win32/util.vbs

@@ -271,14 +271,15 @@ Sub CreateVersion(tmpFolder, VersionDir, includebase, includedest)
 	strVerRev   = FindVersionStringInConfigure(VersionDir & "configure.in", "SWITCH_VERSION_REVISION")
 	
 	'Set version to the one reported by configure.in
-	if strVerRev <> "" Then
+	If strVerRev <> "" Then
 	    VERSION = strVerRev
 	End If
 
 	Dim sLastFile
 	Const ForReading       =  1
 
-	'Try To read revision from git, if it's found, use this instead of strVerRev found above
+	'Try To read revision from git, if it was not found in "configure.in" already
+	If strVerRev = "" Then
 		If FSO.FolderExists(VersionDir & ".git") Then
 			VersionCmd="git log --format=" & quote & "%%h %%ci" & quote & " -1 HEAD"
 			Set MyFile = FSO.CreateTextFile(tmpFolder & "tmpVersion.Bat", True)
@@ -298,9 +299,10 @@ Sub CreateVersion(tmpFolder, VersionDir, includebase, includedest)
 			sLastFile.Close
 			VERSION = Replace(VERSION, ":", "-")
 		End If
+	End If
 	
 	If VERSION = "" Then
-		VERSION = "UNKNOWN"
+		VERSION = "-UNKNOWN"
 	End If
 
 	If VERSION <> sLastVersion Then