io.monitors.recursive: Fry quotations - do not apply liberally.
parent
36a4eb7ee1
commit
7ed9365c00
|
@ -100,7 +100,7 @@ M: recursive-monitor dispose*
|
||||||
ready>> ?promise ?linked drop ;
|
ready>> ?promise ?linked drop ;
|
||||||
|
|
||||||
: <recursive-monitor> ( path mailbox -- monitor )
|
: <recursive-monitor> ( path mailbox -- monitor )
|
||||||
'[ _ _
|
[
|
||||||
[ absolute-path ] dip
|
[ absolute-path ] dip
|
||||||
recursive-monitor new-monitor |dispose
|
recursive-monitor new-monitor |dispose
|
||||||
H{ } clone >>children
|
H{ } clone >>children
|
||||||
|
|
Loading…
Reference in New Issue