From f9e33ae96aec4741385a576719786092c9e68043 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 4 Jun 2022 19:34:42 -0400
Subject: De-sigil-ification: #

---
 stdlib/source/program/aedifex/input.lux | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

(limited to 'stdlib/source/program/aedifex/input.lux')

diff --git a/stdlib/source/program/aedifex/input.lux b/stdlib/source/program/aedifex/input.lux
index 5733fa97a..c85970a5b 100644
--- a/stdlib/source/program/aedifex/input.lux
+++ b/stdlib/source/program/aedifex/input.lux
@@ -45,18 +45,18 @@
 (def: project_parser
   (-> Binary (Try Project))
   (|>> (pipe.do try.monad
-         [(# utf8.codec decoded)]
+         [(at utf8.codec decoded)]
          [..lux_parser]
          [(list) (<code>.result //parser.project)])))
 
 (def: .public (read monad fs profiles)
   (All (_ !) (-> (Monad !) (file.System !) (List Name) (! (Try Profile))))
   (|> //project.file
-      (# fs read)
-      (# monad each
-         (function (_ it)
-           (do [! try.monad]
-             [it it
-              it (..project_parser it)
-              it (monad.each ! (//project.profile it) (partial_list //profile.default profiles))]
-             (in (mix.with_monoid //profile.monoid list.mix it)))))))
+      (at fs read)
+      (at monad each
+          (function (_ it)
+            (do [! try.monad]
+              [it it
+               it (..project_parser it)
+               it (monad.each ! (//project.profile it) (partial_list //profile.default profiles))]
+              (in (mix.with_monoid //profile.monoid list.mix it)))))))
-- 
cgit v1.2.3