--- a/ListSelectionBox.st	Wed Oct 04 20:44:39 2000 +0200
+++ b/ListSelectionBox.st	Sat Oct 07 13:57:36 2000 +0200
@@ -218,7 +218,8 @@
     space2 := 2 * ViewSpacing.
     halfSpace := ViewSpacing // 2.
 
-    v := ScrollableView for:(self class listViewType) in:self.
+    v := HVScrollableView for:(self class listViewType) in:self.
+    v horizontalScrollable:true; horizontalMini:true; autoHideHorizontalScrollBar:true.
 
 "/ old:
 "/    v origin:[0.0
@@ -376,5 +377,5 @@
 !ListSelectionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListSelectionBox.st,v 1.43 2000-10-04 18:44:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListSelectionBox.st,v 1.44 2000-10-07 11:57:36 cg Exp $'
 ! !