CLJS-3097: Fix compatibility with tools.reader 1.3.1 and bump it

Author: kommen

deps.edn

@@ -1,7 +1,7 @@
 {:paths ["src/main/clojure" "src/main/cljs" "resources"]
  :deps
  {org.clojure/clojure {:mvn/version "1.9.0"}
-  org.clojure/tools.reader {:mvn/version "1.3.0"}
+  org.clojure/tools.reader {:mvn/version "1.3.2"}
   org.clojure/test.check {:mvn/version "0.10.0-alpha3"}
   org.clojure/spec.alpha {:mvn/version "0.1.143"}
   org.clojure/core.specs.alpha {:mvn/version "0.1.24"}

pom.template.xml

@@ -50,7 +50,7 @@
         <dependency>
             <groupId>org.clojure</groupId>
             <artifactId>tools.reader</artifactId>
-            <version>1.3.0</version>
+            <version>1.3.2</version>
         </dependency>
         <dependency>
             <groupId>com.cognitect</groupId>

project.clj

@@ -12,7 +12,7 @@
                  [org.clojure/spec.alpha "0.1.143"]
                  [org.clojure/core.specs.alpha "0.1.24"]
                  [org.clojure/data.json "0.2.6"]
-                 [org.clojure/tools.reader "1.3.0"]
+                 [org.clojure/tools.reader "1.3.2"]
                  [org.clojure/test.check "0.10.0-alpha3" :scope "test"]
                  [com.cognitect/transit-clj "0.8.309"]
                  [org.clojure/google-closure-library "0.0-20170809-b9c14c6b"]

src/main/clojure/cljs/core/server.clj

@@ -96,8 +96,8 @@
                                                        (apply merge
                                                          ((juxt :requires :require-macros)
                                                            (ana/get-namespace ana/*cljs-ns*)))]
-                                               (reader/read+string in-reader
-                                                 {:eof EOF :read-cond :allow :features #{:cljs}}))]
+                                               (reader/read+string {:eof EOF :read-cond :allow :features #{:cljs}}
+                                                 in-reader))]
                                 (try
                                   (when-not (identical? form EOF)
                                     (let [start (System/nanoTime)