git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@337 d0543943-73ff-0310-b7d9-9358b9ac24b2
This commit is contained in:
Michael Jerris 2006-01-13 01:08:31 +00:00
parent 27d6790d3a
commit dbbbbcab1d
1 changed files with 2 additions and 0 deletions

View File

@ -101,6 +101,7 @@ End If
' ****************** ' ******************
If BuildCore Then If BuildCore Then
'http://www.sofaswitch.org/mikej/svnversion.zip
VersionCmd="svnversion " & quote & FreeswitchDir & "." & quote & " -n" VersionCmd="svnversion " & quote & FreeswitchDir & "." & quote & " -n"
Set MyFile = fso.CreateTextFile(UtilsDir & "tmpVersion.Bat", True) Set MyFile = fso.CreateTextFile(UtilsDir & "tmpVersion.Bat", True)
MyFile.WriteLine("@" & VersionCmd) MyFile.WriteLine("@" & VersionCmd)
@ -111,6 +112,7 @@ If BuildCore Then
VERSION=strFromProc VERSION=strFromProc
Loop While Not OExec.StdOut.atEndOfStream Loop While Not OExec.StdOut.atEndOfStream
sLastVersion = ""
Set fOrgFile = FSO.OpenTextFile(UtilsDir & "lastversion", ForReading, FailIfNotExist, OpenAsASCII) Set fOrgFile = FSO.OpenTextFile(UtilsDir & "lastversion", ForReading, FailIfNotExist, OpenAsASCII)
sLastVersion = fOrgFile.ReadLine() sLastVersion = fOrgFile.ReadLine()
fOrgFile.Close fOrgFile.Close