--- a/ScrollableView.st	Fri Mar 07 15:22:13 1997 +0100
+++ b/ScrollableView.st	Fri Mar 07 15:25:27 1997 +0100
@@ -1124,8 +1124,7 @@
 !
 
 setupDimensions
-    |isOpenWin is3D
-     scrolledViewMargin scrollBarSpacing
+    |scrolledViewMargin scrollBarSpacing
      scrolledViewLayout hScrollBarLayout vScrollBarLayout
      vBd         "{ Class: SmallInteger }"
      hBd         "{ Class: SmallInteger }"
@@ -1294,8 +1293,7 @@
 setupVertical:isVertical mini:miniV horizontal:isHorizontal mini:miniH 
     "setup scrollbars as specified in the arguments"
 
-    |noMiniScrollers negativeOffset twoMargins halfMargin cls isST80 isOpenWin is3D lvl extra
-     scrollBarSpacing|
+    |noMiniScrollers cls|
 
     noMiniScrollers := styleSheet at:'scrollBarNeverMini' default:false.
 
@@ -1529,5 +1527,5 @@
 !ScrollableView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.49 1997-03-07 14:19:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.50 1997-03-07 14:25:27 cg Exp $'
 ! !