>From 1483a6207ffe8bf216ea3258db7b453857c3e1d6 Mon Sep 17 00:00:00 2001 From: Daniel Nobuto Date: Thu, 3 Aug 2006 00:32:01 -0700 Subject: [PATCH] Save geometry(ctexth) in ~/.gitk Not doing so causes subsequent launches of gitk to "lose" the bottom bits of the window. Signed-off-by: Daniel Nobuto --- gitk | 3 +++ 1 files changed, 3 insertions(+), 0 deletions(-) diff --git a/gitk b/gitk index ba4644f..5ae28ef 100755 --- a/gitk +++ b/gitk @@ -770,6 +770,9 @@ proc savestuff {w} { set wid [expr {([winfo width $ctext] - 8) \ / [font measure $textfont "0"]}] puts $f "set geometry(ctextw) $wid" + set geometry(ctexth) [expr {($texth - 8) / + / [font metrics $textfont -linespace]}] + puts $f "set geometry(ctexth) $wid" set wid [expr {([winfo width $cflist] - 11) \ / [font measure [$cflist cget -font] "0"]}] puts $f "set geometry(cflistw) $wid" -- 1.4.1.1