From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 17 Apr 1997 21:22:21 +0000 (+0000)
Subject: (sgml-name-char): Ask user with a prompt.
X-Git-Tag: emacs-20.1~2445
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9b0ffdac4b452ea635dae7ea6e34300981bbd5a0;p=emacs.git

(sgml-name-char): Ask user with a prompt.
---

diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el
index c9734c2a6c7..5102e87b024 100644
--- a/lisp/textmodes/sgml-mode.el
+++ b/lisp/textmodes/sgml-mode.el
@@ -436,7 +436,7 @@ or M-- for a soft hyphen."
   (interactive "*")
   (insert ?&)
   (or char
-      (setq char (read-quoted-char)))
+      (setq char (read-quoted-char "Enter char or octal number")))
   (delete-backward-char 1)
   (insert char)
   (undo-boundary)