--- a/DebugView.st	Fri Aug 30 10:43:14 2019 +0200
+++ b/DebugView.st	Fri Aug 30 10:43:39 2019 +0200
@@ -4431,7 +4431,7 @@
         ].
         
         exceptionInfoLabel 
-            helpText:(((resources stringWithCRs:'Error description:\') withColor:Color gray)
+            helpText:(((resources stringWithCRs:'Error description:\') allGray)
                           ,(lines asStringWith:Character cr)).
     ].
 
@@ -8248,7 +8248,7 @@
 !
 
 showWarning:aString
-    infoLabelHolder value:(aString withColor:Color red)
+    infoLabelHolder value:(aString allRed)
 
     "Created: / 02-07-2019 / 21:27:03 / Claus Gittinger"
 !
@@ -10786,7 +10786,7 @@
 
 "/                code ~= (codeView contents) ifTrue:[
                     cannotAcceptDueToOutdatedClass ifTrue:[
-                        codeView setContents:(('Obsolete code (outdated due to class change). Use Browser.' withColor:Color red),Character cr,Character cr,code asString).
+                        codeView setContents:(('Obsolete code (outdated due to class change). Use Browser.' allRed),Character cr,Character cr,code asString).
                     ] ifFalse:[
                         codeView setContents:code.
                     ].