From: Sergey Vlasov Date: Sun, 11 Feb 2007 16:58:32 GMT Subject: gitk: Fix restoring of pane sizes Message-ID: <117121311393-git-send-email-vsu@altlinux.ru> In-Reply-To: <20070211195643.b1f548f2.vsu@altlinux.ru> At least on Linux with Tk 8.4.13 gitk always came up with default pane sizes, even though they were previously saved in ~/.gitk. Apparently setting width and height of frames in these panes when creating them is not enough, and an explicit paneconfigure call is needed. Signed-off-by: Sergey Vlasov --- gitk | 2 ++ 1 files changed, 2 insertions(+), 0 deletions(-) diff --git a/gitk b/gitk index df1ce8c..7e6ee56 100755 --- a/gitk +++ b/gitk @@ -577,6 +577,7 @@ proc makewindow {} { pack .tf.bar -in .tf -side bottom -fill x pack .tf.histframe -fill both -side top -expand 1 .ctop add .tf + .ctop paneconfigure .tf -height $geometry(topheight) # now build up the bottom panedwindow .pwbottom -orient horizontal @@ -638,6 +639,7 @@ proc makewindow {} { $ctext tag conf found -back yellow .pwbottom add .bleft + .pwbottom paneconfigure .bleft -width $geometry(botwidth) # lower right frame .bright -- 1.5.0.rc4.50.g403de