Skip to content

Commit 654b79f

Browse files
committed
Fix after 0.34 breakage
1 parent f1124b4 commit 654b79f

File tree

1 file changed

+6
-3
lines changed

1 file changed

+6
-3
lines changed

src/lambdaisland/launchpad.clj

Lines changed: 6 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -45,9 +45,12 @@
4545
"-b,--nrepl-bind ADDR" {:doc "Bind address of nrepl, by default \"127.0.0.1\"."
4646
:default "127.0.0.1"}
4747
"--emacs" {:doc "Shorthand for --cider-nrepl --refactor-nrepl --cider-connect"
48-
:handler (fn [ctx] (assoc ctx :cider-nrepl :refactor-nrepl :cider-connect))}
48+
:handler (fn [ctx] (assoc ctx
49+
:cider-nrepl true
50+
:refactor-nrepl true
51+
:cider-connect true))}
4952
"--vs-code" {:doc "Alias for --cider-nrepl"
50-
:handler (fn [ctx] (assoc ctx :cider-nrepl))}
53+
:handler (fn [ctx] (assoc ctx :cider-nrepl true))}
5154
"--cider-nrepl" "Include CIDER nREPL dependency and middleware"
5255
"--refactor-nrepl" "Include refactor-nrepl dependency and middleware"
5356
"--cider-connect" "Automatically connect Emacs CIDER"
@@ -459,7 +462,7 @@
459462
(ansi-bold (ansi-fg :green "Clojure"))
460463
(ansi-fg :green "on nREPL port")
461464
(ansi-fg :magenta (:nrepl-port ctx)))
462-
(let [opts (filter (comp true? val) (:options ctx))
465+
(let [opts (filter (comp true? val) ctx)
463466
aliases (:aliases ctx)]
464467
(when (seq opts)
465468
(println (ansi-fg :green "Options:")

0 commit comments

Comments
 (0)