Update GlobalClass.vb

Revan654 · Feb 18, 2019 · 5c72a61 · 5c72a61
1 parent 726403a
commit 5c72a61
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/General/GlobalClass.vb b/General/GlobalClass.vb
@@ -582,7 +582,7 @@ Public Class GlobalClass
         Dim OSName = Registry.LocalMachine.GetString("SOFTWARE\Microsoft\Windows NT\CurrentVersion", "ProductName")
         If p.SourceFile <> "" Then
             p.TempDir = Macro.Expand(p.TempDir)
-            If OSName.Contains("Windows 10") Then
+            If p.TempDir = "" and OSName.Contains("Windows 10") Then          
                 Try
                     If p.SourceFile.Dir.EndsWith("_temp\") Then
                         p.TempDir = p.SourceFile.Dir
@@ -1160,4 +1160,4 @@ Public Class GlobalClass
         Dim ts = TimeSpan.FromSeconds(sec)
         Return CInt(Math.Floor(ts.TotalMinutes)).ToString("00") + ":" + CInt(Math.Floor(ts.Seconds)).ToString("00")
     End Function
-End Class
+End Class