--- a/HierarchicalList.st	Fri Sep 17 13:00:20 2004 +0200
+++ b/HierarchicalList.st	Mon Sep 20 08:57:02 2004 +0200
@@ -293,8 +293,8 @@
 
     |name|
 
-    (self monitoringTaskDelay isNil
-        and:[monitoringTaskDelay notNil
+    (monitoringTask isNil
+        and:[self monitoringTaskDelay notNil
         and:[(dependents size ~~ 0) or:[additionalItemsToMonitorSemaphore notNil]]]
     ) ifTrue:[
         monitoringTask := [
@@ -384,5 +384,5 @@
 !HierarchicalList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalList.st,v 1.20 2004-09-17 11:00:20 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalList.st,v 1.21 2004-09-20 06:57:02 stefan Exp $'
 ! !