Skip to content

Commit 1517c76

Browse files
plexusbbatsov
authored andcommitted
Change for readability
Maybe it's me but I had a really hard time parsing `(let)` inside `(->>)`.
1 parent b29265c commit 1517c76

File tree

1 file changed

+6
-5
lines changed

1 file changed

+6
-5
lines changed

src/cider/nrepl/middleware/macroexpand.clj

Lines changed: 6 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -200,11 +200,12 @@
200200
in the context of the given :ns, using the provided :expander.
201201
and :display-namespaces options."
202202
[{:keys [code expander ns] :as msg}]
203-
(->> (let [expander-fn (resolve-expander-cljs msg)]
204-
(cljs/with-cljs-env msg
205-
(cljs/with-cljs-ns ns
206-
(expander-fn (reader/read-string code)))))
207-
(walk/prewalk (post-expansion-walker-cljs msg))))
203+
(let [expander-fn (resolve-expander-cljs msg)
204+
code (reader/read-string code)]
205+
(walk/prewalk (post-expansion-walker-cljs msg)
206+
(cljs/with-cljs-env msg
207+
(cljs/with-cljs-ns ns
208+
(expander-fn code))))))
208209

209210
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
210211

0 commit comments

Comments
 (0)