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

ignore unrecognized clauses

Browse source
This commit is contained in:
Justin Kramer 2012-08-07 17:58:51 -04:00
parent a9fcd837ca
commit 212ebd31b4
1 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
src/honeysql/core.clj
View file

@ -148,10 +148,13 @@
[{} clauses])]
(reduce
(fn [sql-map [op args]]
(let [handler (handlers op)]
(if-let [handler (handlers op)]
(if (or (#{:where :having} op) (not (coll? args)))
(handler sql-map args)
(apply handler sql-map args))))
(if (nil? args)
sql-map
(handler sql-map args))
(apply handler sql-map args))
sql-map))
base
(partition 2 clauses))))