This is the mail archive of the
insight@sources.redhat.com
mailing list for the Insight project.
[patch] change grid "-col" to "-column"
- From: "Martin M. Hunt" <hunt at redhat dot com>
- To: "insight at sources dot redhat dot com" <insight at sources dot redhat dot com>
- Date: 03 Dec 2002 14:55:03 -0800
- Subject: [patch] change grid "-col" to "-column"
2002-12-03 Martin M. Hunt <hunt@redhat.com>
* library/srcpref.itb: Latest tk doesn't support
"-col" as a grid option. Use "-column".
* library/regwin.itb: Ditto.
Index: regwin.itb
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/library/regwin.itb,v
retrieving revision 1.19
diff -p -r1.19 regwin.itb
*** regwin.itb 6 Nov 2002 20:45:53 -0000 1.19
--- regwin.itb 3 Dec 2002 22:51:44 -0000
*************** itcl::body RegWin::_build_win {} {
*** 202,210 ****
$itk_component(hscroll) configure -command [code $itk_component(table) xview]
$itk_component(vscroll) configure -command [code $itk_component(table) yview]
! grid $itk_component(table) -row 0 -col 0 -sticky news
! grid $itk_component(vscroll) -row 0 -col 1 -sticky ns
! grid $itk_component(hscroll) -row 1 -col 0 -sticky ew
grid columnconfigure $itk_interior 0 -weight 1
grid rowconfigure $itk_interior 0 -weight 1
--- 202,210 ----
$itk_component(hscroll) configure -command [code $itk_component(table) xview]
$itk_component(vscroll) configure -command [code $itk_component(table) yview]
! grid $itk_component(table) -row 0 -column 0 -sticky news
! grid $itk_component(vscroll) -row 0 -column 1 -sticky ns
! grid $itk_component(hscroll) -row 1 -column 0 -sticky ew
grid columnconfigure $itk_interior 0 -weight 1
grid rowconfigure $itk_interior 0 -weight 1
Index: srcpref.itb
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/library/srcpref.itb,v
retrieving revision 1.7
diff -p -r1.7 srcpref.itb
*** srcpref.itb 15 Oct 2002 21:19:51 -0000 1.7
--- srcpref.itb 3 Dec 2002 22:51:45 -0000
*************** itcl::body SrcPref::_build_win {} {
*** 124,131 ****
radiobutton $w.var_on -text "On " -variable [scope $var] -value 1
radiobutton $w.var_off -text "Off" -variable [scope $var] -value 0
pack $w.var_on $w.var_off -side top
! grid $f.rmv.mode -sticky nsew -pady 5 -row 0 -col 0
! grid $f.rmv.var -sticky nsew -pady 5 -row 0 -col 2
grid columnconfigure $f.rmv 0 -weight 1
grid columnconfigure $f.rmv 1 -minsize 4
grid columnconfigure $f.rmv 2 -weight 1
--- 124,131 ----
radiobutton $w.var_on -text "On " -variable [scope $var] -value 1
radiobutton $w.var_off -text "Off" -variable [scope $var] -value 0
pack $w.var_on $w.var_off -side top
! grid $f.rmv.mode -sticky nsew -pady 5 -row 0 -column 0
! grid $f.rmv.var -sticky nsew -pady 5 -row 0 -column 2
grid columnconfigure $f.rmv 0 -weight 1
grid columnconfigure $f.rmv 1 -minsize 4
grid columnconfigure $f.rmv 2 -weight 1