equal
deleted
inserted
replaced
3654 "select line, aNumber or deselect if argument is nil; |
3654 "select line, aNumber or deselect if argument is nil; |
3655 scroll to make the selected line visible. |
3655 scroll to make the selected line visible. |
3656 *** No model and/or actionBlock notification is done here." |
3656 *** No model and/or actionBlock notification is done here." |
3657 |
3657 |
3658 self selectWithoutScroll:aNumberOrNil. |
3658 self selectWithoutScroll:aNumberOrNil. |
3659 selection notNil ifTrue:[ |
3659 ((multipleSelectOk and:[selection size > 0]) |
|
3660 or:[multipleSelectOk not and:[selection notNil]]) ifTrue:[ |
3660 self makeSelectionVisible |
3661 self makeSelectionVisible |
3661 ] |
3662 ] |
3662 |
3663 |
3663 "Created: / 25.5.1996 / 12:23:18 / cg" |
3664 "Created: / 25.5.1996 / 12:23:18 / cg" |
3664 "Modified: / 7.8.1998 / 13:36:42 / cg" |
3665 "Modified: / 7.8.1998 / 13:36:42 / cg" |
3691 ! ! |
3692 ! ! |
3692 |
3693 |
3693 !SelectionInListView class methodsFor:'documentation'! |
3694 !SelectionInListView class methodsFor:'documentation'! |
3694 |
3695 |
3695 version |
3696 version |
3696 ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.169 2000-02-24 18:20:00 cg Exp $' |
3697 ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.170 2000-03-21 10:48:00 cg Exp $' |
3697 ! ! |
3698 ! ! |