* gdbtk.tcl (create_registers_window): Work around a radiobutton

widget bug to make Options|Natural button work.
This commit is contained in:
Stu Grossman 1995-01-25 00:36:33 +00:00
parent f2224fe249
commit 8e5bc49fe5
2 changed files with 11 additions and 8 deletions

View File

@ -1,5 +1,8 @@
Tue Jan 24 12:10:28 1995 Stu Grossman (grossman@cygnus.com)
* gdbtk.tcl (create_registers_window): Work around a radiobutton
widget bug to make Options|Natural button work.
* gdbtk.c (gdb_disassemble): Fix problem with source+assembly and
g++ caused by out-of-order pc's.
* gdbtk.tcl (files_command): Remove duplicate file names. Also,

View File

@ -1411,20 +1411,20 @@ proc create_registers_window {} {
.reg.menubar.view.menu delete 0 last
# Hex menu item
.reg.menubar.view.menu add radiobutton -variable reg_format \
-label Hex -value x -command {update_registers all}
.reg.menubar.view.menu add radiobutton -label Hex \
-command {set reg_format x ; update_registers all}
# Decimal menu item
.reg.menubar.view.menu add radiobutton -variable reg_format \
-label Decimal -value d -command {update_registers all}
.reg.menubar.view.menu add radiobutton -label Decimal \
-command {set reg_format d ; update_registers all}
# Octal menu item
.reg.menubar.view.menu add radiobutton -variable reg_format \
-label Octal -value o -command {update_registers all}
.reg.menubar.view.menu add radiobutton -label Octal \
-command {set reg_format o ; update_registers all}
# Natural menu item
.reg.menubar.view.menu add radiobutton -variable reg_format \
-label Natural -value {} -command {update_registers all}
.reg.menubar.view.menu add radiobutton -label Natural \
-command {set reg_format {} ; update_registers all}
# Config menu item
.reg.menubar.view.menu add separator