From 0d909187d5b9effcd08f533d50af7d29c0d6bfd8 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 8 Apr 2022 05:42:36 -0400
Subject: De-sigil-ification: $

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

(limited to 'lux-r/source/program.lux')

diff --git a/lux-r/source/program.lux b/lux-r/source/program.lux
index 873d41a5e..2f477efcb 100644
--- a/lux-r/source/program.lux
+++ b/lux-r/source/program.lux
@@ -591,10 +591,10 @@
 (def: (scope body)
   (-> _.Expression _.Expression)
   (let [$program (_.var "lux_program")]
-    ($_ _.then
-        (_.set! $program (_.function (list) body))
-        (_.apply/0 $program [])
-        )))
+    (all _.then
+         (_.set! $program (_.function (list) body))
+         (_.apply/0 $program [])
+         )))
 
 (`` (program: [service /cli.service]
       (let [extension ".r"]
-- 
cgit v1.2.3