From fdd748d38b2b32f369dd56b5c95658e101dd7dbb Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Sun, 13 Oct 2013 13:30:34 -0700 Subject: [PATCH] update --- command.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/command.rkt b/command.rkt index 298c81e..bb4a56d 100644 --- a/command.rkt +++ b/command.rkt @@ -4,8 +4,8 @@ (require (for-syntax "readability.rkt")) -(define-syntax (handle-pollen-command stx) - (datum->syntax stx +(define-syntax (handle-pollen-command syntax-context) + (datum->syntax syntax-context (let* ([args (current-command-line-arguments)] [arg (if (> (len args) 0) (get args 0) "")]) (case arg