]> git.ipfire.org Git - thirdparty/freeswitch.git/commitdiff
windows fix for initial build. Not quite sure why this was never noticed before.
authorJeff Lenk <jeff@jefflenk.com>
Fri, 12 Oct 2012 04:00:04 +0000 (23:00 -0500)
committerJeff Lenk <jeff@jefflenk.com>
Fri, 12 Oct 2012 04:00:04 +0000 (23:00 -0500)
libs/win32/util.vbs

index 0ce107c4c4e724563929d8db5e06b2eb70a7f90d..d47ccbd1b14f18ac1b7a0b570429a84ed7c983b0 100644 (file)
@@ -131,7 +131,9 @@ Sub UnCompress(Archive, DestFolder)
        Do\r
                WScript.Echo OExec.StdOut.ReadLine()\r
        Loop While Not OExec.StdOut.atEndOfStream\r
-       If FSO.FileExists(Left(Archive, Len(Archive)-3))Then  \r
+       If FSO.FileExists(Left(Archive, Len(Archive)-3))Then\r
+               WScript.Sleep(100)\r
+               FSO.DeleteFile UtilsDir & batname, True  \r
                Set MyFile = fso.CreateTextFile(UtilsDir & batname, True)\r
                MyFile.WriteLine("@" & quote & UtilsDir & "7za.exe" & quote & " x " & quote & Left(Archive, Len(Archive)-3) & quote & " -y -o" & quote & DestFolder & quote )\r
                MyFile.Close\r
@@ -142,7 +144,9 @@ Sub UnCompress(Archive, DestFolder)
                WScript.Sleep(500)\r
                FSO.DeleteFile Left(Archive, Len(Archive)-3) ,true \r
        End If\r
-       If FSO.FileExists(Left(Archive, Len(Archive)-3) & "tar")Then  \r
+       If FSO.FileExists(Left(Archive, Len(Archive)-3) & "tar")Then \r
+               WScript.Sleep(100)\r
+               FSO.DeleteFile UtilsDir & batname, True \r
                Set MyFile = fso.CreateTextFile(UtilsDir & batname, True)\r
                MyFile.WriteLine("@" & quote & UtilsDir & "7za.exe" & quote & " x " & quote & Left(Archive, Len(Archive)-3) & "tar" & quote & " -y -o" & quote & DestFolder & quote )\r
                MyFile.Close\r