- Improved the way commands are taken by lux-lein.

1 files changed, 7 insertions, 20 deletions

diff --git a/lux-lein/src/leiningen/lux.clj b/lux-lein/src/leiningen/lux.clj
index 40f39f9d3..3c2a8e9f1 100644
--- a/lux-lein/src/leiningen/lux.clj
+++ b/lux-lein/src/leiningen/lux.clj
@@ -13,24 +13,11 @@
 
 ;; [Exports]
 (defn lux [project & args]
-  (case (first args)
-    "build"
-    (&builder/build project)
-
-    "test"
-    (&test/test project)
-
-    "repl"
-    (&repl/repl project)
-
-    "auto"
-    (case (second args)
-      "build"
-      (&watch/watch #(&builder/build project) project)
-
-      "test"
-      (&watch/watch #(&test/test project) project))
-
+  (case args
+    ["build"] (&builder/build project)
+    ["test"] (&test/test project)
+    ["repl"] (&repl/repl project)
+    ["auto" "build"] (&watch/watch #(&builder/build project) project)
+    ["auto" "test"] (&watch/watch #(&test/test project) project)
     ;; default...
-    (println "Commands available: (auto) build, (auto) test, repl"))
-  )
+    (println "Commands available: (auto) build, (auto) test, repl")))