Merge pull request #84 from yetanalytics/cljs_raw_string

resolved raw string cljs statement-data bug

Author: cliffcaseyyet

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

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"