Как я могу получить режим паредита при выполнении eval-выражения?

Question

Мне нравится режим паредита в Emacs, но я очень скучаю по нему при выполнении eval-expression (M-:). Как я могу сделать паредит в минибуфере при выполнении eval-expression? Спасибо!

Answer 1

Добавить функцию к minibuffer-setup-hook, вот так:

(add-hook 'minibuffer-setup-hook 'conditionally-enable-paredit-mode)
(defun conditionally-enable-paredit-mode ()
  "enable paredit-mode during eval-expression"
  (if (eq this-command 'eval-expression)
      (paredit-mode 1)))

Answer 2

Добавить функцию paredit-mode к eval-expression-minibuffer-setup-hook, вот так

(add-hook 'eval-expression-minibuffer-setup-hook #'paredit-mode)