Revision: 56223
          http://sourceforge.net/p/brlcad/code/56223
Author:   bob1961
Date:     2013-07-25 18:47:11 +0000 (Thu, 25 Jul 2013)
Log Message:
-----------
Set the environment's LIBRT_BOT_MINTIE if changing the respective preference in 
Archer. Also, initialize Archer's mRtBotMintie preference if the environment 
has LIBRT_BOT_MINTIE set. This overrides Archer's preference.

Modified Paths:
--------------
    brlcad/trunk/src/tclscripts/archer/Archer.tcl
    brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl

Modified: brlcad/trunk/src/tclscripts/archer/Archer.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/archer/Archer.tcl       2013-07-25 18:47:04 UTC 
(rev 56222)
+++ brlcad/trunk/src/tclscripts/archer/Archer.tcl       2013-07-25 18:47:11 UTC 
(rev 56223)
@@ -9204,6 +9204,11 @@
        }
     }
 
+    if {[info exists env(LIBRT_BOT_MINTIE)]} {
+       # triggers a set of librt's global tcl variable (i.e., rt_bot_mintie) 
via ArcherCore::watchVar{}
+       set mRtBotMintie $env(LIBRT_BOT_MINTIE)
+    }
+
     # This feature has been disabled.
     set mTreeAttrColumns ""
 

Modified: brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl   2013-07-25 18:47:04 UTC 
(rev 56222)
+++ brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl   2013-07-25 18:47:11 UTC 
(rev 56223)
@@ -7201,6 +7201,7 @@
 
 ::itcl::body ArcherCore::watchVar {_name1 _name2 _op} {
     global rt_bot_mintie
+    global env
 
     if {![info exists itk_component(ged)]} {
        return
@@ -7264,6 +7265,7 @@
        }
        mRtBotMintie {
            set rt_bot_mintie $mRtBotMintie
+           set env(LIBRT_BOT_MINTIE) $mRtBotMintie
        }
     }
 }

This was sent by the SourceForge.net collaborative development platform, the 
world's largest Open Source development site.


------------------------------------------------------------------------------
See everything from the browser to the database with AppDynamics
Get end-to-end visibility with application monitoring from AppDynamics
Isolate bottlenecks and diagnose root cause in seconds.
Start your free trial of AppDynamics Pro today!
http://pubads.g.doubleclick.net/gampad/clk?id=48808831&iu=/4140/ostg.clktrk
_______________________________________________
BRL-CAD Source Commits mailing list
brlcad-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/brlcad-commits

Reply via email to