fix line ending error
git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@15778 d0543943-73ff-0310-b7d9-9358b9ac24b2
This commit is contained in:
parent
05cc65b2e8
commit
b69c844817
|
@ -64,6 +64,7 @@ Sub WgetSounds(PrimaryName, Freq, DestFolder, VersionFile)
|
|||
Set objTextFile = objFSO.OpenTextFile(VersionFile,1)
|
||||
Do Until objTextFile.AtEndOfStream
|
||||
strLine = objTextFile.Readline
|
||||
if Len(strLine) > 2 then
|
||||
versionPos = InstrRev(strLine, " ", -1, 1)
|
||||
name = Left(strLine, versionPos-1)
|
||||
if name = PrimaryName Then
|
||||
|
@ -73,6 +74,7 @@ Sub WgetSounds(PrimaryName, Freq, DestFolder, VersionFile)
|
|||
Wscript.Echo "URL: " & URL
|
||||
WgetUnCompress URL, Showpath(DestFolder)
|
||||
End If
|
||||
End if
|
||||
Loop
|
||||
End Sub
|
||||
|
||||
|
|
Loading…
Reference in New Issue