diff options
| author | Tom Tromey <tromey@redhat.com> | 2000-12-07 22:40:36 +0000 |
|---|---|---|
| committer | Tom Tromey <tromey@redhat.com> | 2000-12-07 22:40:36 +0000 |
| commit | 7542569602a6da3c3dbc87d50dcd561756938b8b (patch) | |
| tree | 30915fcb49de77b3c9112f9aff75279378ce88d0 | |
| parent | 06ba43c26a708109f1507936201cdf32d372a4a2 (diff) | |
| download | gdb-7542569602a6da3c3dbc87d50dcd561756938b8b.tar.gz | |
* managedwin.itb (ManagedWin::reveal): Don't set focus.
| -rw-r--r-- | gdb/gdbtk/library/ChangeLog | 2 | ||||
| -rw-r--r-- | gdb/gdbtk/library/managedwin.itb | 11 |
2 files changed, 8 insertions, 5 deletions
diff --git a/gdb/gdbtk/library/ChangeLog b/gdb/gdbtk/library/ChangeLog index 7c0a8900546..85ba0885add 100644 --- a/gdb/gdbtk/library/ChangeLog +++ b/gdb/gdbtk/library/ChangeLog @@ -1,5 +1,7 @@ 2000-12-07 Tom Tromey <tromey@redhat.com> + * managedwin.itb (ManagedWin::reveal): Don't set focus. + * tclIndex: Rebuilt. * interface.tcl (set_exe_name): Save session. (gdbtk_quit_check): Save session. diff --git a/gdb/gdbtk/library/managedwin.itb b/gdb/gdbtk/library/managedwin.itb index 1bda9f59eda..7eb23c5bcad 100644 --- a/gdb/gdbtk/library/managedwin.itb +++ b/gdb/gdbtk/library/managedwin.itb @@ -40,11 +40,12 @@ body ManagedWin::reveal {} { set top [winfo toplevel [namespace tail $this]] raise $top wm deiconify $top - - # I don't understand this next line and no one commented it, so it's gone. - #focus -force [focus -lastfor $top] - - focus $top + + # There used to be a `focus -force' here, but using -force is + # unfriendly, so it was removed. It was then replaced with a simple + # `focus $top'. However, this has no useful effect -- it just + # resets the subwindow of $top which has the `potential' focus. + # This can actually be confusing to the user. } body ManagedWin::restart {} { |