Commit 21b81bd8 authored by Ivan Shmakov's avatar Ivan Shmakov

Show the exact C-x 8 RET invocation in describe-char.

* lisp/descr-text.el (describe-char): Show the exact C-x 8 RET
invocation instead of a template.  (Bug#20522)
parent 1f7abd04
......@@ -618,7 +618,14 @@ relevant to POS."
'help-args '(,current-input-method))
"input method")
(list
"type \"C-x 8 RET HEX-CODEPOINT\" or \"C-x 8 RET NAME\"")))))
(let ((name
(or (get-char-code-property char 'name)
(get-char-code-property char 'old-name))))
(if name
(format
"type \"C-x 8 RET %x\" or \"C-x 8 RET %s\""
char name)
(format "type \"C-x 8 RET %x\"" char))))))))
("buffer code"
,(if multibyte-p
(encoded-string-description
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment