From c876dbadc2d44386962296f09a060c3ae69e2029 Mon Sep 17 00:00:00 2001 From: Pat Thoyts Date: Tue, 14 Apr 2009 22:09:53 +0100 Subject: [PATCH] gitk: Remember and restore the window state with the geometry This records the window state in ~/.gitk. On startup, if the gitk window was previously maximized (zoomed), then we restore that state. Signed-off-by: Pat Thoyts Signed-off-by: Paul Mackerras --- gitk | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/gitk b/gitk index a65d961a07..045e4abba8 100755 --- a/gitk +++ b/gitk @@ -2251,6 +2251,10 @@ proc makewindow {} { } } + if {[info exists geometry(state)] && $geometry(state) eq "zoomed"} { + wm state . $geometry(state) + } + if {[tk windowingsystem] eq {aqua}} { set M1B M1 set ::BM "3" @@ -2548,6 +2552,7 @@ proc savestuff {w} { puts $f [list set perfile_attrs $perfile_attrs] puts $f "set geometry(main) [wm geometry .]" + puts $f "set geometry(state) [wm state .]" puts $f "set geometry(topwidth) [winfo width .tf]" puts $f "set geometry(topheight) [winfo height .tf]" puts $f "set geometry(pwsash0) \"[.tf.histframe.pwclist sash coord 0]\"" -- 2.11.4.GIT