Minor test cleanup

This commit is contained in:
Sean Corfield 2021-02-22 15:51:14 -08:00
parent ec6814eaba
commit 8ffca0deae

View file

@ -3,6 +3,7 @@
(:require [#?@(:clj [clojure.test :refer] (:require [#?@(:clj [clojure.test :refer]
:cljs [cljs.test :refer-macros]) [deftest testing is]] :cljs [cljs.test :refer-macros]) [deftest testing is]]
[honeysql.core :as sql] [honeysql.core :as sql]
[honeysql.format :as sql-f]
[honeysql.helpers :refer [select modifiers from join left-join [honeysql.helpers :refer [select modifiers from join left-join
right-join full-join cross-join right-join full-join cross-join
where group having where group having
@ -90,7 +91,7 @@
(-> (->
(insert-into :foo) (insert-into :foo)
(columns :bar) (columns :bar)
(values [[(honeysql.format/value {:baz "my-val"})]]) (values [[(sql-f/value {:baz "my-val"})]])
sql/format))) sql/format)))
(is (= ["INSERT INTO foo (a, b, c) VALUES (?, ?, ?), (?, ?, ?)" (is (= ["INSERT INTO foo (a, b, c) VALUES (?, ?, ?), (?, ?, ?)"
"a" "b" "c" "a" "b" "c"] "a" "b" "c" "a" "b" "c"]
@ -306,7 +307,7 @@
[:x] [:y])))))))) [:x] [:y]))))))))
(deftest where-nil-params-test (deftest where-nil-params-test
(doseq [[k sql-keyword f] [[:where "WHERE" where] (doseq [[_ sql-keyword f] [[:where "WHERE" where]
[:having "HAVING" having]]] [:having "HAVING" having]]]
(testing (str sql-keyword " called with nil parameters - see #246") (testing (str sql-keyword " called with nil parameters - see #246")
(is (= [(str "SELECT * FROM table " sql-keyword " (foo = bar AND quuz = xyzzy)")] (is (= [(str "SELECT * FROM table " sql-keyword " (foo = bar AND quuz = xyzzy)")]