Command to clear shell while using emacs shell

社会主义新天地 提交于 2019-11-29 21:11:54

Update February 2015

Just noticed that Emacs now (version 25+) has the command comint-clear-buffer, bound to C-c M-o by default, that does what we need here, and probably is preferable to the answers I originally posted below.

Options to consider:

  1. C-l will recenter the buffer. Pressing it repeatedly cycles the buffer, so that point appears at the top, middle, or bottom of the buffer. When it stops at the top, the buffer looks like it's been cleared, although all the text is still there, out of view.

  2. C-x h marks the whole buffer, after which C-w kills it. This kills the last prompt as well, but after you enter the next command you get your prompt back.

  3. You can also use erase-buffer, which isn't bound to a key by default, but it's easily done (you can also use M-x erase-buffer:

    (defun my-shell-hook ()
      (local-set-key "\C-cl" 'erase-buffer))

    (add-hook 'shell-mode-hook 'my-shell-hook)

That binds it to C-c l; you can pick what you like.

  1. A quick fix to re-create your prompt after clearing is possible:
    (defun my-clear ()
      (interactive)
      (erase-buffer)
      (comint-send-input))

    (defun my-shell-hook ()
      (local-set-key "\C-cl" 'my-clear))

    (add-hook 'shell-mode-hook 'my-shell-hook)

After you've been using emacs for a while, marking and killing regions becomes natural, so you might find the first option is enough. If not, the last option is closest to what you want.

EDIT: just found this on the emacs wiki, it's better than my option 4:

(defun my-clear ()
  (interactive)
  (let ((comint-buffer-maximum-size 0))
    (comint-truncate-buffer)))

Most of the solutions proposed here will not work in EShell mode!

EShell mode buffer is read only, so kill and erase commands will not work.

To use your ordinary Ctrl-L to clear eshell terminal, add this to your .init file:

(defun eshell-clear-buffer ()
  "Clear terminal"
  (interactive)
  (let ((inhibit-read-only t))
    (erase-buffer)
    (eshell-send-input)))
(add-hook 'eshell-mode-hook
      '(lambda()
          (local-set-key (kbd "C-l") 'eshell-clear-buffer)))

Note: To better emulate the standard Ctrl-L, after clearing the buffer, the command will restore the initial prompt.

With your point in the *shell* buffer, run:

C-c M-o

or

M-x comint-clear-buffer

NOTE: This also works in *Python* shell, but doesn't seem to work in *eshell*.

AFAIK you can't clear when you start as M-x shell but if you do M-x term you get a fully functional terminal where clear works as intended. I may be wrong on this though but personally I use M-x term now since it is fully functioning.

If you find, you can't use erase-buffer and shows text is read only. You can use following replace function.

  (defun eshell/clear ()
  "Hi, you will clear the eshell buffer."
  (interactive)
  (let ((inhibit-read-only t))
    (erase-buffer)
    (message "erase eshell buffer")))

Or... you can truncate the buffer.

(let ((eshell-buffer-maximum-lines 0)) (eshell-truncate-buffer))
标签
易学教程内所有资源均来自网络或用户发布的内容,如有违反法律规定的内容欢迎反馈
该文章没有解决你所遇到的问题?点击提问,说说你的问题,让更多的人一起探讨吧!