* gdbtk.tcl (files_command): listbox command no longer accepts

        -geometry.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 23fe27d822aef811ceb7e1b3cedee11424944ece..dac8eb4e79813abc95273350d64e3f7e72bed420 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,4 +1,9 @@
 start-sanitize-gdbtk
+Thu May 16 11:42:58 1996  Tom Tromey  <tromey@creche.cygnus.com>
+
+       * gdbtk.tcl (files_command): listbox command no longer accepts
+       -geometry.
+
 Wed May 15 16:04:09 1996  Stan Shebs  <shebs@andros.cygnus.com>
 
        * gdbtk.tcl (create_command_window): If command window's buffer

diff --git a/gdb/gdbtk.tcl b/gdb/gdbtk.tcl
index 5709a57dcd0078e8acf7518d3c4802e54020b514..f712c116649d1dbde256aa743c417dfc1fbee168 100644 (file)
--- a/gdb/gdbtk.tcl
+++ b/gdb/gdbtk.tcl
@@ -1973,7 +1973,7 @@ proc files_command {} {
 
   wm minsize .files_window 1 1
   #    wm overrideredirect .files_window true
-  listbox .files_window.list -geometry 30x20 -setgrid true \
+  listbox .files_window.list -width 30 -height 20 -setgrid true \
     -yscrollcommand {.files_window.scroll set} -relief sunken \
     -borderwidth 2
   scrollbar .files_window.scroll -orient vertical \