--- a/ListView.st	Fri Jul 03 20:59:20 2015 +0200
+++ b/ListView.st	Sat Jul 04 15:36:56 2015 +0200
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libwidg' }"
 
+"{ NameSpace: Smalltalk }"
+
 View subclass:#ListView
 	instanceVariableNames:'list firstLineShown nFullLinesShown nLinesShown fgColor bgColor
 		partialLines leftMargin topMargin textStartLeft textStartTop
@@ -4522,7 +4524,7 @@
             y1 := 0.
         ].
 
-        inv := (margin@y1) extent:(w@y0).
+        inv := (margin@y1) extent:(w@y0+margin).
     ] ifFalse:[
         "/ scrolling horizontal
 
@@ -5315,10 +5317,10 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.401 2014-12-08 17:31:05 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.401 2014-12-08 17:31:05 cg Exp $'
+    ^ '$Header$'
 ! !