From: Michael Haggerty Date: Mon, 19 Dec 2016 16:45:05 GMT Subject: [PATCH 06/13] gitk: simplify regexp Message-ID: In-Reply-To: Signed-off-by: Michael Haggerty --- gitk | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gitk b/gitk index fb2f653..84a5326 100755 --- a/gitk +++ b/gitk @@ -6654,7 +6654,7 @@ proc drawtags {id x xt y1} { set xl [expr {$xl - $delta/2}] $canv create polygon $x $yt $xr $yt $xr $yb $x $yb \ -width 1 -outline black -fill $col -tags tag.$id - if {[regexp {^(remotes/.*/|remotes/)} $tag match remoteprefix]} { + if {[regexp {^(remotes/(.*/|))} $tag match remoteprefix]} { set rwid [font measure mainfont $remoteprefix] set xi [expr {$x + 1}] set yti [expr {$yt + 1}] -- 2.9.3