--- a/HierarchicalListView.st	Tue Mar 21 10:40:01 2000 +0100
+++ b/HierarchicalListView.st	Tue Mar 21 11:05:29 2000 +0100
@@ -763,6 +763,7 @@
     super initStyle.
 
     cls := self class.
+    supportsDisplayInRange := true.
 
     lineMask := Form width:2 height:2 fromArray:#[16rAA 16r55].
     icons    := IdentityDictionary new.
@@ -998,5 +999,5 @@
 !HierarchicalListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalListView.st,v 1.20 1999-12-09 11:14:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalListView.st,v 1.21 2000-03-21 10:05:29 ca Exp $'
 ! !