--- a/DebugView.st	Tue May 28 19:05:03 2019 +0200
+++ b/DebugView.st	Tue May 28 19:09:20 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -3867,17 +3869,19 @@
 
     hpanel := VariableHorizontalPanel in:panel.
 
-    receiverInspector := InspectorView
+    receiverInspector := (self inspectorViewClassForReceiver)
                                 origin:(0.0 @ 0.0) corner:(0.5 @ 1.0)
                                     in:hpanel.
-    receiverInspector fieldListLabel:'Receiver'.
-
-    contextInspector := ContextInspectorView
+    receiverInspector fieldListLabel:(resources string:'Receiver').
+
+    contextInspector := (self inspectorViewClassForContext)
                                 origin:(0.5 @ 0.0) corner:(1.0 @ 1.0)
                                     in:hpanel.
-    contextInspector fieldListLabel:'Context'.
+    contextInspector fieldListLabel:(resources string:'Context').
 
     ^ hpanel
+
+    "Modified: / 28-05-2019 / 18:29:30 / Claus Gittinger"
 !
 
 initializeNextButtonIn:bpanel
@@ -4140,6 +4144,24 @@
     "Created: / 28-07-2018 / 11:14:52 / Claus Gittinger"
 !
 
+inspectorViewClassForContext
+    ^ ContextInspectorView
+
+    "Created: / 28-05-2019 / 18:28:28 / Claus Gittinger"
+!
+
+inspectorViewClassForReceiver
+    ^ InspectorView
+
+    "Created: / 28-05-2019 / 18:28:16 / Claus Gittinger"
+!
+
+inspectorViewClassForStack
+    ^ InspectorView
+
+    "Created: / 28-05-2019 / 18:30:08 / Claus Gittinger"
+!
+
 postRealize
     super postRealize.
 
@@ -8356,7 +8378,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:[
@@ -10045,7 +10067,7 @@
     stackInspector isNil ifTrue:[
         receiverInspector origin:(0.0 @ 0.0) corner:0.3 @ 1.0.
         contextInspector origin:(0.3 @ 0.0) corner:(0.6 @ 1.0).
-        stackInspector := InspectorView
+        stackInspector := (self inspectorViewClassForStack)
                     origin:(0.6 @ 0.0)
                     corner:(1.0 @ 1.0)
                     in:contextInspector superView.
@@ -10055,6 +10077,8 @@
     ].
     stackInspector inspect:(con stackFrame asArray).
     stackInspector showLast
+
+    "Modified: / 28-05-2019 / 18:30:02 / Claus Gittinger"
 !
 
 updateContextInfoFor:aContext
@@ -10616,7 +10640,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.