mirror of
https://github.com/doomemacs/doomemacs
synced 2025-09-10 15:33:36 -05:00
Refactor REPL config
This commit is contained in:
@@ -21,17 +21,16 @@
|
||||
(defvar repl-p nil)
|
||||
(make-variable-buffer-local 'repl-p)
|
||||
|
||||
(defun narf|repl-init ()
|
||||
(add-hook! repl-toggle-mode
|
||||
(yascroll-bar-mode +1)
|
||||
(evil-initialize-state 'emacs)
|
||||
(setq mode-line-format nil
|
||||
repl-p t))
|
||||
(add-hook! repl-toggle-mode 'narf|repl-init)
|
||||
|
||||
:config
|
||||
(map! :map repl-toggle-mode-map
|
||||
:i "C-n" 'comint-next-input
|
||||
:i "C-p" 'comint-previous-input)
|
||||
)
|
||||
:i "C-p" 'comint-previous-input))
|
||||
|
||||
(provide 'core-eval)
|
||||
;;; core-eval.el ends here
|
||||
|
@@ -176,8 +176,7 @@
|
||||
(cond ((and (derived-mode-p 'comint-mode)
|
||||
(featurep 'repl-toggle)
|
||||
repl-toggle-mode)
|
||||
(setq rtog/--last-buffer nil
|
||||
narf-repl-buffer nil))
|
||||
(setq rtog/--last-buffer nil))
|
||||
((eq major-mode 'messages-buffer-mode)
|
||||
(bury-buffer)
|
||||
(setq dont-kill t)))
|
||||
|
Reference in New Issue
Block a user