--- a/ListSelectionBox.st	Mon Sep 27 12:50:59 2004 +0200
+++ b/ListSelectionBox.st	Wed Sep 29 13:29:28 2004 +0200
@@ -166,6 +166,13 @@
     "Created: 26.2.1996 / 20:05:47 / cg"
 !
 
+initialSelection:selected
+    "select some item in the list"
+
+    
+    selectionList selection:selected
+!
+
 initialText:someString selected:selected
     "in addition to showing the initial text; optionally also select it in the list"
 
@@ -429,5 +436,5 @@
 !ListSelectionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListSelectionBox.st,v 1.55 2004-04-02 17:59:42 werner Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListSelectionBox.st,v 1.56 2004-09-29 11:29:28 cg Exp $'
 ! !