From b784bda46b9220a85d7d3e422aa563bf6edc8635 Mon Sep 17 00:00:00 2001 From: Luc Teirlinck Date: Sat, 24 Apr 2004 23:06:03 +0000 Subject: [PATCH] (comint-delete-output): Bind inhibit-read-only to t. --- lisp/comint.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/comint.el b/lisp/comint.el index 57e785dce47..7766307f156 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -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) -- 2.11.4.GIT