--- a/DebugView.st	Thu Sep 05 15:47:06 2019 +0200
+++ b/DebugView.st	Fri Sep 06 09:59:35 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -1415,6 +1417,11 @@
             isVisible: false
           )
          (MenuItem
+            enabled: canBrowseReceiversClass
+            label: 'Inspect Receiver'
+            itemValue: inspectReceiver
+          )
+         (MenuItem
             enabled: canBrowseProcessesApplication
             label: 'Inspect Application'
             itemValue: inspectProcessesApplication
@@ -6621,6 +6628,18 @@
     ].
 !
 
+inspectReceiver
+    "launch an inspector on the currently selected context's receiver"
+
+    |con|
+
+    (con := self selectedContext) notNil ifTrue:[
+        con receiver inspect.
+    ]
+
+
+!
+
 inspectWidgetHierarchy
     |rcvr view app|
 
@@ -9053,7 +9072,7 @@
                 ]
             ].
 
-            s := Text streamContents:[:s | aContext printWithSeparator:' » ' on:s ].
+            s := Text streamContents:[:s | aContext printWithSeparator:' » ' on:s ].
             "/ s infoPrintCR.
             RememberedCallChain notNil ifTrue:[
                 (RememberedCallChain includesIdentical:aContext) ifTrue:[
@@ -10957,7 +10976,7 @@
 
 printConditionOn:aStream
     ignoredSendingClassAndSelectors notEmptyOrNil ifTrue:[
-        aStream nextPutAll:(' if called from %1 » %2'
+        aStream nextPutAll:(' if called from %1 » %2'
                                 bindWith:ignoredSendingClassAndSelectors first first
                                 with:ignoredSendingClassAndSelectors first second).
         ^ self.