luciano/honeysql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix :lift and test to use wrapper

Browse source
This commit is contained in:
Sean Corfield 2021-01-31 05:31:10 -08:00
parent c92656389b
commit 0e2aae4a00
2 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/honey/sql.cljc
View file

@ -563,7 +563,8 @@
(into [(str "INTERVAL " sql " " (sql-kw units))] params))) (into [(str "INTERVAL " sql " " (sql-kw units))] params)))
:lift :lift
(fn [_ [x]] (fn [_ [x]]
["?" x]) ["?" (with-meta (constantly x)
{::wrapper (fn [fx _] (fx))})])
:nest :nest
(fn [_ [x]] (fn [_ [x]]
(format-expr x {:nested? true})) (format-expr x {:nested? true}))

2
test/honey/sql/helpers_test.cljc
View file

@ -82,7 +82,7 @@
(-> (->
(insert-into :foo) (insert-into :foo)
(columns :bar) (columns :bar)
(values [[:lift {:baz "my-val"}]]) (values [[[:lift {: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"]