--- a/HierarchicalListView.st	Fri Dec 13 10:37:02 2002 +0100
+++ b/HierarchicalListView.st	Wed Dec 18 13:28:32 2002 +0100
@@ -610,7 +610,7 @@
 
     idx    := aLnNr + idx.
     vwOrgY := viewOrigin y.
-    availY := (self yVisibleOfLine:aLnNr) - margin.
+    availY := (self yVisibleOfLine:aLnNr) - (self yVisibleOfLine:1).
 
     availY > margin ifTrue:[
         usedY := (self yVisibleOfLine:(idx + 1)) - (height - margin - margin).
@@ -1539,5 +1539,5 @@
 !HierarchicalListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalListView.st,v 1.77 2002-12-11 07:23:30 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalListView.st,v 1.78 2002-12-18 12:28:32 ca Exp $'
 ! !