blob: 0ae83eb6efb3192f2d88a94e4e7f1a05ec676425 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
(ns leiningen.lux
(:require [leiningen.pom :as pom]
[leiningen.core.classpath :as classpath]
(leiningen.lux [builder :as &builder]
[test :as &test]
[repl :as &repl]
[watch :as &watch])))
;; [Exports]
(defn lux [project & args]
(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")))
|