diff -r 8374dee8a360 -r dd2673cfffd1 DebugView.st
--- a/DebugView.st	Wed Feb 11 13:19:35 2015 +0100
+++ b/DebugView.st	Wed Feb 11 15:27:00 2015 +0100
@@ -4033,16 +4033,16 @@
                         ].
                         where := where sender
                     ].
-                    s := 'context returned'.
+                    s := 'Debugger: context returned'.
                     subBlockLeft := true.
                 ].
             ] ifTrue:[
 "/ 'found it right in sender' printCR.
-                s := 'after step'
+                s := 'Debugger: after step'
             ].
         ] ifTrue:[
 "/ 'found it right away' printCR.
-            s := 'after step'
+            s := 'Debugger: after step'
         ].
     ] ifFalse:[
 "/ ' send' printCR.
@@ -4053,7 +4053,7 @@
             'clear steppedContext' printCR.
         ].
         steppedContext := nil.
-        s := 'after send'
+        s := 'Debugger: after send'
     ].
 
     ignore := false.
@@ -4067,7 +4067,7 @@
     subBlockLeft ifTrue:[
         steppedContext home notNil ifTrue:[
             steppedContext := steppedContext home.
-            s := 'after step'.
+            s := 'Debugger: after step'.
             subBlockLeft := false.
 "/ DebugView enterUnconditional:thisContext withMessage:'debug'.
 
@@ -4126,7 +4126,7 @@
         steppedContext lineNumber isNil ifTrue:[
             steppedContext selector == here sender selector ifTrue:[
                 subBlockLeft := false.
-                s := 'after step'.
+                s := 'Debugger: after step'.
                 steppedContext := here sender.
             ].
         ].
@@ -4137,7 +4137,7 @@
         DebuggingDebugger2 == true ifTrue:[
             'inBlock' printCR.
         ].
-        s := 'in block'.
+        s := 'Debugger: in block'.
     ].
     inBlockBelow ifTrue:[
         DebuggingDebugger2 == true ifTrue:[
@@ -9483,15 +9483,15 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.678 2015-02-11 10:49:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.679 2015-02-11 14:27:00 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.678 2015-02-11 10:49:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.679 2015-02-11 14:27:00 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: DebugView.st,v 1.678 2015-02-11 10:49:06 cg Exp $'
+    ^ '$Id: DebugView.st,v 1.679 2015-02-11 14:27:00 cg Exp $'
 ! !