--- a/UIPainterView.st	Sat May 14 15:41:12 2016 +0200
+++ b/UIPainterView.st	Fri May 20 14:45:31 2016 +0200
@@ -1017,7 +1017,7 @@
     ].
 
     codeStream  
-        nextPutAll:'    Transcript showCR:self class name, '': '.
+        nextPutAll:'    Logger info:'''.
 
     alreadyInSuperclass ifTrue:[
         codeStream