Revision: 45384
http://brlcad.svn.sourceforge.net/brlcad/?rev=45384&view=rev
Author: bob1961
Date: 2011-07-05 21:29:24 +0000 (Tue, 05 Jul 2011)
Log Message:
-----------
Fixed the "Affected Tree/List Nodes" behavior.
Modified Paths:
--------------
brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl
Modified: brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl 2011-07-05 20:28:15 UTC
(rev 45383)
+++ brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl 2011-07-05 21:29:24 UTC
(rev 45384)
@@ -3510,8 +3510,8 @@
set mRenderMode [gedCmd how $_node]
# do this in case "ev" was used from the command line
- if {2 < $mRenderMode} {
- set mRenderMode 2
+ if {!$mEnableBigE && 2 < $mRenderMode} {
+ set mRenderMode 0
}
if {$_nodeType == "leaf"} {
@@ -3977,7 +3977,6 @@
if {$mEnableListViewAllAffected} {
foreach path [string trim [gedCmd search / -name $mSelectedObj]] {
set path [regsub {^/} $path {}]
- puts $path
foreach obj [split $path /] {
if {$obj == $mSelectedObj} {
continue
@@ -3999,11 +3998,12 @@
foreach path [string trim [gedCmd search / -name $mSelectedObj]] {
set path [regsub {^/} $path {}]
set pathNodes [getTreeNodes $path]
- set pnodes [lreverse [lindex $pathNodes 0]]
+# set pnodes [lreverse [lindex $pathNodes 0]]
+ set pnodes [lindex $pathNodes 0]
set cnodes [lindex $pathNodes 1]
set found 0
foreach pnode $pnodes {
- if {![$itk_component(newtree) item $pnode -open]} {
+ if {[$itk_component(newtree) item $pnode -open]} {
lappend mAffectedNodeList $pnode
set found 1
addTreeNodeTag $pnode $TREE_AFFECTED_TAG
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
All of the data generated in your IT infrastructure is seriously valuable.
Why? It contains a definitive record of application performance, security
threats, fraudulent activity, and more. Splunk takes this data and makes
sense of it. IT sense. And common sense.
http://p.sf.net/sfu/splunk-d2d-c2
_______________________________________________
BRL-CAD Source Commits mailing list
brlcad-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
