Mercurial > emacs
comparison lisp/language/tibetan.el @ 91285:52f31f16499e
Register font-shape-text in
composition-function-table.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 25 Dec 2007 11:05:49 +0000 |
| parents | d7ab840d0941 |
| children | 606f2d163a64 |
comparison
equal
deleted
inserted
replaced
| 91284:d1ec766050a6 | 91285:52f31f16499e |
|---|---|
| 604 (defvar tibetan-decomposed nil) | 604 (defvar tibetan-decomposed nil) |
| 605 (defvar tibetan-decomposed-temp nil) | 605 (defvar tibetan-decomposed-temp nil) |
| 606 | 606 |
| 607 ;; For automatic composition. | 607 ;; For automatic composition. |
| 608 (set-char-table-range composition-function-table '(#xF00 . #xFD1) | 608 (set-char-table-range composition-function-table '(#xF00 . #xFD1) |
| 609 'tibetan-composition-function) | 609 '(("[\xF00-\xFD1]+" . font-shape-text))) |
| 610 | 610 |
| 611 (provide 'tibetan) | 611 (provide 'tibetan) |
| 612 | 612 |
| 613 ;;; arch-tag: 8d37c8d7-f95d-450f-9ec2-819e61fc79a7 | 613 ;;; arch-tag: 8d37c8d7-f95d-450f-9ec2-819e61fc79a7 |
| 614 ;;; tibetan.el ends here | 614 ;;; tibetan.el ends here |