UIPainterView.st
changeset 2367 6684f50b22cd
parent 2366 69ed2aeb7e3d
child 2369 98871b82aa87
equal deleted inserted replaced
2366:69ed2aeb7e3d 2367:6684f50b22cd
   535 pasteWithoutLayout
   535 pasteWithoutLayout
   536     "add the objects in the paste-buffer to the object view"
   536     "add the objects in the paste-buffer to the object view"
   537 
   537 
   538     |sel|
   538     |sel|
   539 
   539 
   540     sel := self pasteSpecifications:(self getClipboardObject) keepLayout:false.
   540     sel := self 
       
   541             pasteSpecifications:(self getClipboardObject)
       
   542             keepLayout:false
       
   543             keepPosition:true
       
   544             at:#keep.
   541     self changeSelectionAfterPasteOf:sel.
   545     self changeSelectionAfterPasteOf:sel.
   542 !
   546 !
   543 
   547 
   544 replaceSelectionBy:aNewSpec
   548 replaceSelectionBy:aNewSpec
   545     "replace the selected widget by another one."
   549     "replace the selected widget by another one."