--- a/SelList.st Fri Feb 21 16:02:50 1997 +0100
+++ b/SelList.st Fri Feb 21 16:35:37 1997 +0100
@@ -364,6 +364,14 @@
"Modified: 24.4.1996 / 08:43:43 / cg"
! !
+!SelectionInList methodsFor:'printing & storing'!
+
+displayString
+ ^ self class name , '(' , self selectionIndex displayString , ')'
+
+ "Modified: 21.2.1997 / 16:30:38 / cg"
+! !
+
!SelectionInList methodsFor:'private'!
clearSelection
@@ -394,5 +402,5 @@
!SelectionInList class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Attic/SelList.st,v 1.17 1997-01-25 17:52:19 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Attic/SelList.st,v 1.18 1997-02-21 15:35:37 cg Exp $'
! !