Source

Lein-LB / test / leiningen / test_lb.clj

Diff from to

File test/leiningen/test_lb.clj

                  "-ofoo"))                    "all combined (short version)")
       (is (thrown? IllegalArgumentException (ll/parse-dbdoc-args "--bad")))
       (is (= {:help nil} (ll/parse-dbdoc-args "--help"))))))
+
+
+(deftest test-diff-args
+  (testing "diff args"
+           (let [a {:profile "pp" :ref-profile "rr"}]
+             (is (= a (ll/parse-diff-args "--profile=pp" "--ref-profile=rr")) "full")
+             (is (= a (ll/parse-diff-args "-ppp"         "-rrr"))             "short"))
+           (let [a {:ref-profile "rr"}]
+             (is (= a (ll/parse-diff-args "--ref-profile=rr")) "full w/o profile")
+             (is (= a (ll/parse-diff-args "-rrr"))             "short w/o profile"))
+           (is (= {:help nil} (ll/parse-diff-args "--help")))))