equal
deleted
inserted
replaced
381 |
381 |
382 sel := self |
382 sel := self |
383 pasteSpecifications:(self getClipboardObject) |
383 pasteSpecifications:(self getClipboardObject) |
384 keepLayout:true |
384 keepLayout:true |
385 keepPosition:true |
385 keepPosition:true |
386 at:nil. |
386 at:#keep. |
387 |
387 |
388 self changeSelectionAfterPasteOf:sel. |
388 self changeSelectionAfterPasteOf:sel. |
389 ! |
389 ! |
390 |
390 |
391 pasteSpecifications:aSpecificationOrList into:aContainerOrNil beforeIndex:anIndexOrNil keepLayout:keepLayout keepPosition:keepPosition at:aPointOrNilOrKeep |
391 pasteSpecifications:aSpecificationOrList into:aContainerOrNil beforeIndex:anIndexOrNil keepLayout:keepLayout keepPosition:keepPosition at:aPointOrNilOrKeep |
551 ^ newSel |
551 ^ newSel |
552 |
552 |
553 "Modified: / 03-11-2010 / 07:20:06 / cg" |
553 "Modified: / 03-11-2010 / 07:20:06 / cg" |
554 ! |
554 ! |
555 |
555 |
556 pasteSpecifications:aSpecificationOrList into:aContainerOrNil keepLayout:keepLayout keepPosition:keepPosition at:aPointOrNilOrKeep |
556 pasteSpecifications:aSpecificationOrList into:aContainerOrNil keepLayout:keepLayout keepPosition:keepPosition at:aPointOrNilOrKeep |
557 "add the specs to the object view; returns list of pasted widgets" |
557 "add the specs to the object view; returns list of pasted widgets" |
558 |
558 |
559 ^ self pasteSpecifications:aSpecificationOrList |
559 ^ self |
560 into:aContainerOrNil |
560 pasteSpecifications:aSpecificationOrList |
561 beforeIndex:nil |
561 into:aContainerOrNil |
562 keepLayout:keepLayout |
562 beforeIndex:nil |
563 keepPosition:keepPosition |
563 keepLayout:keepLayout |
564 at:aPointOrNilOrKeep |
564 keepPosition:keepPosition |
|
565 at:aPointOrNilOrKeep |
565 ! |
566 ! |
566 |
567 |
567 pasteSpecifications:aSpecificationOrList keepLayout:keepLayout |
568 pasteSpecifications:aSpecificationOrList keepLayout:keepLayout |
568 "add the specs to the object view; returns list of pasted widgets" |
569 "add the specs to the object view; returns list of pasted widgets" |
569 |
570 |