gitk: Specify line hover font

Hovering over a line in gitk displays the commit one-liner in a
box, but the text usually overflows the box.  The box size is
computed with a specified font, so this patch sets the text font
as well.

Signed-off-by: Frank Sorenson <frank@tuxrocks.com>
Signed-off-by: Junio C Hamano <junkio@cox.net>

diff --git a/gitk b/gitk
index 3ea94349f86dfa5666c6fa9ecb91a15d33ad3847..5deab53c548a4e2734a7a53a39a3fa542e360b0f 100755 (executable)
--- a/gitk
+++ b/gitk
@@ -3125,7 +3125,7 @@ proc linehover {} {
     set t [$canv create rectangle $x0 $y0 $x1 $y1 \
               -fill \#ffff80 -outline black -width 1 -tags hover]
     $canv raise $t
-    set t [$canv create text $x $y -anchor nw -text $text -tags hover]
+    set t [$canv create text $x $y -anchor nw -text $text -tags hover -font $mainfont]
     $canv raise $t
 }