diff options
| author | Kenichi Handa | 1998-06-20 02:59:51 +0000 |
|---|---|---|
| committer | Kenichi Handa | 1998-06-20 02:59:51 +0000 |
| commit | 63d3d7841a93dc55a15d5b2531e678a3a5e8f9ef (patch) | |
| tree | f1175d0664f58c2d996c9a9b739b5c0d578d4dd4 | |
| parent | bb6c9254db0aa946d0d1a11e79cd1aaf3e42f665 (diff) | |
| download | emacs-63d3d7841a93dc55a15d5b2531e678a3a5e8f9ef.tar.gz emacs-63d3d7841a93dc55a15d5b2531e678a3a5e8f9ef.zip | |
(encoded-kbd-self-insert-sjis):
Handle katakana-jisx0201 correctly.
| -rw-r--r-- | lisp/international/encoded-kb.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/international/encoded-kb.el b/lisp/international/encoded-kb.el index 8cc4850e4a1..e23d9c4bd75 100644 --- a/lisp/international/encoded-kb.el +++ b/lisp/international/encoded-kb.el | |||
| @@ -222,7 +222,7 @@ The following key sequence may cause multilingual text insertion." | |||
| 222 | (if (or (< last-command-char ?\xA0) (>= last-command-char ?\xE0)) | 222 | (if (or (< last-command-char ?\xA0) (>= last-command-char ?\xE0)) |
| 223 | (decode-sjis-char (+ (ash last-command-char 8) | 223 | (decode-sjis-char (+ (ash last-command-char 8) |
| 224 | (read-char-exclusive))) | 224 | (read-char-exclusive))) |
| 225 | (make-char 'latin-jisx0201 last-command-char)))) | 225 | (make-char 'katakana-jisx0201 last-command-char)))) |
| 226 | (self-insert-command 1))) | 226 | (self-insert-command 1))) |
| 227 | 227 | ||
| 228 | (defun encoded-kbd-self-insert-big5 () | 228 | (defun encoded-kbd-self-insert-big5 () |