--- a/ExternalStreamMonitor.st	Mon Oct 29 15:53:12 2018 +0100
+++ b/ExternalStreamMonitor.st	Mon Oct 29 17:07:21 2018 +0100
@@ -173,8 +173,8 @@
 
 
     "
-     MenuEditor new openOnClass:ExternalStreamMonitor andSelector:#filterMenu
-     (Menu new fromLiteralArrayEncoding:(ExternalStreamMonitor filterMenu)) startUp
+     MenuEditor new openOnClass:ExternalStreamMonitor andSelector:#operationsMenu
+     (Menu new fromLiteralArrayEncoding:(ExternalStreamMonitor operationsMenu)) startUp
     "
 
     <resource: #menu>
@@ -193,12 +193,14 @@
             label: 'Inspect'
             itemValue: inspectStream
           )
+         (MenuItem
+            label: 'Owners'
+            itemValue: inspectOwners
+          )
          )
         nil
         nil
       )
-
-    "Created: / 07-04-2017 / 14:22:18 / cg"
 ! !
 
 !ExternalStreamMonitor methodsFor:'aspects'!
@@ -465,6 +467,16 @@
 
 !ExternalStreamMonitor methodsFor:'menu'!
 
+selectedStreams
+    "return all selected streams"
+
+    ^ Array streamContents:[:s |
+        self selectedStreamsDo:[:each | s nextPut:each]
+    ].
+
+    "Created: / 29-10-2018 / 17:00:35 / Claus Gittinger"
+!
+
 selectedStreamsDo:aBlock
     "evaluate aBlock on all selected streams"
 
@@ -595,12 +607,10 @@
 menuReferences
     "show references to the selected stream"
 
-    self selectedStreamsDo:[:eachStream |
-        (ReferenceFinder findAllPathsTo:eachStream) inspect
-        "/ eachStream allReferences inspect
-    ]
+    ObjectMemory displayRefChainToAny:(self selectedStreams) limitNumberOfSearchedReferences:100.
 
     "Modified (format): / 07-04-2017 / 14:27:45 / cg"
+    "Modified: / 29-10-2018 / 17:01:00 / Claus Gittinger"
 ! !
 
 !ExternalStreamMonitor class methodsFor:'documentation'!