mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00
Code Issues Releases Activity

* lisp/descr-text.el (describe-char): Display the script.

Browse Source 
Fixes: debbugs:13698
This commit is contained in:
YE Qianchuan 2013-02-13 09:54:59 -05:00 committed by Stefan Monnier
parent 4d0463b974
commit 67f3e54ad2
2 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,3 +1,7 @@
2013-02-13 YE Qianchuan <stool.ye@gmail.com> (tiny change)
* descr-text.el (describe-char): Display the script (bug#13698).
2013-02-13 Stefan Monnier <monnier@iro.umontreal.ca>
* tmm.el: Use lexical-binding and current-active-maps.

3
lisp/descr-text.el
View File

@ -574,6 +574,9 @@ relevant to POS."
'help-echo
"mouse-2, RET: show this character in its character set")
str)))
,@(let ((script (aref char-script-table char)))
(if script
(list (list "script" (symbol-name script)))))
("syntax"
,(let ((syntax (syntax-after pos)))
(with-temp-buffer