From 1ce529e5bd91a07096d9718a607854edf4afa478 Mon Sep 17 00:00:00 2001 From: "Alexander K. Hudek" Date: Tue, 21 Apr 2015 18:00:41 -0400 Subject: [PATCH] Fix bug with send-hints and adjust spacing. --- src/views/honeysql/core.clj | 2 +- src/views/honeysql/view.clj | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) 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))