1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-01 08:17:38 +00:00

Fix setting of composition-function-table.

This commit is contained in:
Chong Yidong 2009-01-01 07:47:55 +00:00
parent eaf582ba78
commit f07ed73ccc
2 changed files with 3 additions and 2 deletions

View File

@ -29,7 +29,7 @@
(set-char-table-range composition-function-table
'(#xAA00 . #xAA5F)
'(("[\xAA00-\xAA5F]+" . font-shape-text)))
(list (vector "[\xAA00-\xAA5F]+" 0 'font-shape-gstring)))
(set-language-info-alist
"Cham" '((charset unicode)

View File

@ -30,7 +30,8 @@
(sample-text . "Khmer (ភាសាខ្មែរ) ជំរាបសួរ")
(documentation . t)))
(let ((val '(("[\x1780-\x17FF\x19E0-\x19FF\x200C\x200D]+" . font-shape-text))))
(let ((val (list (vector "[\x1780-\x17FF\x19E0-\x19FF\x200C\x200D]+"
0 'font-shape-gstring))))
(set-char-table-range composition-function-table '(#x1780 . #x17FF) val)
(set-char-table-range composition-function-table '(#x19E0 . #x19FF) val))