Commit b784bda4 authored by Luc Teirlinck's avatar Luc Teirlinck
Browse files

(comint-delete-output): Bind inhibit-read-only to t.

parent 759f960a
......@@ -2006,7 +2006,8 @@ This function could be in the list `comint-output-filter-functions'."
Does not delete the prompt."
(interactive)
(let ((proc (get-buffer-process (current-buffer)))
(replacement nil))
(replacement nil)
(inhibit-read-only t))
(save-excursion
(let ((pmark (progn (goto-char (process-mark proc))
(forward-line 0)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment