Stop documenting :skip-header? option

It's almost entirely useless now, and dangerous: folks who absolutely know what
they're doing can keep using it, but don't broadcast its existance.
This commit is contained in:
Peter Taoussanis 2015-09-30 12:43:11 +07:00
parent c5901730ea
commit c7c0c6fe54

View file

@ -400,10 +400,12 @@
"Serializes arg (any Clojure data type) to a byte array. To freeze custom
types, extend the Clojure reader or see `extend-freeze`."
(^bytes [x] (freeze x nil))
(^bytes [x {:keys [compressor encryptor password skip-header?]
(^bytes [x {:keys [compressor encryptor password]
:or {compressor :auto
encryptor aes128-encryptor}}]
(let [encryptor (when password encryptor)
encryptor aes128-encryptor}
:as opts}]
(let [skip-header? (:skip-header? opts) ; Want this *un*documented
encryptor (when password encryptor)
zero-copy-mode? (and (nil? compressor) (nil? encryptor))
baos (ByteArrayOutputStream. 64)
dos (DataOutputStream. baos)]