equal
deleted
inserted
replaced
7 inclusion of the above copyright notice. This software may not |
7 inclusion of the above copyright notice. This software may not |
8 be provided or otherwise made available to, or used by, any |
8 be provided or otherwise made available to, or used by, any |
9 other person. No title to or ownership of the software is |
9 other person. No title to or ownership of the software is |
10 hereby transferred. |
10 hereby transferred. |
11 " |
11 " |
12 |
|
13 |
|
14 |
|
15 "{ Package: 'stx:libwidg2' }" |
12 "{ Package: 'stx:libwidg2' }" |
16 |
13 |
17 Model subclass:#SelectionInTree |
14 Model subclass:#SelectionInTree |
18 instanceVariableNames:'root list selection showRoot contentsAction labelAction |
15 instanceVariableNames:'root list selection showRoot contentsAction labelAction |
19 childrenAction iconAction indicatorList indicatorTask accessLock' |
16 childrenAction iconAction indicatorList indicatorTask accessLock' |
809 " |
806 " |
810 ^ self selectionIndex |
807 ^ self selectionIndex |
811 ! |
808 ! |
812 |
809 |
813 selection:indexesOrNil |
810 selection:indexesOrNil |
814 "set the selection |
811 "set the selection" |
815 " |
812 |
816 self selectionIndex:indexesOrNil |
813 self selectionIndex:indexesOrNil |
817 ! |
814 ! |
818 |
815 |
819 selectionIndex |
816 selectionIndex |
820 "get the selection or nil |
817 "get the selection or nil |
941 ! ! |
938 ! ! |
942 |
939 |
943 !SelectionInTree class methodsFor:'documentation'! |
940 !SelectionInTree class methodsFor:'documentation'! |
944 |
941 |
945 version |
942 version |
946 ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.34 2005-08-02 13:14:45 cg Exp $' |
943 ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.35 2010-02-01 12:20:01 cg Exp $' |
947 ! ! |
944 ! |
|
945 |
|
946 version_CVS |
|
947 ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.35 2010-02-01 12:20:01 cg Exp $' |
|
948 ! ! |