SelectionInList.st
changeset 6619 e042a2f30428
parent 6259 ebe33a983e14
--- a/SelectionInList.st	Thu Jun 27 19:09:15 2019 +0200
+++ b/SelectionInList.st	Fri Jun 28 09:12:15 2019 +0200
@@ -412,12 +412,13 @@
     ].
 
     aGCOrStream 
-        nextPutAll:self class name;
+        nextPutAll:self className;
         nextPut:$(.
     self selectionIndex displayOn:aGCOrStream. 
     aGCOrStream nextPut:$)
 
     "Modified (comment): / 22-02-2017 / 16:52:55 / cg"
+    "Modified: / 28-06-2019 / 09:11:54 / Claus Gittinger"
 ! !
 
 !SelectionInList methodsFor:'private'!