This is the mail archive of the
insight@sources.redhat.com
mailing list for the Insight project.
[patch] 2 small fixes
- To: Insight Mailing List <insight at sources dot redhat dot com>
- Subject: [patch] 2 small fixes
- From: "Martin M. Hunt" <hunt at redhat dot com>
- Date: Thu, 8 Nov 2001 10:35:49 -0800
- Organization: Red Hat Inc
There is a typo that was preventing windows from being saved and
restored between sessions. Also I added MemWin as one of the classes
that the debugwin can filter on.
These are obvious and I have already checked them in.
--
Martin Hunt
GDB Engineer
Red Hat, Inc.
2001-11-08 Martin M. Hunt <hunt@redhat.com>
* library/managedwin.itb (ManagedWin::shutdown): Fix
typo in class name DebugWinDOpts.
* library/debugwin.itb: Add MemWin to _classes.
Index: library/debugwin.itb
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/library/debugwin.itb,v
retrieving revision 1.5
diff -u -p -r1.5 debugwin.itb
--- debugwin.itb 2001/11/05 19:14:00 1.5
+++ debugwin.itb 2001/11/08 18:31:05
@@ -338,8 +338,9 @@ body DebugWinDOpts::build_win {} {
wm title [winfo toplevel $itk_interior] "Debug Display Options"
# initialize here so we can resource this file and update the list
set _classes {DebugWin RegWin SrcBar SrcWin ToolBar WatchWin EmbeddedWin \
- ManagedWin GDBWin StackWin SrcTextWin VariableWin global BpWin \
- TargetSelection ModalDialog ProcessWin GDBEventHandler}
+ ManagedWin GDBWin StackWin SrcTextWin VariableWin global \
+ BpWin TargetSelection ModalDialog ProcessWin \
+ GDBEventHandler MemWin}
set _classes [concat [lsort $_classes] others]
set f [frame $itk_interior.f]
Index: library/managedwin.itb
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/library/managedwin.itb,v
retrieving revision 1.19
diff -u -p -r1.19 managedwin.itb
--- managedwin.itb 2001/11/05 19:14:00 1.19
+++ managedwin.itb 2001/11/08 18:31:05
@@ -116,7 +116,7 @@ body ManagedWin::shutdown {} {
set activeWins {}
foreach win [itcl_info objects -isa ManagedWin] {
if {![$win isa ModalDialog] && ![$win isa DebugWin] &&
- ! [$win isa DebugWinDopts]} {
+ ![$win isa DebugWinDOpts]} {
set g [wm geometry [winfo toplevel [namespace tail $win]]]
pref setd gdb/geometry/[namespace tail $win] $g
lappend activeWins [$win pickle]