Merge pull request #84 from yetanalytics/cljs_raw_string

resolved raw string cljs statement-data bug
yetanalytics · Jan 17, 2024 · 84e2199 · 84e2199
2 parents 4aae5ff + b2cf6bd
commit 84e2199
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 2 deletions.
diff --git a/src/xapi_schema/core.cljc b/src/xapi_schema/core.cljc
@@ -39,7 +39,7 @@
                                       :else sd))
      :cljs (validate-statement-data*
             (cond
-              (string? sd) (.parse js/JSON sd)
+              (string? sd) (js->clj (.parse js/JSON sd))
               :else sd))))
 
 #?(:cljs

diff --git a/test/xapi_schema/core_test.cljc b/test/xapi_schema/core_test.cljc
@@ -73,7 +73,13 @@
      (testing "with string data"
        (let [statement (json/write-str long-statement)]
          (testing "it parses and returns the validated data"
-           (is (= long-statement (validate-statement-data statement)))))))
+           (is (= long-statement (validate-statement-data statement)))))) 
+     :cljs
+     (testing "with string data"
+       (let [json     (clj->js long-statement)
+             json-str (.stringify js/JSON json)]
+         (testing "it parses and returns the validated data"
+           (is (= long-statement (validate-statement-data json-str))))))) 
 
   #?(:cljs
      (testing "with nested data"