diff --git a/gitk b/gitk
index 4e2be7ff4b..364c7a84cb 100755
--- 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 {}
 }