From ace1681b9c6a9f4387b83fa36fa759ad2d4eba60 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Sun, 12 Apr 2015 10:03:48 -0700 Subject: [PATCH] improve testability of pollen/raco --- info.rkt | 2 +- raco.rkt | 5 ++--- 2 files changed, 3 insertions(+), 4 deletions(-) diff --git a/info.rkt b/info.rkt index 7f7e3e7..e45190a 100644 --- a/info.rkt +++ b/info.rkt @@ -5,5 +5,5 @@ (define build-deps '("plot-gui-lib" "rackunit-lib" "scribble-lib")) (define update-implies '("txexpr" "sugar")) (define scribblings '(("scribblings/pollen.scrbl" (multi-page)))) -(define raco-commands '(("pollen" pollen/raco "issue Pollen command" #f))) +(define raco-commands '(("pollen" (submod pollen/raco main) "issue Pollen command" #f))) (define compile-omit-paths '("tests" "raco.rkt")) diff --git a/raco.rkt b/raco.rkt index d64adc8..88bcb62 100644 --- a/raco.rkt +++ b/raco.rkt @@ -39,6 +39,5 @@ [("clone") (handle-clone first-arg-or-current-dir rest-args)] [else (handle-else arg-command-name)])))) -(select-syntax-for-command) - - +(module+ main + (select-syntax-for-command))