--- a/SelectionInTree.st	Sun Mar 07 14:30:12 1999 +0100
+++ b/SelectionInTree.st	Sun Mar 07 14:34:56 1999 +0100
@@ -702,6 +702,17 @@
     ]
 !
 
+selectNodes:aCollectionOfNodes
+    | indices|
+
+    indices := aCollectionOfNodes collect:[:aNode | self indexOf:aNode].
+    indices := indices select:[:idx | idx ~~ 0].
+    indices sort.
+    self selectionIndex:indices
+
+    "Created: / 6.3.1999 / 22:37:59 / cg"
+!
+
 selectedNode
     "returns selected node or nil
     "
@@ -882,5 +893,5 @@
 !SelectionInTree class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.24 1999-02-22 21:04:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.25 1999-03-07 13:34:56 cg Exp $'
 ! !