--- a/TabulatorSpecification.st	Fri Nov 10 17:12:22 2000 +0100
+++ b/TabulatorSpecification.st	Tue Nov 14 19:03:56 2000 +0100
@@ -10,6 +10,8 @@
  hereby transferred.
 "
 
+"{ Package: 'stx:libwidg2' }"
+
 Model subclass:#TabulatorSpecification
 	instanceVariableNames:'tabUnit unitReference tabPositions tabTypes'
 	classVariableNames:''
@@ -98,7 +100,7 @@
               colAt:6 put:'1234.56'.
 
         listView at:3 put:entry.
-        listView open
+        (ScrollableView forView:listView) open
                                                                         [exEnd]
 
 
@@ -544,5 +546,5 @@
 !TabulatorSpecification class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/TabulatorSpecification.st,v 1.14 1997-03-28 14:20:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/TabulatorSpecification.st,v 1.15 2000-11-14 18:03:56 cg Exp $'
 ! !