From eea741e9b4a47ae09832311d6d61f0bd6024f673 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 31 Oct 2020 02:59:48 -0400
Subject: Easy to use Rev constants.

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

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

diff --git a/stdlib/source/program/aedifex/shell.lux b/stdlib/source/program/aedifex/shell.lux
index 72150a016..5ef30cf91 100644
--- a/stdlib/source/program/aedifex/shell.lux
+++ b/stdlib/source/program/aedifex/shell.lux
@@ -82,12 +82,12 @@
 (def: #export (execute command working-directory)
   (-> Text Path (Action Any))
   (promise.future
-   (do {@ io.monad}
+   (do {! io.monad}
      [runtime (java/lang/Runtime::getRuntime)
       ?process (java/lang/Runtime::exec command #.None (java/io/File::new working-directory) runtime)]
      (case ?process
        (#try.Success process)
-       (do @
+       (do !
          [_ (..consume-stream working-directory command (java/lang/Process::getInputStream process))
           _ (..consume-stream working-directory command (java/lang/Process::getErrorStream process))
           ?exit-code (java/lang/Process::waitFor process)]
-- 
cgit v1.2.3