diff options
| author | Stu Grossman <grossman@cygnus> | 1995-01-31 01:41:55 +0000 |
|---|---|---|
| committer | Stu Grossman <grossman@cygnus> | 1995-01-31 01:41:55 +0000 |
| commit | 78daa95e3a4ea4ad4a2e029f598b7c5c6c9d63b8 (patch) | |
| tree | dc535005ff5d5be2b4d22f4a69e21fa56a98f02e /gdb/gdbtk.tcl | |
| parent | 0e887539b0901ee2e08516eb546bf708b32b214b (diff) | |
| download | gdb-78daa95e3a4ea4ad4a2e029f598b7c5c6c9d63b8.zip gdb-78daa95e3a4ea4ad4a2e029f598b7c5c6c9d63b8.tar.gz gdb-78daa95e3a4ea4ad4a2e029f598b7c5c6c9d63b8.tar.bz2 | |
* gdbtk.tcl (create_file_win): Disable old popup menu for source
window.
Diffstat (limited to 'gdb/gdbtk.tcl')
| -rw-r--r-- | gdb/gdbtk.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gdb/gdbtk.tcl b/gdb/gdbtk.tcl index 2df9cf0..9af60a6 100644 --- a/gdb/gdbtk.tcl +++ b/gdb/gdbtk.tcl @@ -972,7 +972,7 @@ proc create_file_win {filename debug_file} { $win tag add margin $i.0 $i.8 } - $win tag bind margin <1> {listing_window_button_1 %W %X %Y %x %y} +# $win tag bind margin <1> {listing_window_button_1 %W %X %Y %x %y} $win tag bind source <1> { %W mark set anchor "@%x,%y wordstart" set last [%W index "@%x,%y wordend"] |