--- a/TerminalApplication.st	Fri Aug 30 10:47:33 2019 +0200
+++ b/TerminalApplication.st	Fri Aug 30 10:47:39 2019 +0200
@@ -600,7 +600,7 @@
     "/ vt backgroundColor:(Color red).
     aView 
         cr; 
-        nextPutLine:('>> shell terminated.' allBold withColor:Color red).
+        nextPutLine:('>> shell terminated.' allBold allRed).
 
     "Modified: / 13-03-2019 / 22:06:31 / Claus Gittinger"
 ! !