diff options
| author | Keith Seitz <keiths@redhat.com> | 2001-05-31 15:21:41 +0000 |
|---|---|---|
| committer | Keith Seitz <keiths@redhat.com> | 2001-05-31 15:21:41 +0000 |
| commit | b8df5aa863cd59505a40f8fb40d62f1b746152e1 (patch) | |
| tree | 3f2a9de903ffe3edfdc0bd3c439f714e08024db3 /gdb/gdbtk/library/process.itb | |
| parent | 69e37fd3a8cde8b74d9ab7a84260f082a6787a7f (diff) | |
| download | gdb-b8df5aa863cd59505a40f8fb40d62f1b746152e1.tar.gz | |
* library/interface.tcl (gdb_busy_hook): Deprecate.
(gdbtk_busy): Create and dispatch a BusyEvent instead
of running hooks.
* library/ehandler.ith (busy): New event handler.
* library/gdbevent.ith (BusyEvent): New event class.
* library/console.ith: Inherit from GDBEventHandler.
(busy): Match event handler definition.
* library/console.itb (busy): Ditto.
(constructor): Remove gdb_busy_event.
(destructor): Ditto.
* library/kod.ith (busy): Match event handler definition.
* library/kod.itb (busy): Ditto.
(constructor): Remove gdb_busy_hook.
(destructor): Ditto.
* library/memwin.ith (busy): Match event handler definition.
* library/memwin.itb (busy): Ditto.
(constructor): Remove gdb_busy_hook.
(destructor): Ditto.
* library/pluginwin.itcl (running): Rename to "busy" and
match event handler definition.
(consturctor): Remove gdb_busy_hook.
(destructor): Ditto.
* library/process.ith (busy): Match event handler definition.
* library/process.itb (busy): Ditto.
(constructor): Remove gdb_busy_hook.
(destructor): Ditto.
* library/regwin.ith (busy): Match event handler definition.
* library/regwin.itb (busy): Ditto.
(constructor): Remove gdb_busy_hook.
(destructor): Ditto.
* library/srcbar.itcl (constructor): Remove gdb_busy_hook.
(destructor): Ditto.
(busy): New method.
* library/srcwin.ith (busy): Match event handler definition.
* library/srcwin.itb (busy): Ditto.
Only do the "busy" stuff if do_updates is set.
(toggle_updates): Remove gdb_busy_hook.
(constructor): Ditto.
(destructor): Ditto.
* library/stackwin.ith (busy): Match event handler definition.
* library/stackwin.itb (busy): Ditto.
(constructor): Remove gdb_busy_hook.
(destructor): Ditto.
* library/variables.tcl (constructor): Ditto.
(destructor): Ditto.
(disable_ui): Rename to "busy" and match event handler
definition.
* library/plugins/rhabout/rhabout.itcl (running): Rename
to "busy" and match new event handler definition.
* library/tclIndex: Regenerated.
Diffstat (limited to 'gdb/gdbtk/library/process.itb')
| -rw-r--r-- | gdb/gdbtk/library/process.itb | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/gdb/gdbtk/library/process.itb b/gdb/gdbtk/library/process.itb index 07638d5ab4f..e1f1de759dd 100644 --- a/gdb/gdbtk/library/process.itb +++ b/gdb/gdbtk/library/process.itb @@ -28,7 +28,6 @@ body ProcessWin::constructor {args} { # Add hooks for this object add_hook gdb_update_hook [code $this update] - add_hook gdb_busy_hook [code $this busy] add_hook gdb_no_inferior_hook [code $this idle] add_hook gdb_idle_hook [code $this idle] } @@ -130,7 +129,6 @@ body ProcessWin::change_context {y} { body ProcessWin::destructor {} { remove_hook gdb_update_hook [code $this update] remove_hook gdb_idle_hook [code $this idle] - remove_hook gdb_busy_hook [code $this busy] remove_hook gdb_no_inferior_hook [code $this no_inferior] } @@ -143,13 +141,13 @@ body ProcessWin::reconfig {} { } # ------------------------------------------------------------------ -# METHOD: busy - gdb_busy_hook +# METHOD: busy - BusyEvent handler # # This method should accomplish blocking # - clicks in the window # - change mouse pointer # ------------------------------------------------------------------ -body ProcessWin::busy {} { +body ProcessWin::busy {event} { set Running 1 cursor watch } |