cpp/openttd-patchpack/source Changeset - r17092:68ea7f31e57c

Changeset - r17092:68ea7f31e57c

Parent rev.

Child rev.

[Not reviewed]

master

0 2 0

michi_cc - 14 years ago 2011-01-18 21:27:30
michi_cc@openttd.org

(svn r21839) -Change: Support tags created by git-svn for the revision detection.

2 files changed with 20 insertions and 2 deletions:

findversion.sh

projects/determineversion.vbs

0 comments (0 inline, 0 general)

findversion.sh

➞

Show inline comments

@@ @@ -99,6 +99,11 @@ elif [ -d "$ROOT_DIR/.git" ]; then @@
 		# No rev? Maybe it is a custom git-svn clone
 		REV_NR=`LC_ALL=C git log --pretty=format:%b --grep="git-svn-id:.*@[0-9]*" -1 | sed "s@.*\@\([0-9]*\).*@\1@"`
 	fi
 	TAG=`git name-rev --name-only --tags --no-undefined HEAD 2>/dev/null`
 	if [ -n "$TAG" ]; then
 		BRANCH=""
 		REV=$TAG
 	fi
 elif [ -d "$ROOT_DIR/.hg" ]; then
 	# We are a hg checkout
 	if [ -n "`hg status | grep -v '^?'`" ]; then

projects/determineversion.vbs

➞

Show inline comments

@@ @@ -201,7 +201,7 @@ Function DetermineSVNVersion() @@
 						End If ' line <> "master"
 					End If ' Err.Number = 0
-					Set oExec = WshShell.Exec("git log --pretty=format:%s --grep=" & Chr(34) & "^(svn r[0-9]*)" & Chr(34) & " -1 ../")
 					Set oExec = WshShell.Exec("git log --pretty=format:%s --grep=" & Chr(34) & "^(svn r[0-9]*)" & Chr(34) & " -1")
 					if Err.Number = 0 Then
 						revision = Mid(oExec.StdOut.ReadLine(), 7)
 						revision = Mid(revision, 1, InStr(revision, ")") - 1)
@@ @@ -210,13 +210,26 @@ Function DetermineSVNVersion() @@
 						' No revision? Maybe it is a custom git-svn clone
 						' Reset error number as WshShell.Exec will not do that on success
 						Err.Clear
-						Set oExec = WshShell.Exec("git log --pretty=format:%b --grep=" & Chr(34) & "git-svn-id:.*@[0-9]*" & Chr(34) & " -1 ../")
 						Set oExec = WshShell.Exec("git log --pretty=format:%b --grep=" & Chr(34) & "git-svn-id:.*@[0-9]*" & Chr(34) & " -1")
 						If Err.Number = 0 Then
 							revision = oExec.StdOut.ReadLine()
 							revision = Mid(revision, InStr(revision, "@") + 1)
 							revision = Mid(revision, 1, InStr(revision, " ") - 1)
 						End If ' Err.Number = 0
 					End If ' revision = ""
 					' Check if a tag is currently checked out
 					Err.Clear
 					Set oExec = WshShell.Exec("git name-rev --name-only --tags --no-undefined HEAD")
 					If Err.Number = 0 Then
 						' Wait till the application is finished ...
 						Do While oExec.Status = 0
 						Loop
 						If oExec.ExitCode = 0 Then
 							version = oExec.StdOut.ReadLine()
 							branch = ""
 						End If ' oExec.ExitCode = 0
 					End If ' Err.Number = 0
 				End If ' Err.Number = 0
 			End If ' oExec.ExitCode = 0
 		End If ' Err.Number = 0

0 comments (0 inline, 0 general)