gitback/doomemacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

lang/clojure: start clojurescript repl correctly

Browse Source
This commit is contained in:
Undead Kernel 2019-10-15 17:35:22 +02:00
parent 24b336322c
commit a0870d0d75
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
modules/lang/clojure/autoload.el
View File

@ -17,10 +17,13 @@ at point."
"Open a Cider REPL for clojure and return the buffer." "Open a Cider REPL for clojure and return the buffer."
(interactive "P") (interactive "P")
;; TODO Better error handling ;; TODO Better error handling
;; type is `clj' for clojure and `cljs' for clojurescript
;; ... with no type specified, assume `clj'.
(let ((type (or type 'clj))) (let ((type (or type 'clj)))
(if-let (buffer (cider-current-repl type)) (if-let (buffer (cider-current-repl type))
(pop-to-buffer buffer) (pop-to-buffer buffer)
(let ((process (cider-jack-in-clj arg))) (let ((process (cond ((eq type 'clj) (cider-jack-in-clj arg))
((eq type 'cljs) (cider-jack-in-cljs arg)))))
(message "Starting CIDER server for the first time...") (message "Starting CIDER server for the first time...")
(while (and (process-live-p process) (while (and (process-live-p process)
(not (cider-current-repl type))) (not (cider-current-repl type)))