From 03b1085924b225d34d3b11f1a442b0b5d926c417 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 2 Nov 2020 17:31:39 -0400
Subject: Allow defining anonymous actors.

---
 stdlib/source/test/aedifex/command/pom.lux | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'stdlib/source/test/aedifex/command/pom.lux')

diff --git a/stdlib/source/test/aedifex/command/pom.lux b/stdlib/source/test/aedifex/command/pom.lux
index cd0eed8e9..c973678cc 100644
--- a/stdlib/source/test/aedifex/command/pom.lux
+++ b/stdlib/source/test/aedifex/command/pom.lux
@@ -34,15 +34,15 @@
       (do random.monad
         [sample @profile.random
          #let [fs (file.mock (:: file.default separator))]]
-        (wrap (do {@ promise.monad}
+        (wrap (do {! promise.monad}
                 [outcome (/.do! fs sample)]
                 (case outcome
                   (#try.Success path)
-                  (do @
+                  (do !
                     [verdict (do ///action.monad
                                [expected (|> (///pom.write sample)
                                              (try@map (|>> (:: xml.codec encode) encoding.to-utf8))
-                                             (:: @ wrap))
+                                             (:: ! wrap))
                                 file (: (Promise (Try (File Promise)))
                                         (file.get-file promise.monad fs path))
                                 actual (!.use (:: file content) [])
-- 
cgit v1.2.3