DataSetView.st
changeset 2151 50f8723054e7
parent 2150 5184a8b92c2a
child 2153 0e2bc053f48a
--- a/DataSetView.st	Thu Aug 22 15:07:36 2002 +0200
+++ b/DataSetView.st	Thu Aug 22 15:46:41 2002 +0200
@@ -342,10 +342,12 @@
 
         newLeft := aLayout leftOffset.
         newRight := aLayout rightOffset.
+
         (scrolledView level == 0
         and:[self level < 0 
         and:[labelView level == 0]]) ifTrue:[
-            newRight := (newRight + 1) min:0 
+            newRight := (newRight + 1) min:0.
+            modifiedLayout rightOffset:newRight.
         ].
 
         labelViewLayout := labelView layout.
@@ -369,5 +371,5 @@
 !DataSetView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DataSetView.st,v 1.34 2002-08-22 13:07:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DataSetView.st,v 1.35 2002-08-22 13:46:38 cg Exp $'
 ! !