From: Stephen Rothwell Date: Thu, 30 Mar 2006 05:13:12 +0000 (+1100) Subject: [PATCH] gitk: allow goto heads X-Git-Tag: v1.3.0-rc3~7^2~6 X-Git-Url: https://git.tokkee.org/?a=commitdiff_plain;h=e100712968cb781183a549f164e34596d6e7fcb2;p=git.git [PATCH] gitk: allow goto heads This patch allows you to enter a head name in the SHA1 id: field. It also removes some unnecessary global declarations. Signed-off-by: Stephen Rothwell Signed-off-by: Paul Mackerras --- diff --git a/gitk b/gitk index 90afec92d..4bc7946ae 100755 --- a/gitk +++ b/gitk @@ -2847,13 +2847,15 @@ proc sha1change {n1 n2 op} { } proc gotocommit {} { - global sha1string currentid commitrow tagids + global sha1string currentid commitrow tagids headids global displayorder numcommits if {$sha1string == {} || ([info exists currentid] && $sha1string == $currentid)} return if {[info exists tagids($sha1string)]} { set id $tagids($sha1string) + } elseif {[info exists headids($sha1string)]} { + set id $headids($sha1string) } else { set id [string tolower $sha1string] if {[regexp {^[0-9a-f]{4,39}$} $id]} { @@ -2879,7 +2881,7 @@ proc gotocommit {} { if {[regexp {^[0-9a-fA-F]{4,}$} $sha1string]} { set type "SHA1 id" } else { - set type "Tag" + set type "Tag/Head" } error_popup "$type $sha1string is not known" } @@ -3370,7 +3372,6 @@ proc listrefs {id} { proc rereadrefs {} { global idtags idheads idotherrefs - global tagids headids otherrefids set refids [concat [array names idtags] \ [array names idheads] [array names idotherrefs]]