--- a/DebugView.st	Mon Aug 06 16:23:45 2018 +0200
+++ b/DebugView.st	Tue Aug 07 08:23:38 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -3059,7 +3057,8 @@
 
     withConfirmation ifTrue:[
         self checkIfCodeIsReallyModified ifTrue:[
-            (self confirm:('Code was modified.\\Exit anyway ?'))
+            self topView raiseDeiconified.
+            (self confirm:('Debugged code was modified.\\Exit anyway ?'))
             ifFalse:[
                 ^ self
             ]
@@ -3106,6 +3105,7 @@
 
     "Modified: / 10-07-1997 / 17:15:41 / stefan"
     "Created: / 23-03-2012 / 12:49:50 / cg"
+    "Modified: / 07-08-2018 / 08:21:10 / Claus Gittinger"
 !
 
 initialize
@@ -7830,7 +7830,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:[
@@ -10018,7 +10018,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.