[brlcad-commits] SF.net SVN: brlcad:[49568] brlcad/trunk/src/tclscripts/archer/ArcherCore. tcl
Open Source Solid Modeling CAD
Brought to you by:
brlcad
From: <bo...@us...> - 2012-02-28 16:07:24
|
Revision: 49568 http://brlcad.svn.sourceforge.net/brlcad/?rev=49568&view=rev Author: bob1961 Date: 2012-02-28 16:07:12 +0000 (Tue, 28 Feb 2012) Log Message: ----------- Added rtcntrl method to allow control of the ArcherCore's raytrace control panel from other widgets. Modified Paths: -------------- brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl Modified: brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl =================================================================== --- brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl 2012-02-28 15:06:56 UTC (rev 49567) +++ brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl 2012-02-28 16:07:12 UTC (rev 49568) @@ -136,6 +136,7 @@ method getLastSelectedDir {} method refreshDisplay {} method putString {_str} + method rtcntrl {args} method setStatusString {_str} # Commands exposed to the user via the command line. @@ -4541,6 +4542,12 @@ $itk_component(cmd) putstring $_str } + +::itcl::body ArcherCore::rtcntrl {args} { + eval $itk_component(rtcntrl) $args +} + + ::itcl::body ArcherCore::setStatusString {_str} { set mStatusStr $_str } This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |