--- a/ListView.st Wed May 10 04:30:46 1995 +0200
+++ b/ListView.st Fri May 12 20:25:18 1995 +0200
@@ -38,7 +38,7 @@
COPYRIGHT (c) 1989 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.26 1995-05-09 01:56:08 claus Exp $
+$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.27 1995-05-12 18:24:28 claus Exp $
'!
!ListView class methodsFor:'documentation'!
@@ -59,7 +59,7 @@
version
"
-$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.26 1995-05-09 01:56:08 claus Exp $
+$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.27 1995-05-12 18:24:28 claus Exp $
"
!
@@ -2551,6 +2551,8 @@
|startLine stopLine startCol endCol|
+ shown ifFalse:[^ self].
+
startLine := self visibleLineOfY:y.
stopLine := self visibleLineOfY:(y + h).