From 8778fa49cc1ed2c165196ca5ec222a9ed5c8e4c1 Mon Sep 17 00:00:00 2001
From: Peter Taoussanis <peter@taoensso.com>
Date: Wed, 2 Aug 2023 12:20:17 +0200
Subject: [PATCH] [new] Include `:bindings` in ex-data of thaw failures

---
 src/taoensso/nippy.clj | 16 +++++++++++++---
 1 file changed, 13 insertions(+), 3 deletions(-)

diff --git a/src/taoensso/nippy.clj b/src/taoensso/nippy.clj
index dba6063..f3e31de 100644
--- a/src/taoensso/nippy.clj
+++ b/src/taoensso/nippy.clj
@@ -1762,9 +1762,19 @@
                ([e msg]
                 (throw
                   (ex-info (str "Thaw failed. " msg)
-                    {:opts (assoc opts
-                             :compressor compressor
-                             :encryptor  encryptor)}
+                    {:opts
+                     (assoc opts
+                       :compressor compressor
+                       :encryptor  encryptor)
+
+                     :bindings
+                     (enc/assoc-some {}
+                       '*freeze-fallback*             *freeze-fallback*
+                       '*auto-freeze-compressor*      *auto-freeze-compressor*
+                       '*custom-readers*              *custom-readers*
+                       '*incl-metadata?*              *incl-metadata?*
+                       '*thaw-serializable-allowlist* *thaw-serializable-allowlist*)}
+
                     e))))
 
              thaw-data