From 36303d6cb2ce3ab9e36d045b9516c997bd461862 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 24 Aug 2021 05:23:45 -0400
Subject: Outsourced the syntax for labelled type definitions to macros.

---
 stdlib/source/program/aedifex/command/pom.lux | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/command/pom.lux b/stdlib/source/program/aedifex/command/pom.lux
index c43982a98..9c449a0b9 100644
--- a/stdlib/source/program/aedifex/command/pom.lux
+++ b/stdlib/source/program/aedifex/command/pom.lux
@@ -29,8 +29,8 @@
   (-> (Console Async) (file.System Async) (Command Any))
   (do ///action.monad
     [content (|> (///pom.write profile)
-                 (try\map (|>> (\ xml.codec encoded)
-                               (\ utf8.codec encoded)))
+                 (try\each (|>> (\ xml.codec encoded)
+                                (\ utf8.codec encoded)))
                  async\in)
      _ (\ fs write content ///pom.file)]
     (console.write_line ..success console)))
-- 
cgit v1.2.3