diff options
| author | Kenichi Handa | 2000-05-29 01:09:52 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2000-05-29 01:09:52 +0000 |
| commit | 71b898fe72a180b66ea83dc2c1d4dc814c2ae97f (patch) | |
| tree | fceb1cf4866b50ae559e4b58721872fcdbd8b65a | |
| parent | 164edac82f6bc8e7d209d59e394908a8ddb8fafa (diff) | |
| download | emacs-71b898fe72a180b66ea83dc2c1d4dc814c2ae97f.tar.gz emacs-71b898fe72a180b66ea83dc2c1d4dc814c2ae97f.zip | |
(encoded-kbd-iso2022-designation-map): Fix previous change.
| -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 56c684a91fb..ef1fd423004 100644 --- a/lisp/international/encoded-kb.el +++ b/lisp/international/encoded-kb.el | |||
| @@ -74,7 +74,7 @@ | |||
| 74 | final-char) | 74 | final-char) |
| 75 | (while l | 75 | (while l |
| 76 | (setq final-char (charset-iso-final-char (car l))) | 76 | (setq final-char (charset-iso-final-char (car l))) |
| 77 | (if final-char | 77 | (if (> final-char 0) |
| 78 | (define-key map (char-to-string final-char) | 78 | (define-key map (char-to-string final-char) |
| 79 | 'encoded-kbd-iso2022-designation)) | 79 | 'encoded-kbd-iso2022-designation)) |
| 80 | (setq l (cdr l))) | 80 | (setq l (cdr l))) |