--- a/SelectionInTreeView.st	Sat Jan 30 18:07:02 1999 +0100
+++ b/SelectionInTreeView.st	Fri Feb 05 12:00:47 1999 +0100
@@ -1241,6 +1241,16 @@
         (     (node := self selectedNode) notNil
          and:[(menu := node middleButtonMenu) notNil]
         ) ifTrue:[
+            menu isCollection ifTrue:[
+                |appl|
+
+                menu := Menu new fromLiteralArrayEncoding:menu.
+
+                (appl := self application) notNil ifTrue:[
+                    menu findGuiResourcesIn:appl
+                ].
+                menu receiver:appl.
+            ].
             menu startUp
         ] ifFalse:[
             super buttonPress:button x:x y:y
@@ -2312,5 +2322,5 @@
 !SelectionInTreeView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.70 1998-11-01 12:57:46 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.71 1999-02-05 11:00:47 tm Exp $'
 ! !