Revision: 46314
http://brlcad.svn.sourceforge.net/brlcad/?rev=46314&view=rev
Author: bob1961
Date: 2011-08-22 20:37:48 +0000 (Mon, 22 Aug 2011)
Log Message:
-----------
Updated ArcherCore::selectTreePath to make the selected tree item visible.
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-08-22 15:43:04 UTC
(rev 46313)
+++ brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl 2011-08-22 20:37:48 UTC
(rev 46314)
@@ -4081,6 +4081,7 @@
set mSelectedObj $obj
set mSelectObjPath $obj
$itk_component(newtree) selection set [lindex [lindex $mText2Node($obj)
0] 0]
+ $itk_component(newtree) see [lindex [lindex $mText2Node($obj) 0] 0]
} else {
getTreeNode $_path 1
set snode [$itk_component(newtree) focus]
@@ -4092,6 +4093,7 @@
} else {
set mSelectedObj $obj
$itk_component(newtree) selection set $snode
+ $itk_component(newtree) see $snode
foreach pnode [lreverse [findTreeParentNodes $snode]] {
append mSelectedObjPath $mNode2Text($pnode) "/"
}
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
uberSVN's rich system and user administration capabilities and model
configuration take the hassle out of deploying and managing Subversion and
the tools developers use with it. Learn more about uberSVN and get a free
download at: http://p.sf.net/sfu/wandisco-dev2dev
_______________________________________________
BRL-CAD Source Commits mailing list
brlcad-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
