#OTHER expecco_ALM_1_9_7
authorClaus Gittinger <cg@exept.de>
Sat, 16 Jan 2016 01:39:14 +0100
changeset 3249a322cc9c9193
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
     1.1 --- a/UIPainterView.st	Tue Dec 15 15:04:07 2015 +0100
     1.2 +++ b/UIPainterView.st	Sat Jan 16 01:39:14 2016 +0100
     1.3 @@ -488,7 +488,16 @@
     1.4              beforeIndex := beforeIndex + 1
     1.5          ].
     1.6          (keepLayout or:[eachSpec keepUILayout]) ifTrue:[
     1.7 -            view layout:eachSpec layout.
     1.8 +            eachSpec layout isAssociation ifTrue:[
     1.9 +                eachSpec layout key == #extent ifTrue:[
    1.10 +                    view pixelExtent:eachSpec layout value
    1.11 +                ] ifFalse:[
    1.12 +                    "/ self halt.
    1.13 +                    view geometryLayout:eachSpec layout value
    1.14 +                ].
    1.15 +            ] ifFalse:[    
    1.16 +                view geometryLayout:eachSpec layout.
    1.17 +            ]
    1.18          ] ifFalse:[
    1.19              (keepPosition and:[ uiPainterAttributes notNil ]) ifTrue:[
    1.20                  aPointOrNilOrKeep == #keep ifTrue:[