quote-style -> sql-quoting-style.

This commit is contained in:
Richard Newman 2016-07-12 20:19:09 -07:00
parent 02759947c8
commit 5a8dbace4a

View file

@ -16,7 +16,7 @@
;; Setting this to something else will make your output more readable, ;; Setting this to something else will make your output more readable,
;; but not automatically safe for use. ;; but not automatically safe for use.
(def quote-style :ansi) (def sql-quoting-style :ansi)
(defn pattern->parts (defn pattern->parts
"Transform a DataScript Pattern instance into the parts needed "Transform a DataScript Pattern instance into the parts needed
@ -165,7 +165,7 @@
(defn find->sql-string (defn find->sql-string
"Take a parsed `find` expression and turn it into SQL." "Take a parsed `find` expression and turn it into SQL."
[find] [find]
(-> find find->sql-clause (sql/format :quoting quote-style))) (-> find find->sql-clause (sql/format :quoting sql-quoting-style)))
(defn parse (defn parse
"Parse a Datalog query array into a structured `find` expression." "Parse a Datalog query array into a structured `find` expression."