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

allow string aliases

Browse source
This commit is contained in:
Justin Kramer 2012-08-22 11:23:00 -04:00
parent 73da451ab3
commit 3b97fd4f06
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/honeysql/format.clj
View file

@ -151,7 +151,9 @@
;; alias ;; alias
(str (to-sql (first x)) (str (to-sql (first x))
" AS " " AS "
(to-sql (second x))))) (if (string? (second x))
(str "\"" (second x) "\"")
(to-sql (second x))))))
SqlCall SqlCall
(-to-sql [x] (binding [*fn-context?* true] (-to-sql [x] (binding [*fn-context?* true]
(let [fn-name (name (.name x)) (let [fn-name (name (.name x))