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

*default-freeze-compressor-selector* should be public

Browse source
This commit is contained in:
Peter Taoussanis 2015-09-17 11:10:51 +07:00
parent a3847a4818
commit 41d3dcd467
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/taoensso/nippy.clj
View file

@ -382,12 +382,12 @@
(> ba-len 128) lz4-compressor (> ba-len 128) lz4-compressor
:else nil))) :else nil)))
(encore/defonce* ^:dynamic ^:private *default-freeze-compressor-selector* (encore/defonce* ^:dynamic *default-freeze-compressor-selector*
"(fn selector [^bytes ba])->compressor used by `(freeze <x> {:compressor :auto})."
default-freeze-compressor-selector) default-freeze-compressor-selector)
(defn set-default-freeze-compressor-selector! (defn set-default-freeze-compressor-selector!
"Sets global dynamic (fn selector [^bytes ba])->compressor used by "Sets root binding of `*default-freeze-compressor-selector*`."
`(freeze <x> {:compressor :auto <...>})."
[selector] [selector]
(alter-var-root #'*default-freeze-compressor-selector* (constantly selector))) (alter-var-root #'*default-freeze-compressor-selector* (constantly selector)))