18 lines
522 B
Clojure
18 lines
522 B
Clojure
|
(ns test-core
|
||
|
|
(:use [leiningen.core :only [make-groups]] :reload-all)
|
||
|
|
(:use [clojure.test]))
|
||
|
|
|
||
|
|
(deftest test-make-groups-empty-args
|
||
|
|
(is (= [[]] (make-groups []))))
|
||
|
|
|
||
|
|
(deftest test-make-groups-single-task
|
||
|
|
(is (= [["pom"]] (make-groups ["pom"]))))
|
||
|
|
|
||
|
|
(deftest test-make-groups-without-args
|
||
|
|
(is (= [["clean"] ["deps"] ["test"]]
|
||
|
|
(make-groups ["clean," "deps," "test"]))))
|
||
|
|
|
||
|
|
(deftest test-make-groups-with-args
|
||
|
|
(is (= [["test" "test-core"] ["version"]]
|
||
|
|
(make-groups ["test" "test-core," "version"]))))
|