--- a/DebugView.st	Thu Aug 24 18:03:12 2017 +0200
+++ b/DebugView.st	Thu Aug 24 18:04:06 2017 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -8942,12 +8940,12 @@
                                         initialAnswer:implementorClass name
                                         list:(implementorClass withAllSuperclasses collect:[:each| each name]).
                 implementorClass size == 0 ifTrue:[
-                    ^ cancelAction value "/ cancelled
+                    ^ cancelAction value "/ canceled
                 ].
                 implementorClass := Smalltalk classNamed:implementorClass.
                 implementorClass isNil ifTrue:[
                     Dialog warn:'No such class'.
-                    ^ cancelAction value "/ cancelled
+                    ^ cancelAction value "/ canceled
                 ].
             ].
         ].
@@ -8962,6 +8960,7 @@
 
     "Created: / 17-11-2001 / 21:50:55 / cg"
     "Modified: / 29-08-2006 / 14:22:22 / cg"
+    "Modified (comment): / 24-08-2017 / 14:57:53 / cg"
 !
 
 codeCompletion
@@ -9708,7 +9707,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.