provide non-distributed system default send-hints! function
This commit is contained in:
parent
b3c2b9fc27
commit
2752c8a92c
|
@ -1,12 +1,12 @@
|
||||||
(ns views.honeysql.core
|
(ns views.honeysql.core
|
||||||
(:require
|
(:require
|
||||||
[views.core :refer [hint]]
|
[views.core :refer [hint refresh-views!]]
|
||||||
[views.honeysql.util :refer [query-tables]]
|
[views.honeysql.util :refer [query-tables]]
|
||||||
[honeysql.core :as hsql]
|
[honeysql.core :as hsql]
|
||||||
[clojure.tools.logging :refer [error]]
|
[clojure.tools.logging :refer [error]]
|
||||||
[clojure.java.jdbc :as j]))
|
[clojure.java.jdbc :as j]))
|
||||||
|
|
||||||
(def send-hints! (atom (fn [hints] (error "send-hints! not configured"))))
|
(def send-hints! (atom (fn [hints] (refresh-views! hints))))
|
||||||
|
|
||||||
(defmacro with-view-transaction
|
(defmacro with-view-transaction
|
||||||
"Like with-db-transaction, but sends view hints at end of transaction."
|
"Like with-db-transaction, but sends view hints at end of transaction."
|
||||||
|
|
Loading…
Reference in a new issue