#OTHER expecco_ALM_1_9_7
authorClaus Gittinger <cg@exept.de>
Sat, 16 Jan 2016 01:39:14 +0100
changeset 3249 a322cc9c9193
parent 3248 e92c9691ef33
child 3250 48b1dfb0b16f
#OTHER class: UIPainterView changed: #pasteSpecifications:into:beforeIndex:keepLayout:keepPosition:at: fix: do not give assoc to geometryLayout
UIPainterView.st
--- a/UIPainterView.st	Tue Dec 15 15:04:07 2015 +0100
+++ b/UIPainterView.st	Sat Jan 16 01:39:14 2016 +0100
@@ -488,7 +488,16 @@
             beforeIndex := beforeIndex + 1
         ].
         (keepLayout or:[eachSpec keepUILayout]) ifTrue:[
-            view layout:eachSpec layout.
+            eachSpec layout isAssociation ifTrue:[
+                eachSpec layout key == #extent ifTrue:[
+                    view pixelExtent:eachSpec layout value
+                ] ifFalse:[
+                    "/ self halt.
+                    view geometryLayout:eachSpec layout value
+                ].
+            ] ifFalse:[    
+                view geometryLayout:eachSpec layout.
+            ]
         ] ifFalse:[
             (keepPosition and:[ uiPainterAttributes notNil ]) ifTrue:[
                 aPointOrNilOrKeep == #keep ifTrue:[