Revision: 34089
http://brlcad.svn.sourceforge.net/brlcad/?rev=34089&view=rev
Author: bob1961
Date: 2009-03-26 19:52:37 +0000 (Thu, 26 Mar 2009)
Log Message:
-----------
Minor cleanup.
Modified Paths:
--------------
brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl
Modified: brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl 2009-03-26 19:52:21 UTC
(rev 34088)
+++ brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl 2009-03-26 19:52:37 UTC
(rev 34089)
@@ -4443,20 +4443,16 @@
-text $text
} {}
- set hbc [$itk_component($name1\L) cget -background]
-
itk_component add $name1\F {
::frame $parent.$name2\F \
-relief sunken \
-bd 0
} {}
- set listHeight [expr [llength $listOfChoices] * 19]
itk_component add $name1\CB {
::ttk::combobox $itk_component($name1\F).$name2\CB \
-state readonly \
-textvariable [::itcl::scope $varName] \
- -height $listHeight \
-values $listOfChoices
} {}
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
_______________________________________________
BRL-CAD Source Commits mailing list
brlcad-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
