--- a/FileSelectionTree.st	Fri Dec 06 10:04:41 2002 +0100
+++ b/FileSelectionTree.st	Fri Dec 06 15:17:08 2002 +0100
@@ -457,7 +457,8 @@
     "
     aState ifTrue:[
         triggerMonitorBlock notNil ifTrue:[^ self].
-        triggerMonitorBlock := [self sensor pushUserEvent:#monitorCycle for:self].
+        "/ triggerMonitorBlock := [self sensor pushUserEvent:#monitorCycle for:self].
+        triggerMonitorBlock := [self pushEvent:#monitorCycle].
         Processor addTimedBlock:triggerMonitorBlock afterSeconds:(self monitoringDelayTime).
     ] ifFalse:[
         triggerMonitorBlock isNil ifTrue:[^ self].
@@ -743,5 +744,5 @@
 !FileSelectionTree class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/FileSelectionTree.st,v 1.26 2002-03-25 10:08:27 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/FileSelectionTree.st,v 1.27 2002-12-06 14:17:08 tm Exp $'
 ! !