--- a/HierarchicalItem.st	Wed Sep 29 18:11:26 1999 +0200
+++ b/HierarchicalItem.st	Wed Sep 29 18:12:04 1999 +0200
@@ -946,6 +946,14 @@
 
 !HierarchicalItem methodsFor:'protocol queries'!
 
+drawHorizontalLineUpToText
+    "draw the horizizontal line for the selected item up to the text
+     or on default to the start of the the vertical line; only used by
+     the hierarchical view
+    "
+    ^ false
+!
+
 hasChildren
     "checks whether the item has a list of children; the list must not
      be loaded yet( ex. FileDirectory ).
@@ -1218,5 +1226,5 @@
 !HierarchicalItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.11 1999-09-20 16:40:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.12 1999-09-29 16:12:04 ca Exp $'
 ! !