pull/9/head
Matthew Butterick 11 years ago
parent 5283b4b958
commit 0422a6da1c

@ -22,7 +22,6 @@
(if arg-command-name (if arg-command-name
(datum->syntax stx (datum->syntax stx
(case arg-command-name (case arg-command-name
[("nothing") '(begin)]
[("test") `(displayln "All systems go")] [("test") `(displayln "All systems go")]
[("start") [("start")
(if (not (directory-exists? arg-project-directory)) (if (not (directory-exists? arg-project-directory))

Loading…
Cancel
Save