lang/clojure: fix repl handler #1714

Also: minor refactor
This commit is contained in:
Henrik Lissner 2019-10-07 20:12:41 -04:00
parent 0643630560
commit 4289df5bc2
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 7 additions and 7 deletions

View file

@ -16,8 +16,7 @@ at point."
(defun +clojure/open-repl (&optional arg)
"Open a Cider REPL and return the buffer."
(interactive "P")
(cider-jack-in arg)
(current-buffer))
(process-buffer (cider-jack-in arg)))
;;;###autoload
(defun +clojure/cider-switch-to-repl-buffer-and-switch-ns ()

View file

@ -1,10 +1,7 @@
;;; lang/clojure/config.el -*- lexical-binding: t; -*-
(after! clojure-mode
(add-hook 'clojure-mode-hook #'rainbow-delimiters-mode)
(set-repl-handler! 'clojure-mode #'+clojure/open-repl)
(set-eval-handler! 'clojure-mode #'cider-eval-region))
;;;###package clojure-mode
(add-hook 'clojure-mode-hook #'rainbow-delimiters-mode)
(use-package! cider
@ -12,6 +9,10 @@
;; cider jack in won't work.
:commands cider-jack-in cider-jack-in-clojurescript
:hook (clojure-mode-local-vars . cider-mode)
:init
(after! clojure-mode
(set-repl-handler! 'clojure-mode #'+clojure/open-repl)
(set-eval-handler! 'clojure-mode #'cider-eval-region))
:config
(add-hook 'cider-mode-hook #'eldoc-mode)
(set-lookup-handlers! 'cider-mode