From Nick Kelsey <nickk@ubicom.com>:

        * process.itb (build_win): Removed ide_sizebox instantiation that is
        no longer required and is causing errors for win hosts.
        * tdump.tcl (build_win): Ditto.
        * locals.tcl (build_win): Removed ide_sizebox instantiation that is
        no longer required and already commented out.
        * regwin.itb (build_win): Ditto.
        * srcwin.itb (constructor): Ditto.
        * stackwin.itb (constructor): Ditto.
        * watch.tcl (constructor): Ditto.

8 files changed, 13 insertions, 48 deletions

diff --git a/gdb/gdbtk/ChangeLog b/gdb/gdbtk/ChangeLog
index 26fb16c516f..aafb6b980d1 100644
--- a/gdb/gdbtk/ChangeLog
+++ b/gdb/gdbtk/ChangeLog
@@ -1,3 +1,16 @@
+2003-03-18  Keith Seitz  <keiths@redhat.com>
+
+	From Nick Kelsey <nickk@ubicom.com>:
+	* process.itb (build_win): Removed ide_sizebox instantiation that is
+	no longer required and is causing errors for win hosts.
+	* tdump.tcl (build_win): Ditto.
+	* locals.tcl (build_win): Removed ide_sizebox instantiation that is
+	no longer required and already commented out.
+	* regwin.itb (build_win): Ditto.
+	* srcwin.itb (constructor): Ditto.
+	* stackwin.itb (constructor): Ditto.
+	* watch.tcl (constructor): Ditto.
+
 2003-03-24  Martin M. Hunt  <hunt@redhat.com>
 
 	* generic/gdbtk-register.c (get_register_types): Use 
diff --git a/gdb/gdbtk/library/locals.tcl b/gdb/gdbtk/library/locals.tcl
index 390154d6460..9f3f098f9f5 100644
--- a/gdb/gdbtk/library/locals.tcl
+++ b/gdb/gdbtk/library/locals.tcl
@@ -82,10 +82,6 @@ itcl::class LocalsWin {
     set tree [VarTree $f.tree -type "local"]
     pack $f.tree -expand yes -fill both
     pack $f -expand yes -fill both
-    if {$::tcl_platform(platform) == "windows"} {
-#      ide_sizebox [namespace tail $this].sizebox
-#      place [namespace tail $this].sizebox -relx 1 -rely 1 -anchor se
-    }
     
     window_name "Local Variables"
     ::update idletasks
diff --git a/gdb/gdbtk/library/process.itb b/gdb/gdbtk/library/process.itb
index 80c1bed8a00..b3aad6f9d5c 100644
--- a/gdb/gdbtk/library/process.itb
+++ b/gdb/gdbtk/library/process.itb
@@ -36,16 +36,6 @@ itcl::body ProcessWin::constructor {args} {
 itcl::body ProcessWin::build_win {} {
   global tcl_platform
 
-  if {$tcl_platform(platform) == "windows"} {
-    set hsmode static
-    set vsmode static
-    ide_sizebox $itk_interior.sbox
-    place $itk_interior.sbox -relx 1.0 -rely 1.0 -anchor se
-  } else {
-    set hsmode dynamic
-    set vsmode dynamic
-  }
-
   itk_component add slbox {
     iwidgets::scrolledlistbox $itk_interior.slbox \
       -background $::Colors(bg) \
@@ -138,7 +128,6 @@ itcl::body ProcessWin::destructor {} {
 # ------------------------------------------------------------------
 itcl::body ProcessWin::reconfig {} {
   destroy $itk_interior.s
-  if {[winfo exists $itk_interior.sbox]} { destroy $itk_interior.sbox }
   if {[winfo exists $itk_interior.slbox]} { destroy $itk_interior.slbox }
   build_win
 }
diff --git a/gdb/gdbtk/library/regwin.itb b/gdb/gdbtk/library/regwin.itb
index 594b9f5f9f8..dd1145543b3 100644
--- a/gdb/gdbtk/library/regwin.itb
+++ b/gdb/gdbtk/library/regwin.itb
@@ -241,12 +241,6 @@ itcl::body RegWin::_build_win {} {
   grid rowconfigure $itk_interior 0 -weight 0
   grid rowconfigure $itk_interior 1 -weight 1
 
-# Add sizebox for windows
-#  if {[string compare $::tcl_platform(platform) "windows"] == 0} {
-#    ide_sizebox $itk_interior.sbox
-#    place $itk_interior.sbox -relx 1.0 -rely 1.0 -anchor se
-#  }
-
   # Add popup menu - we populate it in the event handler
   itk_component add popup {
     menu $itk_interior.pop -tearoff 0
diff --git a/gdb/gdbtk/library/srcwin.itb b/gdb/gdbtk/library/srcwin.itb
index 2337001a70e..ad10b5aa0fe 100644
--- a/gdb/gdbtk/library/srcwin.itb
+++ b/gdb/gdbtk/library/srcwin.itb
@@ -22,11 +22,6 @@ itcl::body SrcWin::constructor {args} {
 
   _update_title ""
 
-  # On Windows, create a sizebox.
-  if {$::tcl_platform(platform) == "windows"} {
-#    ide_sizebox $itk_interior.sizebox
-  }
-
   set Tracing [pref get gdb/mode]
   set current(filename) ""
 
diff --git a/gdb/gdbtk/library/stackwin.itb b/gdb/gdbtk/library/stackwin.itb
index 8cea5f1bfde..3561c0302fb 100644
--- a/gdb/gdbtk/library/stackwin.itb
+++ b/gdb/gdbtk/library/stackwin.itb
@@ -46,12 +46,6 @@ itcl::body StackWin::build_win {} {
   [$itk_component(slb) component listbox] configure \
     -bg $::Colors(textbg) -fg $::Colors(textfg)
 
-  # Add sizebox for windows
-  if {[string compare $tcl_platform(platform) "windows"] == 0} {
-#    ide_sizebox $itk_interior.sbox
-#    place $itk_interior.sbox -relx 1.0 -rely 1.0 -anchor se
-  }
-
   update dummy
 
   pack $itk_interior.s -side left -expand yes -fill both
@@ -133,7 +127,6 @@ itcl::body StackWin::change_frame {} {
 # ------------------------------------------------------------------
 itcl::body StackWin::reconfig {} {
   destroy $itk_interior.s
-  if {[winfo exists $itk_interior.sbox]} { destroy $itk_interior.sbox }
   build_win
 }
 
diff --git a/gdb/gdbtk/library/tdump.tcl b/gdb/gdbtk/library/tdump.tcl
index 1f1701533d6..06f1cdeb04b 100644
--- a/gdb/gdbtk/library/tdump.tcl
+++ b/gdb/gdbtk/library/tdump.tcl
@@ -47,14 +47,6 @@ itcl::class TdumpWin {
   method build_win {} {
     global tcl_platform
 
-    if {[string compare $tcl_platform(platform) "windows"] == 0} {
-      set mode static
-      ide_sizebox $itk_interior.sbox
-      place $itk_interior.sbox -relx 1.0 -rely 1.0 -anchor se
-    } else {
-      set mode dynamic
-    }
-
     itk_component add stext {
       iwidgets::scrolledtext $itk_interior.stext -hscrollmode $mode \
 	-vscrollmode $mode -textfont global/fixed \
@@ -96,7 +88,6 @@ itcl::class TdumpWin {
   #  METHOD:  reconfig - used when preferences change
   # ------------------------------------------------------------------
   method reconfig {} {
-    if {[winfo exists $itk_interior.sbox]} { destroy $itk_interior.sbox }
     if {[winfo exists $itk_interior.stext]} { destroy $itk_interior.stext }
     build_win
   }
diff --git a/gdb/gdbtk/library/watch.tcl b/gdb/gdbtk/library/watch.tcl
index bd90b387bfa..6d2fd367410 100644
--- a/gdb/gdbtk/library/watch.tcl
+++ b/gdb/gdbtk/library/watch.tcl
@@ -91,12 +91,6 @@ itcl::class WatchWin {
     grid columnconfigure $entryFrame 0 -weight 1
     grid columnconfigure $entryFrame 1
 
-    if {$::tcl_platform(platform) == "windows"} {
-#      grid columnconfigure $entryFrame 1 -pad 20
-#      ide_sizebox [namespace tail $this].sizebox
-#      place [namespace tail $this].sizebox -relx 1 -rely 1 -anchor se
-    }
-
     grid $treeFrame -row 0 -column 0 -sticky news
     grid $entryFrame -row 1 -column 0 -padx 5 -pady 5 -sticky news
     grid columnconfigure $f 0 -weight 1