allow NO-ESCAPE to accept several args

1 files changed, 4 insertions, 2 deletions

diff --git a/macros.fnl b/macros.fnl
index fdfe17c..6053f6a 100644
--- a/macros.fnl
+++ b/macros.fnl
@@ -71,8 +71,10 @@
       (add ">")
       (each [_ item (pairs body)]
         (if
-          (and (sequence? item) (= (. item 1) "NO-ESCAPE"))
-            (add (. item 2))
+          (and (sequence? item)
+               (= (. item 1) "NO-ESCAPE"))
+           (each [i pair (ipairs item)]
+             (when (~= i 1) (add (. item i))))
           (sequence? item)
             (set result (concat result (inner-compile item)))
           (list? item)