--- a/ListView.st Sun Dec 03 23:58:42 1995 +0100
+++ b/ListView.st Mon Dec 04 00:05:05 1995 +0100
@@ -52,7 +52,7 @@
!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.47 1995-12-03 22:58:08 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.48 1995-12-03 23:05:05 cg Exp $'
!
documentation
@@ -1545,9 +1545,9 @@
w := self widthForScrollBetween:firstLineShown
and:(firstLineShown + nLinesShown).
w := w + leftMargin.
- h := nPixel + textStartTop.
+ h := nPixel + margin.
self catchExpose.
- self copyFrom:self x:margin y:textStartTop
+ self copyFrom:self x:margin y:margin
toX:margin y:h
width:w height:(height - h).
firstLineShown := firstLineShown - count.