gered/views.honeysql
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

rename post-fn to row-fn

Browse source 
i think "row-fn" is a lot more clear as a name, especially since jdbc
also uses the name row-fn to refer to the exact same thing
This commit is contained in:
Gered 2016-05-20 18:19:07 -04:00
parent 37e49d9730
commit 06edd82ff5
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/views/honeysql/view.clj
View file

@ -8,12 +8,12 @@
[clojure.java.jdbc :as j]
[clojure.tools.logging :refer [warn]]))
(defrecord HSQLView [id db query-fn post-fn]
(defrecord HSQLView [id db query-fn row-fn]
IView
(id [_] id)
(data [_ namespace parameters]
(let [start (System/currentTimeMillis)
data (j/query db (hsql/format (apply query-fn parameters)) :row-fn post-fn)
data (j/query db (hsql/format (apply query-fn parameters)) :row-fn row-fn)
time (- (System/currentTimeMillis) start)]
(when (>= time 1000) (warn id "took" time "msecs"))
data))
@ -25,5 +25,5 @@
(defn view
"Creates a Honey SQL view that uses a jdbc database configuration"
([id db hsql-fn post-fn] (HSQLView. id db hsql-fn post-fn))
([id db hsql-fn] (view id db hsql-fn identity)))
[id db hsql-fn & {:keys [row-fn]}]
(HSQLView. id db hsql-fn (or row-fn identity)))