diff --git a/src/views/honeysql/core.clj b/src/views/honeysql/core.clj index 3c8dac6..80a7d75 100644 --- a/src/views/honeysql/core.clj +++ b/src/views/honeysql/core.clj @@ -41,7 +41,7 @@ hsql-hint (hint :views/honeysql (query-tables action-map))] (if-let [hints (:hints db)] (swap! hints conj hsql-hint) - (send-hints! [hsql-hint])) + (@send-hints! [hsql-hint])) results)) (defn set-hint-transport-fn! diff --git a/src/views/honeysql/view.clj b/src/views/honeysql/view.clj index af59ba2..64835d5 100644 --- a/src/views/honeysql/view.clj +++ b/src/views/honeysql/view.clj @@ -12,7 +12,7 @@ (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 post-fn) time (- (System/currentTimeMillis) start)] (when (>= time 1000) (warn id "took" time "msecs")) data))