equal
deleted
inserted
replaced
362 ^ self selectionIndexHolder:aValueHolder |
362 ^ self selectionIndexHolder:aValueHolder |
363 |
363 |
364 "Modified: 24.4.1996 / 08:43:43 / cg" |
364 "Modified: 24.4.1996 / 08:43:43 / cg" |
365 ! ! |
365 ! ! |
366 |
366 |
|
367 !SelectionInList methodsFor:'printing & storing'! |
|
368 |
|
369 displayString |
|
370 ^ self class name , '(' , self selectionIndex displayString , ')' |
|
371 |
|
372 "Modified: 21.2.1997 / 16:30:38 / cg" |
|
373 ! ! |
|
374 |
367 !SelectionInList methodsFor:'private'! |
375 !SelectionInList methodsFor:'private'! |
368 |
376 |
369 clearSelection |
377 clearSelection |
370 "clear the selection. |
378 "clear the selection. |
371 For ST-80 compatibility, a non-selection has an index of 0 |
379 For ST-80 compatibility, a non-selection has an index of 0 |
392 ! ! |
400 ! ! |
393 |
401 |
394 !SelectionInList class methodsFor:'documentation'! |
402 !SelectionInList class methodsFor:'documentation'! |
395 |
403 |
396 version |
404 version |
397 ^ '$Header: /cvs/stx/stx/libwidg/SelectionInList.st,v 1.17 1997-01-25 17:52:19 cg Exp $' |
405 ^ '$Header: /cvs/stx/stx/libwidg/SelectionInList.st,v 1.18 1997-02-21 15:35:37 cg Exp $' |
398 ! ! |
406 ! ! |