Revision: 55531
http://sourceforge.net/p/brlcad/code/55531
Author: bob1961
Date: 2013-05-22 13:10:07 +0000 (Wed, 22 May 2013)
Log Message:
-----------
Archer mods to initialize a bit of tree state when a database is loaded. This
is related to Archer's rt image view mode.
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-05-22 11:56:01 UTC
(rev 55530)
+++ brlcad/trunk/src/tclscripts/archer/Archer.tcl 2013-05-22 13:10:07 UTC
(rev 55531)
@@ -1750,9 +1750,24 @@
set mDbTitle [$itk_component(ged) title]
set mDbUnits [$itk_component(ged) units -s]
+ set mPrevObjViewMode $OBJ_ATTR_VIEW_MODE
+ set mPrevSelectedObjPath ""
+ set mPrevSelectedObj ""
+ set mSelectedObjPath ""
+ set mSelectedObj ""
+ set mSelectedObjType ""
+ set mColorObjects ""
+ set mGhostObjects ""
+ set mEdgeObjects ""
if {!$mViewOnly} {
initDbAttrView $mTarget
+
+ set mTreeMode $TREE_MODE_TREE
+ set mPrevTreeMode $TREE_MODE_TREE
+ set mPrevTreeMode2 $TREE_MODE_COLOR_OBJECTS
+ toggleTreeView
+
applyPreferences
doLighting
updateWizardMenu
Modified: brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl 2013-05-22 11:56:01 UTC
(rev 55530)
+++ brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl 2013-05-22 13:10:07 UTC
(rev 55531)
@@ -5265,6 +5265,9 @@
set mSelectedObjPath ""
set mSelectedObj ""
set mSelectedObjType ""
+ set mColorObjects ""
+ set mGhostObjects ""
+ set mEdgeObjects ""
if {!$mViewOnly} {
gedCmd size [expr {$mGroundPlaneSize * 1.5 * [gedCmd base2local]}]
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
Try New Relic Now & We'll Send You this Cool Shirt
New Relic is the only SaaS-based application performance monitoring service
that delivers powerful full stack analytics. Optimize and monitor your
browser, app, & servers with just a few lines of code. Try New Relic
and get this awesome Nerd Life shirt! http://p.sf.net/sfu/newrelic_d2d_may
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
