diff options
author | Nicholas Duffek <nsd@redhat.com> | 2001-03-01 12:43:58 +0000 |
---|---|---|
committer | Nicholas Duffek <nsd@redhat.com> | 2001-03-01 12:43:58 +0000 |
commit | 9d26241a96b163d4070fd073dcbd3b0a4a211a20 (patch) | |
tree | 7931f7120b423b9d655cd5fa783e369744359e1a /gdb | |
parent | e56130a5b4752964d470db348a960f225a6bbd85 (diff) | |
download | gdb-9d26241a96b163d4070fd073dcbd3b0a4a211a20.tar.gz |
* library/managedwin.itb (ManagedWin::shutdown): Save each
managed window's geometry as a preference.
* library/managedwin.ith (ManagedWin::destructor): Don't save
managed windows' geometries as preferences.
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/gdbtk/ChangeLog | 7 | ||||
-rw-r--r-- | gdb/gdbtk/library/managedwin.itb | 2 | ||||
-rw-r--r-- | gdb/gdbtk/library/managedwin.ith | 10 |
3 files changed, 9 insertions, 10 deletions
diff --git a/gdb/gdbtk/ChangeLog b/gdb/gdbtk/ChangeLog index 513906fdcde..ce6acaf341c 100644 --- a/gdb/gdbtk/ChangeLog +++ b/gdb/gdbtk/ChangeLog @@ -1,5 +1,12 @@ 2001-03-01 Nicholas Duffek <nsd@redhat.com> + * library/managedwin.itb (ManagedWin::shutdown): Save each + managed window's geometry as a preference. + * library/managedwin.ith (ManagedWin::destructor): Don't save + managed windows' geometries as preferences. + +2001-03-01 Nicholas Duffek <nsd@redhat.com> + * library/srctextwin.itb (SrcTextWin::location): Clear previous pane's cursor after switching panes. diff --git a/gdb/gdbtk/library/managedwin.itb b/gdb/gdbtk/library/managedwin.itb index 5b346094b65..c7822201b57 100644 --- a/gdb/gdbtk/library/managedwin.itb +++ b/gdb/gdbtk/library/managedwin.itb @@ -71,6 +71,8 @@ body ManagedWin::shutdown {} { set activeWins {} foreach win $manage_active { if {[$win isa ManagedWin]} { + set g [wm geometry [winfo toplevel [namespace tail $win]]] + pref setd gdb/geometry/[namespace tail $win] $g lappend activeWins [$win pickle] } } diff --git a/gdb/gdbtk/library/managedwin.ith b/gdb/gdbtk/library/managedwin.ith index 521320ee1c7..60d08baed3b 100644 --- a/gdb/gdbtk/library/managedwin.ith +++ b/gdb/gdbtk/library/managedwin.ith @@ -81,21 +81,11 @@ class ManagedWin { set manage_active [lreplace $manage_active $i $i] } - # save geometry - set g [wm geometry [winfo toplevel [namespace tail $this]]] - pref setd gdb/geometry/[namespace tail $this] $g - # If no toplevels remain, quit. However, check the quit_if_last # flag since we might be doing something like displaying a # splash screen at startup... if {!$numTopWins && [quit_if_last]} { - # save window positions of remaining windows - foreach obj $manage_active { - set g [wm geometry [winfo toplevel [namespace tail $obj]]] - pref setd gdb/geometry/[namespace tail $obj] $g - } - pref_save gdb_force_quit } else { destroy_toplevel |