From 6269765c3f8caa591a5161ae5a8a7e4cb3011222 Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Fri, 28 Feb 2014 00:47:48 -0800
Subject: [PATCH] listify macro map

---
 macro.rkt | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/macro.rkt b/macro.rkt
index 510449a..d5f9ae1 100644
--- a/macro.rkt
+++ b/macro.rkt
@@ -6,8 +6,8 @@
 (define-syntax (macro-map stx)
   (syntax-case stx ()
     [(_ macro-name item)
-     #'(macro-name item)]
+     #'(cons (macro-name item) '())]
     [(_ macro-name item0 items ...)
-     #'(begin
+     #'(cons
          (macro-name item0)
          (macro-map macro-name items ...))]))