From e53c1a090eb9cfac3cb23d10d981648d02518ed1 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 13 Aug 2021 04:18:57 -0400
Subject: Made program: specify its bindings the same way as syntax:.

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

(limited to 'lux-lua')

diff --git a/lux-lua/source/program.lux b/lux-lua/source/program.lux
index e55f4169a..fc02693cf 100644
--- a/lux-lua/source/program.lux
+++ b/lux-lua/source/program.lux
@@ -757,7 +757,7 @@
       @.lua
       (def: (extender phase_wrapper handler)
         (-> platform.Phase_Wrapper Extender)
-        (:assume handler))})
+        (:expected handler))})
 
 (def: (phase_wrapper archive)
   (-> Archive (runtime.Operation platform.Phase_Wrapper))
@@ -800,7 +800,7 @@
   (-> Any (Async Any))
   (async.future (\ world/program.default exit +0)))
 
-(`` (program: [{service /cli.service}]
+(`` (program: [service /cli.service]
       (let [extension ".lua"]
         (do io.monad
           [(~~ (for {@.old [baggage platform]
-- 
cgit v1.2.3