# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1452904754 -3600
# Node ID a322cc9c9193f6ac04522b036729e022ca12cadc
# Parent  e92c9691ef33b7dfbf50a7be82df84050de1505f
#OTHER
class: UIPainterView
changed: #pasteSpecifications:into:beforeIndex:keepLayout:keepPosition:at:
fix: do not give assoc to geometryLayout

diff -r e92c9691ef33 -r a322cc9c9193 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:[