--- a/DataSetView.st	Wed Nov 09 17:13:56 2016 +0100
+++ b/DataSetView.st	Wed Nov 09 20:09:26 2016 +0100
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libwidg2' }"
 
+"{ NameSpace: Smalltalk }"
+
 ScrollableView subclass:#DataSetView
 	instanceVariableNames:'labelView rememberedTopOffsetOfScrolledView'
 	classVariableNames:''
@@ -379,6 +381,18 @@
         labelView containerChangedSize.
     ].
     super scrolledViewLayout:modifiedLayout
+!
+
+verticalScrollBarLayout:aLayout
+    "redefined to care for the label view, 
+     which is at the top and NOT scrolled.
+     It covers the top areay of myself, so we have to make the vertical
+     scrollbar a little smaller."
+
+    labelView notNil ifTrue:[
+        aLayout topOffset:(aLayout topOffset + labelView height).
+    ].    
+    super verticalScrollBarLayout:aLayout
 ! !
 
 !DataSetView methodsFor:'queries'!
@@ -419,6 +433,6 @@
 !DataSetView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DataSetView.st,v 1.47 2014-02-05 10:06:06 cg Exp $'
+    ^ '$Header$'
 ! !