fix io monitors recusive
parent
964961ed74
commit
e310e382c5
|
@ -19,7 +19,8 @@ DEFER: add-child-monitor
|
|||
|
||||
: add-child-monitors ( path -- )
|
||||
#! We yield since this directory scan might take a while.
|
||||
[
|
||||
dup [
|
||||
[ append-path ] with map
|
||||
[ add-child-monitor ] each yield
|
||||
] with-directory-files ;
|
||||
|
||||
|
|
Loading…
Reference in New Issue