From c6feb01699d9a042587084d85bb0f8482ec8b120 Mon Sep 17 00:00:00 2001 From: Stephen Brady Date: Sat, 2 Jul 2016 18:55:18 -0700 Subject: [PATCH] Enable handling of non-default tagged literals - Fixes https://github.com/LightTable/Clojure/issues/64 and https://github.com/LightTable/LightTable/issues/244 --- lein-light-nrepl/src/lighttable/nrepl/eval.clj | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lein-light-nrepl/src/lighttable/nrepl/eval.clj b/lein-light-nrepl/src/lighttable/nrepl/eval.clj index a715b64..b880575 100644 --- a/lein-light-nrepl/src/lighttable/nrepl/eval.clj +++ b/lein-light-nrepl/src/lighttable/nrepl/eval.clj @@ -18,7 +18,8 @@ (defn- try-read [rdr feature] {:pre [(#{:clj :cljs} feature)]} (when rdr - (reader/read {:read-cond :allow :features #{feature} :eof ::EOF} rdr))) + (binding [reader/*data-readers* *data-readers*] + (reader/read {:read-cond :allow :features #{feature} :eof ::EOF} rdr)))) (defn lined-read ([string] (lined-read string :clj))