--- a/ScrollableView.st	Wed May 28 16:21:11 1997 +0200
+++ b/ScrollableView.st	Fri May 30 05:56:29 1997 +0200
@@ -1061,10 +1061,9 @@
             ].
         ].
 
-        self updateScrollBarVisibility
+       self updateScrollBarVisibility
     ].
 
-    "Modified: 23.4.1997 / 14:00:25 / cg"
 !
 
 updateScrollBarVisibility
@@ -1754,6 +1753,12 @@
 
     "Created: 6.3.1997 / 18:06:24 / cg"
     "Modified: 6.3.1997 / 22:34:30 / cg"
+!
+
+specClass
+    ^ ScrollableViewSpec
+
+
 ! !
 
 !ScrollableView methodsFor:'slave-view messages'!
@@ -1855,5 +1860,5 @@
 !ScrollableView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.66 1997-04-23 12:01:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.67 1997-05-30 03:56:29 ca Exp $'
 ! !