summaryrefslogtreecommitdiff
path: root/gdb
diff options
context:
space:
mode:
authorNicholas Duffek <nsd@redhat.com>2001-03-01 12:43:58 +0000
committerNicholas Duffek <nsd@redhat.com>2001-03-01 12:43:58 +0000
commit9d26241a96b163d4070fd073dcbd3b0a4a211a20 (patch)
tree7931f7120b423b9d655cd5fa783e369744359e1a /gdb
parente56130a5b4752964d470db348a960f225a6bbd85 (diff)
downloadgdb-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/ChangeLog7
-rw-r--r--gdb/gdbtk/library/managedwin.itb2
-rw-r--r--gdb/gdbtk/library/managedwin.ith10
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