Из EmacsWiki эта функция Elisp хорошо работает для меня:
(defun clear-shell ()
(interactive)
(let ((old-max comint-buffer-maximum-size))
(setq comint-buffer-maximum-size 0)
(comint-truncate-buffer)
(setq comint-buffer-maximum-size old-max)))
Поместите это в ваш ~/.emacs.d/init.el
и выполните с помощью M-x clear-shell
, или свяжите его с ключом в init.el
, например:
(global-set-key (kbd "\C-x c") 'clear-shell)