UIPainterView.st
changeset 3244 6b83ffb461b5
parent 3223 38d493fcc782
child 3249 a322cc9c9193
equal deleted inserted replaced
3243:792a37911b41 3244:6b83ffb461b5
   485 
   485 
   486         view := self addSpec:eachSpec builder:builder in:containerToPasteInto beforeIndex:beforeIndex.
   486         view := self addSpec:eachSpec builder:builder in:containerToPasteInto beforeIndex:beforeIndex.
   487         beforeIndex notNil ifTrue:[
   487         beforeIndex notNil ifTrue:[
   488             beforeIndex := beforeIndex + 1
   488             beforeIndex := beforeIndex + 1
   489         ].
   489         ].
   490         eachSpec keepUILayout ifTrue:[
   490         (keepLayout or:[eachSpec keepUILayout]) ifTrue:[
   491             view layout:eachSpec layout.
   491             view layout:eachSpec layout.
   492         ] ifFalse:[
   492         ] ifFalse:[
   493             (keepPosition and:[ uiPainterAttributes notNil ]) ifTrue:[
   493             (keepPosition and:[ uiPainterAttributes notNil ]) ifTrue:[
   494                 aPointOrNilOrKeep == #keep ifTrue:[
   494                 aPointOrNilOrKeep == #keep ifTrue:[
   495                     newOrigin := uiPainterAttributes at:#origin.
   495                     newOrigin := uiPainterAttributes at:#origin.