From ee059bbc83f10e50248abc60547e8bdba2ffadc0 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Sat, 11 Jul 2015 13:09:03 -0700 Subject: [PATCH] nit, picked --- command.rkt | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/command.rkt b/command.rkt index 0c32a67..f79a958 100644 --- a/command.rkt +++ b/command.rkt @@ -25,7 +25,8 @@ (with-handlers ([exn:fail? (λ _ #f)]) (string->number (vector-ref (current-command-line-arguments) 2)))) (handle-start (path->directory-path (get-first-arg-or-current-dir)) port-arg)] - [("render") (handle-render (cons (get-first-arg-or-current-dir) (map very-nice-path (cdr (vector->list (current-command-line-arguments))))))] + ;; "second" arg is actually third in command line args, so use cddr not cdr + [("render") (handle-render (cons (get-first-arg-or-current-dir) (map very-nice-path (cddr (vector->list (current-command-line-arguments))))))] [("version") (handle-version)] [("clone" "publish") (define rest-args (with-handlers ([exn:fail? (λ _ #f)])