Revision: 54379
http://brlcad.svn.sourceforge.net/brlcad/?rev=54379&view=rev
Author: bob1961
Date: 2013-02-11 15:17:12 +0000 (Mon, 11 Feb 2013)
Log Message:
-----------
Tighten up the display of radiobuttons in EpaEditFrame's lower panel.
Modified Paths:
--------------
brlcad/trunk/src/tclscripts/archer/EpaEditFrame.tcl
Modified: brlcad/trunk/src/tclscripts/archer/EpaEditFrame.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/archer/EpaEditFrame.tcl 2013-02-11 15:11:10 UTC
(rev 54378)
+++ brlcad/trunk/src/tclscripts/archer/EpaEditFrame.tcl 2013-02-11 15:17:12 UTC
(rev 54379)
@@ -390,7 +390,7 @@
::itcl::body EpaEditFrame::buildLowerPanel {} {
set parent [$this childsite lower]
-
+ set row 0
foreach attribute {H A B} {
itk_component add set$attribute {
::ttk::radiobutton $parent.set_$attribute \
@@ -400,9 +400,8 @@
-command [::itcl::code $this initEditState]
} {}
- pack $itk_component(set$attribute) \
- -anchor w \
- -expand yes
+ grid $itk_component(set$attribute) -row $row -column 0 -sticky nsew
+ incr row
}
}
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
Free Next-Gen Firewall Hardware Offer
Buy your Sophos next-gen firewall before the end March 2013
and get the hardware for free! Learn more.
http://p.sf.net/sfu/sophos-d2d-feb
_______________________________________________
BRL-CAD Source Commits mailing list
brlcad-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
