diff options
| author | Kenichi Handa | 2009-03-17 07:16:29 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2009-03-17 07:16:29 +0000 |
| commit | 44ded02464006b6094f4cff2490b9657b64f4b2a (patch) | |
| tree | 03f5377ec9db9eabfc39ea6ee6fb08d7346bb90c | |
| parent | b613b1dcc85fbd2578b90644a7216bc1bc7a9f51 (diff) | |
| download | emacs-44ded02464006b6094f4cff2490b9657b64f4b2a.tar.gz emacs-44ded02464006b6094f4cff2490b9657b64f4b2a.zip | |
(cjk-char-width-table): Add cp932-2-byte.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/international/characters.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e6fe5a4ed30..f42b5d59b83 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2009-03-17 ARISAWA Akihiro <ari@mbf.ocn.ne.jp> (tiny change) | ||
| 2 | |||
| 3 | * international/characters.el (cjk-char-width-table): Add | ||
| 4 | cp932-2-byte. | ||
| 5 | |||
| 1 | 2009-03-17 Chong Yidong <cyd@stupidchicken.com> | 6 | 2009-03-17 Chong Yidong <cyd@stupidchicken.com> |
| 2 | 7 | ||
| 3 | * minibuffer.el (minibuffer-complete-and-exit): Doc fix. | 8 | * minibuffer.el (minibuffer-complete-and-exit): Doc fix. |
diff --git a/lisp/international/characters.el b/lisp/international/characters.el index 67c0f3c21e7..7b694b19759 100644 --- a/lisp/international/characters.el +++ b/lisp/international/characters.el | |||
| @@ -1031,7 +1031,7 @@ Combining diacritic or mark (Unicode General Category M)") | |||
| 1031 | (defvar cjk-char-width-table | 1031 | (defvar cjk-char-width-table |
| 1032 | (let ((table (make-char-table nil))) | 1032 | (let ((table (make-char-table nil))) |
| 1033 | (dolist (charset '(big5 chinese-gb2312 chinese-cns11643-1 | 1033 | (dolist (charset '(big5 chinese-gb2312 chinese-cns11643-1 |
| 1034 | japanese-jisx0208 korean-ksc5601)) | 1034 | japanese-jisx0208 cp932-2-byte korean-ksc5601)) |
| 1035 | (map-charset-chars #'(lambda (range arg) | 1035 | (map-charset-chars #'(lambda (range arg) |
| 1036 | (set-char-table-range table range 2)) | 1036 | (set-char-table-range table range 2)) |
| 1037 | charset)) | 1037 | charset)) |