aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuri Linkov2020-07-14 03:12:06 +0300
committerJuri Linkov2020-07-14 03:12:06 +0300
commit7b0216fbc0a1051e6f3bee5bf6c2435b2b3a1ddf (patch)
tree26c576867cee107189566cdf48b72f5de85d584c
parent46a0c115f041d246b26ffcd93a8adbfab01e4b07 (diff)
downloademacs-7b0216fbc0a1051e6f3bee5bf6c2435b2b3a1ddf.tar.gz
emacs-7b0216fbc0a1051e6f3bee5bf6c2435b2b3a1ddf.zip
Improve documentation of "C-u C-x ="
* doc/emacs/mule.texi (International Chars): Update the composition information displayed by "C-u C-x =". (Bug#42256)
-rw-r--r--doc/emacs/mule.texi2
-rw-r--r--lisp/descr-text.el2
2 files changed, 2 insertions, 2 deletions
diff --git a/doc/emacs/mule.texi b/doc/emacs/mule.texi
index 0f07d286cda..6eff0ca0d22 100644
--- a/doc/emacs/mule.texi
+++ b/doc/emacs/mule.texi
@@ -202,7 +202,7 @@ terminal, the code(s) sent to the terminal.
202@item 202@item
203If the character was composed on display with any following characters 203If the character was composed on display with any following characters
204to form one or more grapheme clusters, the composition information: 204to form one or more grapheme clusters, the composition information:
205the font glyphs if the frame is on a graphical display, else the 205the font glyphs if the frame is on a graphical display, and the
206characters that were composed. 206characters that were composed.
207 207
208@item 208@item
diff --git a/lisp/descr-text.el b/lisp/descr-text.el
index 4de1a7b7005..6246f59d495 100644
--- a/lisp/descr-text.el
+++ b/lisp/descr-text.el
@@ -775,7 +775,7 @@ The character information includes:
775 (setq glyph (lgstring-glyph gstring from))) 775 (setq glyph (lgstring-glyph gstring from)))
776 (insert (format " %S\n" glyph)) 776 (insert (format " %S\n" glyph))
777 (setq from (1+ from))) 777 (setq from (1+ from)))
778 (insert "from these character(s):\n") 778 (insert "from these characters:\n")
779 (dotimes (i (lgstring-char-len gstring)) 779 (dotimes (i (lgstring-char-len gstring))
780 (let ((char (lgstring-char gstring i))) 780 (let ((char (lgstring-char gstring i)))
781 (insert (format " %c (#x%x) %s\n" 781 (insert (format " %c (#x%x) %s\n"