--- a/DebugView.st Tue Jun 26 20:00:15 2018 +0200
+++ b/DebugView.st Wed Jun 27 17:17:42 2018 +0200
@@ -7777,7 +7777,7 @@
].
s := Text streamContents:[:s | aContext printWithSeparator:' ยป ' on:s ].
-s infoPrintCR.
+ "/ s infoPrintCR.
RememberedCallChain notNil ifTrue:[
(RememberedCallChain includesIdentical:aContext) ifTrue:[
s := s withColor:#red.
@@ -7787,7 +7787,7 @@
].
"Created: / 21-05-2007 / 13:30:24 / cg"
- "Modified: / 26-06-2018 / 19:15:12 / Claus Gittinger"
+ "Modified: / 27-06-2018 / 17:15:47 / Claus Gittinger"
!
is:aHomeContext inCallingChainOf:aContext