fix build error on windows on multiproc boxes.

git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@2857 d0543943-73ff-0310-b7d9-9358b9ac24b2

diff --git a/libs/win32/util.vbs b/libs/win32/util.vbs
index 2c894bbc8414d7ca89c990e3c4ab33a480c20eaa..24b31cd7e0144b3b670a5cd54e454f96dc0feb0c 100644 (file)
--- a/libs/win32/util.vbs
+++ b/libs/win32/util.vbs
@@ -78,7 +78,17 @@ Sub GetCompressionTools(DestFolder)
        Dim oExec\r
        If Right(DestFolder, 1) <> "\" Then DestFolder = DestFolder & "\" End If\r
        If Not FSO.FileExists(DestFolder & "7za.exe") Then \r
-               Wget ToolsBase & "7za.exe", DestFolder\r
+               If Not FSO.FileExists(DestFolder & "7za.tag") Then \r
+                       Set MyFile = fso.CreateTextFile(DestFolder & "7za.tag", True)\r
+                       MyFile.WriteLine("This file marks a pending download for 7za.exe so we don't download it twice at the same time")\r
+                       MyFile.Close\r
+                               \r
+                               Wget ToolsBase & "7za.exe", DestFolder\r
+                       \r
+                       FSO.DeleteFile DestFolder & "7za.tag" ,true \r
+               Else\r
+                       WScript.Sleep(5000)\r
+               End If  \r
        End If  \r
 End Sub\r
 \r