Mercurial > emacs
changeset 6553:fca6271b0983
(momentary-string-display): Avoid modifying the undo list.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 28 Mar 1994 06:08:35 +0000 |
| parents | 3b84ed22f747 |
| children | 5f8effa94d20 |
| files | lisp/subr.el |
| diffstat | 1 files changed, 2 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/subr.el Mon Mar 28 05:41:05 1994 +0000 +++ b/lisp/subr.el Mon Mar 28 06:08:35 1994 +0000 @@ -600,6 +600,8 @@ If MESSAGE is nil, instructions to type EXIT-CHAR are displayed there." (or exit-char (setq exit-char ?\ )) (let ((buffer-read-only nil) + ;; Don't modify the undo list at all. + (buffer-undo-list t) (modified (buffer-modified-p)) (name buffer-file-name) insert-end)