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

use a for loop

Browse source 
bit more readable
This commit is contained in:
Mike Blume 2015-01-27 15:54:35 -08:00
parent 3b74d14e32
commit f410aed5a1
1 changed files with 6 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/honeysql/core.clj
View file

@ -20,8 +20,12 @@
(qualify :foo \"bar\" :baz) => :foo.bar.baz" (qualify :foo \"bar\" :baz) => :foo.bar.baz"
[& qualifiers+name] [& qualifiers+name]
(keyword (keyword
(string/join "." (map #(if (keyword? %) (name %) (str %)) (string/join "."
(remove nil? qualifiers+name))))) (for [s qualifiers+name
:when (not (nil? s))]
(if (keyword? s)
(name s)
(str s))))))
(defn build (defn build
"Takes a series of clause+data pairs and returns a SQL map. Example: "Takes a series of clause+data pairs and returns a SQL map. Example: