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

Expose exception to user as :throwable

Browse source
This commit is contained in:
kul 2014-04-10 16:06:56 +05:30
parent ccca7126a2
commit af8e47d4ff
1 changed files with 7 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/taoensso/nippy.clj
View file

@ -436,8 +436,9 @@
id-reader
(let [edn (read-utf8 in)]
(try (edn/read-string {:readers *data-readers*} edn)
(catch Exception _ {:nippy/unthawable edn
:type :reader})))
(catch Exception e {:nippy/unthawable edn
:type :reader
:throwable e})))
id-serializable
(let [class-name (read-utf8 in)]
@ -446,8 +447,9 @@
object (.readObject (ObjectInputStream. in))
class ^Class (Class/forName class-name)]
(cast class object))
(catch Exception _ {:nippy/unthawable class-name
:type :serializable})))
(catch Exception e {:nippy/unthawable class-name
:type :serializable
:throwable e})))
id-bytes (read-bytes in)
id-nil nil
@ -551,7 +553,7 @@
nil nil
:aes128-sha512 aes128-encryptor
:no-header (throw (ex-info ":auto not supported on headerless data." {}))
:else (throw (ex-info ":auto not supported for non-standard encryptors."))
:else (throw (ex-info ":auto not supported for non-standard encryptors." {}))
(throw (ex-info (format "Unrecognized :auto encryptor id: %s" encryptor-id)
{:encryptor-id encryptor-id}))))