use a for loop
bit more readable
This commit is contained in:
parent
3b74d14e32
commit
f410aed5a1
1 changed files with 6 additions and 2 deletions
|
|
@ -20,8 +20,12 @@
|
|||
(qualify :foo \"bar\" :baz) => :foo.bar.baz"
|
||||
[& qualifiers+name]
|
||||
(keyword
|
||||
(string/join "." (map #(if (keyword? %) (name %) (str %))
|
||||
(remove nil? qualifiers+name)))))
|
||||
(string/join "."
|
||||
(for [s qualifiers+name
|
||||
:when (not (nil? s))]
|
||||
(if (keyword? s)
|
||||
(name s)
|
||||
(str s))))))
|
||||
|
||||
(defn build
|
||||
"Takes a series of clause+data pairs and returns a SQL map. Example:
|
||||
|
|
|
|||
Loading…
Reference in a new issue