Mercurial Mercurial > hg > stx-libtool2 / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
UIPainterView.st
changeset 2388 17bbaf777e08
parent 2387 050c6d4d427d
child 2390 07303d4b4e78
equal deleted inserted replaced
2387:050c6d4d427d 2388:17bbaf777e08 
   456 
   456 
   457     specsToPaste do:[:eachSpec|
 
   457     specsToPaste do:[:eachSpec|
 
   458         |view newOrigin uiPainterAttributes thisAbsOrigin|
 
   458         |view newOrigin uiPainterAttributes thisAbsOrigin|
 
   459 
   459 
   460         uiPainterAttributes := eachSpec otherAttributeAt:#uiPainterAttributes.
 
   460         uiPainterAttributes := eachSpec otherAttributeAt:#uiPainterAttributes.
 
   461 "/        eachSpec otherAttributeAt:#uiPainterAttributes put:nil.
 
   461         eachSpec otherAttributeAt:#uiPainterAttributes put:nil.
 
   462 
   462 
   463         view := self addSpec:eachSpec builder:builder in:containerToPasteInto.
 
   463         view := self addSpec:eachSpec builder:builder in:containerToPasteInto.
 
   464 
   464 
   465         (keepPosition and:[ uiPainterAttributes notNil ]) ifTrue:[
 
   465         (keepPosition and:[ uiPainterAttributes notNil ]) ifTrue:[
 
   466             aPointOrNilOrKeep == #keep ifTrue:[
 
   466             aPointOrNilOrKeep == #keep ifTrue:[
hg/stx-libtool2