diff options
| author | Kenichi Handa | 2009-03-19 01:00:11 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2009-03-19 01:00:11 +0000 |
| commit | 9ffcf5cb279f7e7a718dd67660e43e86528aa446 (patch) | |
| tree | 1ec2a17240bc5530a6a56f6570d7cd89e2ceb6ab | |
| parent | 316732d2c47be7a2c724cdabba35266ec7e72c7b (diff) | |
| download | emacs-9ffcf5cb279f7e7a718dd67660e43e86528aa446.tar.gz emacs-9ffcf5cb279f7e7a718dd67660e43e86528aa446.zip | |
(quail-update-leim-list-file): Save leim-list.el in utf-8.
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/international/quail.el | 2 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 051e0703bd3..bb99e3cc8fc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,11 @@ | |||
| 1 | 2009-03-19 Kenichi Handa <handa@m17n.org> | 1 | 2009-03-19 Kenichi Handa <handa@m17n.org> |
| 2 | 2 | ||
| 3 | * international/quail.el (quail-update-leim-list-file): Save | ||
| 4 | leim-list.el in utf-8. | ||
| 5 | |||
| 6 | * international/mule-cmds.el (leim-list-header): Use utf-8 coding | ||
| 7 | tag. | ||
| 8 | |||
| 3 | * term/ns-win.el: Call create-defualt-fontset, not | 9 | * term/ns-win.el: Call create-defualt-fontset, not |
| 4 | setup-default-fontset. Call create-fontset-from-fontset-spec | 10 | setup-default-fontset. Call create-fontset-from-fontset-spec |
| 5 | within condition-case. | 11 | within condition-case. |
diff --git a/lisp/international/quail.el b/lisp/international/quail.el index 63b00878f16..e0be69262b3 100644 --- a/lisp/international/quail.el +++ b/lisp/international/quail.el | |||
| @@ -3031,7 +3031,7 @@ of each directory." | |||
| 3031 | 3031 | ||
| 3032 | ;; At last, write out LEIM list file. | 3032 | ;; At last, write out LEIM list file. |
| 3033 | (with-current-buffer list-buf | 3033 | (with-current-buffer list-buf |
| 3034 | (let ((coding-system-for-write 'iso-2022-7bit)) | 3034 | (let ((coding-system-for-write 'utf-8)) |
| 3035 | (save-buffer 0))) | 3035 | (save-buffer 0))) |
| 3036 | (kill-buffer list-buf) | 3036 | (kill-buffer list-buf) |
| 3037 | (message "Updating %s ... done" leim-list))) | 3037 | (message "Updating %s ... done" leim-list))) |