gitk: Fix selection of tags

diff --git a/gitk b/gitk
index 4e2be7ff4bc28b177f0eb9790dfac7a591cf135b..364c7a84cbcf923deb72c2a91b4ec5f5d75bf4c3 100755 (executable)
--- a/gitk
+++ b/gitk
@@ -10489,7 +10489,7 @@ proc showtag {tag isnew} {
        set text "[mc "Tag"]: $tag\n[mc "Id"]:  $tagids($tag)"
     }
     appendwithlinks $text {}
-    maybe_scroll_ctext
+    maybe_scroll_ctext 1
     $ctext conf -state disabled
     init_flist {}
 }