--- a/HVScrollableView.st	Thu Jan 16 11:45:43 1997 +0100
+++ b/HVScrollableView.st	Thu Jan 16 19:07:13 1997 +0100
@@ -315,8 +315,10 @@
         orgX := scrollBar origin x + scrollBar width.
         is3D ifTrue:[
             orgX := orgX + halfSpacing + 1.
-            isST80 ifTrue:[
-                orgX := orgX - (scrolledView margin)
+            scrolledView notNil ifTrue:[
+                isST80 ifTrue:[
+                    orgX := orgX - (scrolledView margin)
+                ]
             ]
         ]
     ] ifFalse:[
@@ -370,7 +372,7 @@
         self setScrollActions.
     ]
 
-    "Modified: 1.8.1996 / 12:44:41 / cg"
+    "Modified: 16.1.1997 / 19:06:07 / cg"
 !
 
 realize
@@ -466,5 +468,5 @@
 !HVScrollableView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/HVScrollableView.st,v 1.22 1996-10-15 12:05:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/HVScrollableView.st,v 1.23 1997-01-16 18:07:13 cg Exp $'
 ! !