diff options
| author | Richard M. Stallman <rms@gnu.org> | 1999-02-16 00:52:36 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1999-02-16 00:52:36 +0000 |
| commit | c306e0e09febea487ba697649703ab0c66bdadfc (patch) | |
| tree | ddae1a1ee0bae81b34b464514bdbc5f3f2c67fab /lisp/subr.el | |
| parent | 2654fa92b2d9bd1cd6f43f3ae48ca1f8b754d306 (diff) | |
| download | emacs-c306e0e09febea487ba697649703ab0c66bdadfc.tar.gz | |
(momentary-string-display): Bind inhibit-read-only.
Diffstat (limited to 'lisp/subr.el')
| -rw-r--r-- | lisp/subr.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index 0cea4ed5b98..8954dff55e3 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -828,7 +828,7 @@ otherwise it is then available as input (as a command if nothing else). Display MESSAGE (optional fourth arg) in the echo area. If MESSAGE is nil, instructions to type EXIT-CHAR are displayed there." (or exit-char (setq exit-char ?\ )) - (let ((buffer-read-only nil) + (let ((inhibit-read-only t) ;; Don't modify the undo list at all. (buffer-undo-list t) (modified (buffer-modified-p)) |