--- a/HierarchicalListView.st Wed Sep 11 14:54:54 2002 +0200
+++ b/HierarchicalListView.st Wed Sep 11 19:37:50 2002 +0200
@@ -649,7 +649,7 @@
StopRedrawSignal raise
].
iconRgtX > xL ifTrue:[
- self displayForm:icon x:xIcon y:(yCtr - (icon height // 2))
+ icon displayOn:self x:xIcon y:(yCtr - (icon height // 2))
]
].
@@ -659,7 +659,7 @@
(showIndc and:[item hasChildren]) ifTrue:[
icon := item isExpanded ifTrue:[openIndicator] ifFalse:[closeIndicator].
icon notNil ifTrue:[
- self displayForm:icon x:xIndc y:(yCtr - offIndcY)
+ icon displayOn:self x:xIndc y:(yCtr - offIndcY)
]
].
prevItem := item.
@@ -1217,5 +1217,5 @@
!HierarchicalListView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalListView.st,v 1.43 2002-09-11 12:54:23 penk Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalListView.st,v 1.44 2002-09-11 17:37:50 penk Exp $'
! !