From: Pat Thoyts <patthoyts@users.sourceforge.net>
Date: Mon, 18 May 2009 21:46:01 +0000 (+0100)
Subject: gitk: Handle msysGit version during version comparisons
X-Git-Tag: v1.6.4-rc0~53^2~3
X-Git-Url: https://git.tokkee.org/?a=commitdiff_plain;h=194bbf6cc8c2f3c14a920c841841d66b7667a848;p=git.git

gitk: Handle msysGit version during version comparisons

msysGit generates version strings with text appended which cannot
be used with vcompare; trying to use them generates a Tcl error.
Limit git_version to the first three digits which are the real git
version to avoid this error.

Signed-off-by: Pat Thoyts <patthoyts@users.sourceforge.net>
Signed-off-by: Paul Mackerras <paulus@samba.org>
---

diff --git a/gitk b/gitk
index 0804e6e36..18553904f 100755
--- a/gitk
+++ b/gitk
@@ -11152,7 +11152,7 @@ set nullid2 "0000000000000000000000000000000000000001"
 set nullfile "/dev/null"
 
 set have_tk85 [expr {[package vcompare $tk_version "8.5"] >= 0}]
-set git_version [lindex [exec git version] end]
+set git_version [join [lrange [split [lindex [exec git version] end] .] 0 2] .]
 
 set runq {}
 set history {}