# HG changeset patch
# User Stefan Vogel <sv@exept.de>
# Date 1483452287 -3600
# Node ID a0ef44e63e6fddc4c6e18c32bb1e816c7a353ed7
# Parent  033c21371bea97648c3c6446acd7239dd06c280c
#REFACTORING by stefan
class: UIPainter
changed: #doGenerateAspectMethodFor
    use #includes: instead of #contains:

diff -r 033c21371bea -r a0ef44e63e6f UIPainter.st
--- a/UIPainter.st	Tue Jan 03 15:00:15 2017 +0100
+++ b/UIPainter.st	Tue Jan 03 15:04:47 2017 +0100
@@ -5950,14 +5950,13 @@
 
     aspectList := OrderedCollection new.
 
-    self painter aspectSelectorsAndTypesDo:
-        [:selector :type |
+    self painter aspectSelectorsAndTypesDo:[:selector :type |
             |newEntry|
 
             ( #(#modelAspect channelAspect actionSelector valueSelector) includes:type) ifTrue:[
                 ((cls canUnderstand:selector) or:[cls class canUnderstand:selector]) ifFalse:[
                     newEntry := Array with:selector with:type.    
-                    (aspectList contains:[:entry | entry = newEntry]) ifFalse:[    
+                    (aspectList includes:newEntry) ifFalse:[    
                         aspectList add:newEntry.
                     ]
                 ]