better spacing for modifiers

This commit is contained in:
Justin Kramer 2012-07-12 22:56:52 -04:00
parent 5c2e25abd7
commit 92aa49deeb

View file

@ -154,9 +154,10 @@
(defmethod format-clause :select [[_ fields] sql-map]
(str "SELECT "
(space-join (map (comp string/upper-case name)
(:modifiers sql-map)))
" "
(when (:modifiers sql-map)
(str (space-join (map (comp string/upper-case name)
(:modifiers sql-map)))
" "))
(comma-join (map to-sql fields))))
(defmethod format-clause :from [[_ tables] _]