Add mimimal test for #228

This commit is contained in:
Andrea Richiardi 2018-09-24 22:23:40 -07:00
parent ea3e9b40bd
commit 24c20c3a2f

View file

@ -6,7 +6,7 @@
[honeysql.helpers :refer [select modifiers from join left-join
right-join full-join where group having
order-by limit offset values columns
insert-into with]]
insert-into with merge-where]]
honeysql.format-test))
;; TODO: more tests
@ -215,4 +215,20 @@
(where [:= :id (sql/inline nil)])
sql/format))))
(deftest merge-where-no-params-test
(testing "merge-where called with just the map as parameter - see #228"
(let [sqlmap (-> (select :*)
(from :table)
(where [:= :foo :bar]))]
(is (= ["SELECT * FROM table WHERE foo = bar"]
(sql/format (apply merge-where sqlmap [])))))))
(deftest merge-where-test
(is (= ["SELECT * FROM table WHERE (foo = bar AND quuz = xyzzy)"]
(-> (select :*)
(from :table)
(where [:= :foo :bar])
(merge-where [:= :quuz :xyzzy])
sql/format))))
#?(:cljs (cljs.test/run-all-tests))