From 40e1e27bf0209e0a065da5f240015ba495b25714 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Wed, 19 Nov 2025 14:44:34 +0100
Subject: [PATCH] :bug: Fix not covered case on schema decode fn on tokens-lib

---
 common/src/app/common/types/tokens_lib.cljc | 22 +++++++++++----------
 1 file changed, 12 insertions(+), 10 deletions(-)

diff --git a/common/src/app/common/types/tokens_lib.cljc b/common/src/app/common/types/tokens_lib.cljc
index aa698d323e..ec3a3e7bf9 100644
--- a/common/src/app/common/types/tokens_lib.cljc
+++ b/common/src/app/common/types/tokens_lib.cljc
@@ -1794,17 +1794,19 @@ Will return a value that matches this schema:
   data (without any case transformation). Used as schema decoder and
   in the SDK."
   [data]
-  (let [data (if (string? data)
-               (json/decode data :key-fn identity)
-               data)
-        data #?(:cljs (if (object? data)
-                        (json/->clj data :key-fn identity)
-                        data)
-                :clj data)
+  (if (instance? TokensLib data)
+    data
+    (let [data (if (string? data)
+                 (json/decode data :key-fn identity)
+                 data)
+          data #?(:cljs (if (object? data)
+                          (json/->clj data :key-fn identity)
+                          data)
+                  :clj data)
 
-        data (decode-multi-set-dtcg-data data)]
-    (-> (check-multi-set-dtcg-data data)
-        (parse-multi-set-dtcg-json))))
+          data (decode-multi-set-dtcg-data data)]
+      (-> (check-multi-set-dtcg-data data)
+          (parse-multi-set-dtcg-json)))))
 
 (defn- parse-multi-set-legacy-json
   "Parse a decoded json file with multi sets in legacy format into a TokensLib."