1 files changed, 25 insertions, 24 deletions
diff --git a/stdlib/source/program/aedifex/command/pom.lux b/stdlib/source/program/aedifex/command/pom.lux
index 20bad61fe..23c25e7e1 100644
--- a/stdlib/source/program/aedifex/command/pom.lux
+++ b/stdlib/source/program/aedifex/command/pom.lux
@@ -1,26 +1,26 @@
 (.using
-  [library
-   [lux "*"
-    [abstract
-     [monad {"+" do}]]
-    [control
-     ["[0]" try ("[1]#[0]" functor)]
-     [concurrency
-      ["[0]" async {"+" Async} ("[1]#[0]" monad)]]]
-    [data
-     [text
-      ["%" format {"+" format}]
-      [encoding
-       ["[0]" utf8]]]
-     [format
-      ["[0]" xml]]]
-    [world
-     ["[0]" file]
-     ["[0]" console {"+" Console}]]]]
-  ["[0]" /// "_"
-   [command {"+" Command}]
-   ["[1][0]" action]
-   ["[1][0]" pom]])
+ [library
+  [lux "*"
+   [abstract
+    [monad {"+" do}]]
+   [control
+    ["[0]" try {"+" Try} ("[1]#[0]" functor)]
+    [concurrency
+     ["[0]" async {"+" Async} ("[1]#[0]" monad)]]]
+   [data
+    [text
+     ["%" format {"+" format}]
+     [encoding
+      ["[0]" utf8]]]
+    [format
+     ["[0]" xml]]]
+   [world
+    ["[0]" file]
+    ["[0]" console {"+" Console}]]]]
+ ["[0]" /// "_"
+  [command {"+" Command}]
+  ["[1][0]" action]
+  ["[1][0]" pom]])
 
 (def: .public success
   (format "Successfully created POM file: " ///pom.file))
@@ -32,5 +32,6 @@
                  (try#each (|>> (# xml.codec encoded)
                                 (# utf8.codec encoded)))
                  async#in)
-     _ (# fs write content ///pom.file)]
-    (console.write_line ..success console)))
+     _ (# fs write ///pom.file content)]
+    (is (Async (Try Any))
+        (console.write_line ..success console))))