diff options
author | Eduardo Julian | 2022-06-04 19:34:42 -0400 |
---|---|---|
committer | Eduardo Julian | 2022-06-04 19:34:42 -0400 |
commit | f9e33ae96aec4741385a576719786092c9e68043 (patch) | |
tree | 140057dfc054346eab721f9905f0f0fff22ad933 /stdlib/source/program/aedifex/command/auto.lux | |
parent | 56d2835d35093e2d92c5e8a4371aa322b55e037b (diff) |
De-sigil-ification: #
Diffstat (limited to 'stdlib/source/program/aedifex/command/auto.lux')
-rw-r--r-- | stdlib/source/program/aedifex/command/auto.lux | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/stdlib/source/program/aedifex/command/auto.lux b/stdlib/source/program/aedifex/command/auto.lux index dc922b4c1..07842d32e 100644 --- a/stdlib/source/program/aedifex/command/auto.lux +++ b/stdlib/source/program/aedifex/command/auto.lux @@ -29,11 +29,11 @@ (-> (file.System Async) file.Path (Async (List file.Path))) (let [! async.monad] (|> path - (# fs sub_directories) - (# ! each (|>> (try.else (list)) - (monad.each ! (targets fs)))) - (# ! conjoint) - (# ! each (|>> list.together (partial_list path)))))) + (at fs sub_directories) + (at ! each (|>> (try.else (list)) + (monad.each ! (targets fs)))) + (at ! conjoint) + (at ! each (|>> list.together (partial_list path)))))) (def: .public delay Nat @@ -56,14 +56,14 @@ (the ///.#sources) set.list (monad.each ! (..targets fs)) - (# ! each list.together))] + (at ! each list.together))] (do [! ///action.monad] - [_ (monad.each ! (# watcher start watch.modification) targets) + [_ (monad.each ! (at watcher start watch.modification) targets) _ <call>] (loop (again [_ []]) (do ! [_ (..pause delay) - events (# watcher poll [])] + events (at watcher poll [])] (case events {.#Item _} (do ! |