--- a/ScrollableView.st	Fri Jun 06 16:39:03 1997 +0200
+++ b/ScrollableView.st	Tue Jun 10 13:09:01 1997 +0200
@@ -1558,7 +1558,12 @@
         scrolledViewLayout topOffset:sTopOffs.
         scrolledViewLayout bottomOffset:sBottomOffs.
 
-        scrolledView level:DefaultScrolledViewLevel.
+        ((hScrollBar isNil or:[hScrollBarHidden])
+        and:[(vScrollBar isNil or:[vScrollBarHidden])]) ifTrue:[
+            scrolledView level:0
+        ] ifFalse:[
+            scrolledView level:DefaultScrolledViewLevel.
+        ].
         scrolledView layout:scrolledViewLayout.
     ].
     (hScrollBar notNil and:[hScrollBarHidden not]) ifTrue:[
@@ -1860,5 +1865,5 @@
 !ScrollableView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.67 1997-05-30 03:56:29 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.68 1997-06-10 11:09:01 cg Exp $'
 ! !