--- a/HierarchicalItem.st	Fri Dec 19 09:14:52 2008 +0100
+++ b/HierarchicalItem.st	Fri Dec 19 09:15:33 2008 +0100
@@ -1415,6 +1415,12 @@
 
 !HierarchicalItem methodsFor:'protocol-displaying'!
 
+displayIcon:anIcon atX:x y:y on:aGC
+    "called to draw the icon - canbe redefined to manupulate the icon"
+
+    anIcon displayOn:aGC x:x y:y.
+!
+
 displayOn:aGC x:x y:y h:h
     "draw the receiver in the graphicsContext, aGC.
     "
@@ -1915,5 +1921,5 @@
 !HierarchicalItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.85 2008-12-18 10:33:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.86 2008-12-19 08:15:33 ca Exp $'
 ! !