--- a/VariableVerticalPanel.st	Sat Jan 08 18:30:02 1994 +0100
+++ b/VariableVerticalPanel.st	Sat Jan 08 18:31:31 1994 +0100
@@ -16,7 +16,7 @@
                                 shadowForm lightForm
                                 handlePosition 
                                 handleColor noColor'
-         classVariableNames:'arrow defaultPosition'
+         classVariableNames:''
          poolDictionaries:''
          category:'Views-Layout'
 !
@@ -32,7 +32,7 @@
 The bar-handle is either an exposed knob (style == #motif)
 or the forms defined in Scroller (style ~~ #motif)
 
-$Header: /cvs/stx/stx/libwidg/VariableVerticalPanel.st,v 1.4 1993-12-11 01:50:56 claus Exp $
+$Header: /cvs/stx/stx/libwidg/VariableVerticalPanel.st,v 1.5 1994-01-08 17:31:30 claus Exp $
 
 written summer 91 by claus
 '!
@@ -57,12 +57,6 @@
     super initialize.
     noColor := Color noColor.
     handleColor := Black.
-    self is3D ifTrue:[
-        self barHeight:(3 * ViewSpacing)
-    ] ifFalse:[
-        self barHeight:(2 * ViewSpacing)
-    ].
-    barWidth := 2 * ViewSpacing "motif style width"
 !
 
 initStyle
@@ -81,7 +75,13 @@
         defaultPosition := #right
     ].
     handlePosition := resources at:'HANDLE_POSITION' default:defaultPosition.
-    separatingLine := resources at:'SEPARATING_LINE' default:false "its so ugly"
+    separatingLine := resources at:'SEPARATING_LINE' default:false. "its so ugly"
+    self is3D ifTrue:[
+        self barHeight:(3 * ViewSpacing)
+    ] ifFalse:[
+        self barHeight:(2 * ViewSpacing)
+    ].
+    barWidth := 2 * ViewSpacing. "motif style width"
 !
 
 initCursor