io.monitors.recursive: Fry quotations - do not apply liberally.

2013-07-16 14:43:29 -07:00 · 2013-07-16 14:43:29 -07:00 · 7ed9365c00
parent 36a4eb7ee1
commit 7ed9365c00
1 changed files with 1 additions and 1 deletions
--- a/basis/io/monitors/recursive/recursive.factor
+++ b/basis/io/monitors/recursive/recursive.factor
@ -100,7 +100,7 @@ M: recursive-monitor dispose*
    ready>> ?promise ?linked drop ;

 : <recursive-monitor> ( path mailbox -- monitor )
-    '[ _ _
+    [
        [ absolute-path ] dip
        recursive-monitor new-monitor |dispose
            H{ } clone >>children