#REFACTORING by stefan
authorStefan Vogel <sv@exept.de>
Mon, 08 Aug 2016 17:06:34 +0200
changeset 3725 3fb5cf9108cf
parent 3724 4a753c4710c9
child 3726 37f44a063d46
#REFACTORING by stefan class: DragAndDropManager changed: #displayObjectFor:on: do not send #clarMaskePixels (it is alread done in #onDevice:)
DragAndDropManager.st
--- a/DragAndDropManager.st	Mon Aug 08 14:06:04 2016 +0200
+++ b/DragAndDropManager.st	Mon Aug 08 17:06:34 2016 +0200
@@ -1162,9 +1162,7 @@
             obj := obj onDevice:aDevice
         ].
 
-    obj class == LabelAndIcon ifTrue:[
-        obj image notNil ifTrue:[obj image clearMaskedPixels].
-        obj icon  notNil ifTrue:[obj icon clearMaskedPixels].
+    obj isLabelAndIcon ifTrue:[
         ^ obj
     ].
 
@@ -1175,12 +1173,12 @@
         s1 isImage ifTrue:[
             s2 isImage  ifTrue:[ ^ self displayObjectFor:(LabelAndIcon form:s1  image:s2) on:aDevice ].
             s2 isString ifTrue:[ ^ self displayObjectFor:(LabelAndIcon icon:s1 string:s2) on:aDevice ].
-            ^ (s1 on:aDevice) clearMaskedPixels
+            ^ s1 onDevice:aDevice.
         ].
 
         s2 isImage ifTrue:[
             s1 isString ifTrue:[ ^ self displayObjectFor:(LabelAndIcon icon:s2 string:s1) on:aDevice ].
-            ^ (s2 on:aDevice) clearMaskedPixels
+            ^ s2 onDevice:aDevice.
         ].
 
         s1 isString ifTrue:[^ s1].