mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 10:31:37 -08:00
Code Issues Projects Releases Wiki Activity

(sgml-tag-help): Pass proper format string to message.

Browse source
This commit is contained in:
Karl Heuer 1996-01-25 00:57:01 +00:00
parent 26544100fa
commit f68f40e039
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/textmodes/sgml-mode.el
View file

@ -530,7 +530,8 @@ With prefix ARG only self insert."
(or (stringp tag) (or (stringp tag)
(error "No tag selected")) (error "No tag selected"))
(setq tag (downcase tag)) (setq tag (downcase tag))
(message (or (cdr (assoc tag sgml-tag-help)) (message "%s"
(or (cdr (assoc tag sgml-tag-help))
(and (eq (aref tag 0) ?/) (and (eq (aref tag 0) ?/)
(cdr (assoc (substring tag 1) sgml-tag-help))) (cdr (assoc (substring tag 1) sgml-tag-help)))
"No description available"))) "No description available")))