# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 861312141 0
# Node ID e8d7c7e2acab7b9a145188ec655990c202ceab2c
# Parent  77604d2454dcc9f027d5d65fc15371114f8d0e5c
(sgml-name-char): Ask user with a prompt.

diff -r 77604d2454dc -r e8d7c7e2acab lisp/textmodes/sgml-mode.el
--- a/lisp/textmodes/sgml-mode.el	Thu Apr 17 18:00:12 1997 +0000
+++ b/lisp/textmodes/sgml-mode.el	Thu Apr 17 21:22:21 1997 +0000
@@ -436,7 +436,7 @@
   (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)