From 2565c72b615df8ca51f4cb9822c66cad98390827 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Tue, 5 May 2015 15:33:17 -0700 Subject: [PATCH] file-monitor: use with-monitor. --- extra/file-monitor/file-monitor.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/file-monitor/file-monitor.factor b/extra/file-monitor/file-monitor.factor index 4010917438..a0306644c1 100644 --- a/extra/file-monitor/file-monitor.factor +++ b/extra/file-monitor/file-monitor.factor @@ -16,6 +16,6 @@ IN: file-monitor : file-monitor-main ( -- ) command-line get ?first current-directory get or dup "Monitoring %s\n" printf flush - [ t file-monitor-loop ] with-monitors ; + [ t [ file-monitor-loop ] with-monitor ] with-monitors ; MAIN: file-monitor-main