luciano/honeysql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

rename to satisfy Eastwood

Browse source
This commit is contained in:
Sean Corfield 2022-01-10 11:12:47 -08:00
parent 9ea822a1b2
commit 18adeb1048
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/honey/sql.cljc
View file

@ -1361,13 +1361,13 @@
{:valid-dialects (vec (sort (keys dialects)))}))) {:valid-dialects (vec (sort (keys dialects)))})))
dialect) dialect)
(def through (def through-opts
"Resolves to core.cache.wrapped/lookup-or-miss when it's available, or to a throwing function otherwise. "Resolves to core.cache.wrapped/lookup-or-miss when it's available, or to a throwing function otherwise.
In CLJS it always resolves to a throwing function." In CLJS it always resolves to a throwing function."
#?(:clj (try (require 'clojure.core.cache.wrapped) #?(:clj (try (require 'clojure.core.cache.wrapped)
(let [through (deref (resolve 'clojure.core.cache.wrapped/lookup-or-miss))] (let [lookup-or-miss (deref (resolve 'clojure.core.cache.wrapped/lookup-or-miss))]
(fn [_opts cache data f] (fn [_opts cache data f]
(through cache data f))) (lookup-or-miss cache data f)))
(catch Throwable _ (catch Throwable _
(fn [opts _cache _data _f] (fn [opts _cache _data _f]
(throw (ex-info "include core.cached on the classpath to use the :cache option" opts))))) (throw (ex-info "include core.cached on the classpath to use the :cache option" opts)))))
@ -1412,7 +1412,7 @@
*params* (:params opts) *params* (:params opts)
*values-default-columns* (:values-default-columns opts)] *values-default-columns* (:values-default-columns opts)]
(if cache (if cache
(->> (through opts cache data (fn [_] (format-dsl data (dissoc opts :cache)))) (->> (through-opts opts cache data (fn [_] (format-dsl data (dissoc opts :cache))))
(mapv #(unwrap % opts))) (mapv #(unwrap % opts)))
(mapv #(unwrap % opts) (format-dsl data opts)))))) (mapv #(unwrap % opts) (format-dsl data opts))))))
([data k v & {:as opts}] (format data (assoc opts k v)))) ([data k v & {:as opts}] (format data (assoc opts k v))))