From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 16 Feb 1999 00:52:36 +0000 (+0000)
Subject: (momentary-string-display): Bind inhibit-read-only.
X-Git-Tag: emacs-20.4~627
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c306e0e09febea487ba697649703ab0c66bdadfc;p=emacs.git

(momentary-string-display): Bind inhibit-read-only.
---

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))