--- a/InspectorView.st	Fri Nov 28 11:30:22 2014 +0100
+++ b/InspectorView.st	Fri Nov 28 13:02:10 2014 +0100
@@ -2293,19 +2293,26 @@
     ].
 
     InterestConverter allInstances 
-        select:[:i | i destination isMessage
-                     and:[i class == MessageSend
-                     and:[i selector == #value
-                     and:[i receiver == object ]]]]
+        select:[:i | |dest|
+                     dest := i destination.
+                     dest class == MessageSend
+                     and:[dest selector == #value
+                     and:[dest receiver == object ]]]
         thenDo:[:i | selectors add:(i selector)].
 
+    selectors isEmpty ifTrue:[
+        Dialog information:'I found no update/interest messages to trap.'.
+        ^ self.
+    ].
+
     (Dialog 
         confirm:('About to place an instance trap on the following selectors:\\' withCRs
                     , (selectors asOrderedCollection sort asStringWith:'\' withCRs)))
         ifFalse:[ ^ self].
 
-    self topView withWaitCursorDo:[MessageTracer trap:object 
-                                                 selectors:selectors]
+    self topView withWaitCursorDo:[
+        MessageTracer trap:object selectors:selectors
+    ]
 
     "Created: / 16-07-2013 / 19:56:08 / cg"
 !
@@ -3969,10 +3976,10 @@
 !InspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.338 2014-11-07 19:32:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.339 2014-11-28 12:02:10 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.338 2014-11-07 19:32:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.339 2014-11-28 12:02:10 cg Exp $'
 ! !