Hotfix: *final-freeze-fallback* back compatibility was broken

This commit is contained in:
Peter Taoussanis 2016-06-17 12:25:31 +07:00
parent 537b39aba2
commit f94bc79a01

View file

@ -861,8 +861,10 @@
(try-write-serializable out x)
(try-write-readable out x)
;; For back compatibility:
(when-let [fff *final-freeze-fallback*] (fff out x))
;; For back compatibility (nb Timbre's Carmine appender)
(when-let [fff *final-freeze-fallback*]
(fff out x)
true)
(throw-unfreezable x))))