emacs 苹果酒清除 REPL 缓冲区

emacs cider clear REPL buffer

我只是想清除 repl 缓冲区,以便在第一行留下一个提示,例如 (user>)。

我有一个键绑定:

(put 'erase-buffer 'disabled nil)
(global-set-key (kbd "C-x C-<backspace>") 'erase-buffer)

但这给出了消息:

text is read only

有选项 C-c C-o 但这只会清除最后一个 return 值。

当使用 python 和 run-python 时,以下命令 C-x M-o 我认为是 comint-clear-buffer

cider-repl.el 提供了一个函数 cider-repl-clear-buffer,默认绑定到:

M-x c-r--bu RET

据我所知,C-c M-b 没有被 cider-repl 使用:

(add-hook 'cider-repl-mode-hook
      '(lambda () (define-key cider-repl-mode-map (kbd "C-c M-b")
            'cider-repl-clear-buffer)))