From e5e4c2aff562e5c01fefb808d1d68a40f29c9cc5 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 8 Apr 2022 01:49:29 -0400
Subject: Can now deploy releases with Aedifex.

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

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

diff --git a/stdlib/source/test/aedifex/command/deploy.lux b/stdlib/source/test/aedifex/command/deploy.lux
index 0aec02f72..7ce8710c9 100644
--- a/stdlib/source/test/aedifex/command/deploy.lux
+++ b/stdlib/source/test/aedifex/command/deploy.lux
@@ -31,8 +31,10 @@
       ["[0]" export]]]]
    [world
     ["[0]" file]
-    ["[0]" program {"+" Program}]]]]
+    ["[0]" program {"+" Program}]
+    ["[0]" shell]]]]
  [//
+  ["$[0]" build]
   ["$[0]" install]
   ["$[0]" version]
   [//
@@ -56,9 +58,10 @@
       Artifact ///.Profile
       (Async (Try Text)))
   (do ///action.monad
-    [.let [console ($version.echo "")]
+    [.let [console ($version.echo "")
+           shell (shell.async ($build.bad_shell []))]
      _ ($install.make_sources! fs (the ///.#sources profile))
-     _ (/.do! console local remote fs artifact profile)]
+     _ (/.do! program shell console local remote fs artifact profile)]
     (# console read_line [])))
 
 (def: .public test
-- 
cgit v1.2.3