aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/aedifex/command/auto.lux
diff options
context:
space:
mode:
authorEduardo Julian2022-06-04 19:34:42 -0400
committerEduardo Julian2022-06-04 19:34:42 -0400
commitf9e33ae96aec4741385a576719786092c9e68043 (patch)
tree140057dfc054346eab721f9905f0f0fff22ad933 /stdlib/source/program/aedifex/command/auto.lux
parent56d2835d35093e2d92c5e8a4371aa322b55e037b (diff)
De-sigil-ification: #
Diffstat (limited to 'stdlib/source/program/aedifex/command/auto.lux')
-rw-r--r--stdlib/source/program/aedifex/command/auto.lux16
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 !