equal
deleted
inserted
replaced
669 selection |
669 selection |
670 ^ selection |
670 ^ selection |
671 ! |
671 ! |
672 |
672 |
673 selection:aSelection |
673 selection:aSelection |
674 |appl view slice| |
674 |appl slice| |
675 |
675 |
676 selection = aSelection ifFalse:[ |
676 selection = aSelection ifFalse:[ |
677 (selection := aSelection) notNil ifTrue:[ |
677 (selection := aSelection) notNil ifTrue:[ |
678 slice := self selectedSlice. |
678 slice := self selectedSlice. |
679 appl := slice last asString. |
679 appl := slice last asString. |
859 !UILayoutTool::AlignmentOrigin methodsFor:'accessing'! |
859 !UILayoutTool::AlignmentOrigin methodsFor:'accessing'! |
860 |
860 |
861 fetch:aView |
861 fetch:aView |
862 "fetch alignmentOrigin |
862 "fetch alignmentOrigin |
863 " |
863 " |
864 |layout type extent| |
864 |layout type| |
865 |
865 |
866 type := UIPainterView layoutType:aView. |
866 type := UIPainterView layoutType:aView. |
867 layout := aView geometryLayout. |
867 layout := aView geometryLayout. |
868 |
868 |
869 layout isLayout ifTrue:[ |
869 layout isLayout ifTrue:[ |