#QUALITY by cg
authorClaus Gittinger <cg@exept.de>
Sun, 01 May 2016 23:15:08 +0200
changeset 3287 0bddeff854d4
parent 3286 1ea9a6fbe2b4
child 3288 4edb3ebfe446
#QUALITY by cg class: UIPainterView give a warning for ignored messages
UIPainterView.st
--- a/UIPainterView.st	Thu Apr 28 22:36:49 2016 +0200
+++ b/UIPainterView.st	Sun May 01 23:15:08 2016 +0200
@@ -3106,8 +3106,9 @@
 
 doesNotUnderstand:aMessage
     spec notNil ifTrue:[
-	(spec respondsTo:(aMessage selector)) ifTrue:[^ aMessage sendTo:spec]
+        (spec respondsTo:(aMessage selector)) ifTrue:[^ aMessage sendTo:spec]
     ].
+    ('[UIPainter::ViewProperty] warning: message ignored: ',aMessage selector) errorPrintCR.
     ^ nil
 !