composite.el: Register compose-gstring-for-graphic in composition-function-table only for combining characters (Mn, Mc, Me).

This commit is contained in:
Kenichi Handa 2010-05-19 10:09:50 +09:00
parent c2eb4a8321
commit 2833d9158d
2 changed files with 10 additions and 4 deletions

View file

@ -1,3 +1,9 @@
2010-05-19 Kenichi Handa <handa@m17n.org>
* composite.el: Register compose-gstring-for-graphic in
composition-function-table only for combining characters (Mn, Mc,
Me).
2010-05-13 Chong Yidong <cyd@stupidchicken.com>
Add TeX open-block and close-block keybindings to SGML, and vice

View file

@ -532,9 +532,9 @@ after a sequence of character events."
(defun compose-gstring-for-graphic (gstring)
"Compose glyph-string GSTRING for graphic display.
Non-spacing characters are composed with the preceding base
Combining characters are composed with the preceding base
character. If the preceding character is not a base character,
each non-spacing character is composed as a spacing character by
each combining character is composed as a spacing character by
a padding space before and/or after the character.
All non-spacing characters has this function in
@ -660,9 +660,9 @@ All non-spacing characters has this function in
[nil 0 compose-gstring-for-graphic])))
(map-char-table
#'(lambda (key val)
(if (= val 0)
(if (memq val '(Mn Mc Me))
(set-char-table-range composition-function-table key elt)))
char-width-table))
unicode-category-table))
(defun compose-gstring-for-terminal (gstring)
"Compose glyph string GSTRING for terminal display.