From f567ba48b6b2979a3a5b8e757fa8299faf7d7830 Mon Sep 17 00:00:00 2001
From: Michael Jerris <mike@jerris.com>
Date: Thu, 28 Sep 2006 17:45:45 +0000
Subject: [PATCH] fix build error on windows on multiproc boxes.

git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@2857 d0543943-73ff-0310-b7d9-9358b9ac24b2
---
 libs/win32/util.vbs | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

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