fix edge case where evaluating ns forms fails on return value

fixes #711
bhauman · Aug 12, 2018 · e0f6c64 · e0f6c64
1 parent dfd010d
commit e0f6c64
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/sidecar/src/figwheel_sidecar/components/figwheel_server.clj b/sidecar/src/figwheel_sidecar/components/figwheel_server.clj
@@ -39,7 +39,10 @@
 
 (defn read-msg [data]
   (try
-    (let [msg (edn/read-string data)]
+    (let [msg
+          (binding [*read-eval* false
+                    *default-data-reader-fn* (fn [tag res] res)]
+            (read-string data))]
       (if (and (map? msg) (:figwheel-event msg)) msg {}))
     (catch Exception e
       (println "Figwheel: message from client couldn't be read!")