ListView.st
changeset 127 462396b08e30
parent 125 3ffa271732f7
child 128 06a050529335
--- 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).