From 7db42ab1b9d3c764772ca63c74bf44bb2b8b8325 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 9 Jul 2022 14:35:38 -0400
Subject: First-class programs instead of having a "lux program" extension.

---
 stdlib/source/program/aedifex/command/auto.lux | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/command/auto.lux b/stdlib/source/program/aedifex/command/auto.lux
index 15d78527b..4e4871f52 100644
--- a/stdlib/source/program/aedifex/command/auto.lux
+++ b/stdlib/source/program/aedifex/command/auto.lux
@@ -12,7 +12,7 @@
      ["[0]" list]
      ["[0]" set]]]
    [world
-    [program (.only Program)]
+    [environment (.only Environment)]
     [shell (.only Exit Shell)]
     [console (.only Console)]
     ["[0]" file (.only)
@@ -46,11 +46,11 @@
 (def .public (do! delay watcher command)
   (All (_ a)
     (-> Nat (Watcher Async)
-        (-> (Console Async) (Program Async) (file.System Async) (Shell Async) Resolution (Command [Exit a]))
-        (-> (Console Async) (Program Async) (file.System Async) (Shell Async) Resolution (Command [Exit Any]))))
-  (function (_ console program fs shell resolution)
+        (-> (Console Async) (Environment Async) (file.System Async) (Shell Async) Resolution (Command [Exit a]))
+        (-> (Console Async) (Environment Async) (file.System Async) (Shell Async) Resolution (Command [Exit Any]))))
+  (function (_ console environment fs shell resolution)
     (function (_ profile)
-      (with_expansions [<call> ((command console program fs shell resolution) profile)]
+      (with_expansions [<call> ((command console environment fs shell resolution) profile)]
         (do [! async.monad]
           [targets (|> profile
                        (the ///.#sources)
-- 
cgit v1.2.3