Mercurial > emacs
changeset 103179:fb77a6b5c2f6
(encoded-kbd-setup-keymap): Fix for big5.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Fri, 08 May 2009 02:24:30 +0000 |
| parents | 4f9eafb38e10 |
| children | c113346b39da |
| files | lisp/international/encoded-kb.el |
| diffstat | 1 files changed, 8 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/encoded-kb.el Fri May 08 02:15:52 2009 +0000 +++ b/lisp/international/encoded-kb.el Fri May 08 02:24:30 2009 +0000 @@ -262,6 +262,14 @@ (setq i (1+ i)))) 8) + ((eq (coding-system-type coding) 'big5) + (let ((i 128)) + (while (< i 256) + (define-key keymap + (vector i) 'encoded-kbd-self-insert-big5) + (setq i (1+ i)))) + 8) + ((eq (coding-system-type coding) 'charset) (dolist (elt (mapcar #'(lambda (x)