diff options
| author | Luc Teirlinck <[email protected]> | 2004-04-24 23:06:03 +0000 |
|---|---|---|
| committer | Luc Teirlinck <[email protected]> | 2004-04-24 23:06:03 +0000 |
| commit | b784bda46b9220a85d7d3e422aa563bf6edc8635 (patch) | |
| tree | 7f6d11222b01c19a2824e92e51645e2c59293049 | |
| parent | 759f960aeafb2650b94cf9e1cbcfb6f03b8b4f36 (diff) | |
(comint-delete-output): Bind inhibit-read-only to t.
| -rw-r--r-- | lisp/comint.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index 57e785dce4..7766307f15 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) |