--- a/HierarchicalFileList.st	Thu Oct 10 11:25:12 2002 +0200
+++ b/HierarchicalFileList.st	Thu Oct 10 11:25:47 2002 +0200
@@ -302,11 +302,6 @@
      visible within the physical directory
     "
     ^ matchBlock        
-!
-
-validateIcon:anIcon for:anItem
-
-    ^ anIcon
 ! !
 
 !HierarchicalFileList methodsFor:'searching'!
@@ -534,9 +529,6 @@
         model ifNil:[^ nil].
 
         icon := model iconFor:self.
-        icon notNil ifTrue:[
-            icon := model validateIcon:icon for:self
-        ]
     ].
     ^ icon.
 !
@@ -1037,5 +1029,5 @@
 !HierarchicalFileList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalFileList.st,v 1.26 2002-10-10 09:25:12 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalFileList.st,v 1.27 2002-10-10 09:25:47 penk Exp $'
 ! !