diff options
| author | Kenichi Handa | 2008-02-25 01:36:48 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2008-02-25 01:36:48 +0000 |
| commit | 0bc30ad94db078887bade9a09b1e49c8a0f70361 (patch) | |
| tree | 07679a85fdce1c0ebea083dbe1bac325ce5bed8f | |
| parent | 446465b9d9b471ebba9a5854916f5600c3a044c0 (diff) | |
| download | emacs-0bc30ad94db078887bade9a09b1e49c8a0f70361.tar.gz emacs-0bc30ad94db078887bade9a09b1e49c8a0f70361.zip | |
Register lao-composition-function in
composition-function-table.
| -rw-r--r-- | lisp/language/lao.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/language/lao.el b/lisp/language/lao.el index 561884e91d0..e79b20a4438 100644 --- a/lisp/language/lao.el +++ b/lisp/language/lao.el | |||
| @@ -48,13 +48,8 @@ | |||
| 48 | (features lao-util) | 48 | (features lao-util) |
| 49 | (documentation . t))) | 49 | (documentation . t))) |
| 50 | 50 | ||
| 51 | ;; For automatic composition. | ||
| 52 | ;; (let ((chars "(1QTUVWXY[\hijklm(B")) | ||
| 53 | ;; (dotimes (i (length chars)) | ||
| 54 | ;; (aset composition-function-table (aref chars i) | ||
| 55 | ;; 'lao-composition-function))) | ||
| 56 | (set-char-table-range composition-function-table '(#xE80 . #xEDF) | 51 | (set-char-table-range composition-function-table '(#xE80 . #xEDF) |
| 57 | '(("[\xE80-\xEDF]+" . font-shape-text))) | 52 | '(("[\xE80-\xEDF]+" . lao-composition-function))) |
| 58 | 53 | ||
| 59 | (provide 'lao) | 54 | (provide 'lao) |
| 60 | 55 | ||