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)))})))
dialect)
(def through
(def through-opts
"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."
#?(: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]
(through cache data f)))
(lookup-or-miss cache data f)))
(catch Throwable _
(fn [opts _cache _data _f]
(throw (ex-info "include core.cached on the classpath to use the :cache option" opts)))))
@ -1412,7 +1412,7 @@
*params* (:params opts)
*values-default-columns* (:values-default-columns opts)]
(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) (format-dsl data opts))))))
([data k v & {:as opts}] (format data (assoc opts k v))))