kenmirrors/freeswitch
1
0
Fork 0
mirror of https://github.com/signalwire/freeswitch.git synced 2025-04-16 00:41:41 +00:00
Code Issues Projects Releases Wiki Activity

FS-4219 --resolve correct windows version

Browse Source
This commit is contained in:
Jeff Lenk 2012-06-05 08:44:22 -05:00
parent e4caea6ffd
commit a065cf8631
1 changed files with 22 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
libs/win32/util.vbs
View File

@ -271,14 +271,15 @@ Sub CreateVersion(tmpFolder, VersionDir, includebase, includedest)
strVerRev = FindVersionStringInConfigure(VersionDir & "configure.in", "SWITCH_VERSION_REVISION") strVerRev = FindVersionStringInConfigure(VersionDir & "configure.in", "SWITCH_VERSION_REVISION")
'Set version to the one reported by configure.in 'Set version to the one reported by configure.in
if strVerRev <> "" Then If strVerRev <> "" Then
VERSION = strVerRev VERSION = strVerRev
End If End If
Dim sLastFile Dim sLastFile
Const ForReading = 1 Const ForReading = 1
'Try To read revision from git, if it's found, use this instead of strVerRev found above 'Try To read revision from git, if it was not found in "configure.in" already
If strVerRev = "" Then
If FSO.FolderExists(VersionDir & ".git") Then If FSO.FolderExists(VersionDir & ".git") Then
VersionCmd="git log --format=" & quote & "%%h %%ci" & quote & " -1 HEAD" VersionCmd="git log --format=" & quote & "%%h %%ci" & quote & " -1 HEAD"
Set MyFile = FSO.CreateTextFile(tmpFolder & "tmpVersion.Bat", True) Set MyFile = FSO.CreateTextFile(tmpFolder & "tmpVersion.Bat", True)
@ -298,9 +299,10 @@ Sub CreateVersion(tmpFolder, VersionDir, includebase, includedest)
sLastFile.Close sLastFile.Close
VERSION = Replace(VERSION, ":", "-") VERSION = Replace(VERSION, ":", "-")
End If End If
End If
If VERSION = "" Then If VERSION = "" Then
VERSION = "UNKNOWN" VERSION = "-UNKNOWN"
End If End If
If VERSION <> sLastVersion Then If VERSION <> sLastVersion Then