--- a/DebugView.st	Thu Aug 22 21:12:36 2013 +0200
+++ b/DebugView.st	Thu Aug 22 21:16:25 2013 +0200
@@ -8022,7 +8022,7 @@
                     ]
                 ].
                 method notNil ifTrue:[
-                    contextInspector fieldListLabel:(method whoString).
+                    contextInspector fieldListLabel:(method selector "whoString").
                     Error handle:[:ex |
 "/ not covered by Error, anyway
 "/                        ex signal isControlInterrupt ifTrue:[
@@ -8172,7 +8172,7 @@
             ].
 
             receiverInspector inspect:rec.
-            receiverInspector fieldListLabel:('Receiver: ',rec classNameWithArticle).
+            receiverInspector fieldListLabel:("'Receiver: ',"rec classNameWithArticle).
             receiverInspector tryToSelectKeyNamed:lastSelectionInReceiverInspector.
 
             "
@@ -8568,15 +8568,15 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.609 2013-08-21 11:15:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.610 2013-08-22 19:16:25 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.609 2013-08-21 11:15:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.610 2013-08-22 19:16:25 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: DebugView.st,v 1.609 2013-08-21 11:15:19 cg Exp $'
+    ^ '$Id: DebugView.st,v 1.610 2013-08-22 19:16:25 cg Exp $'
 ! !