diff options
| author | Kenichi Handa | 2006-09-22 12:55:25 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2006-09-22 12:55:25 +0000 |
| commit | f8e85ea8a78a47e86498a084d5546a203e86fe4d (patch) | |
| tree | 52d138a97d6b052a604c7f3730e68638ee796abd | |
| parent | 983f6a3da6987ede8d4166cbd5061a2a1235d80a (diff) | |
| download | emacs-f8e85ea8a78a47e86498a084d5546a203e86fe4d.tar.gz emacs-f8e85ea8a78a47e86498a084d5546a203e86fe4d.zip | |
Fix setting self-insert-command for multibyte
characters in global-map.
| -rw-r--r-- | lisp/bindings.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/bindings.el b/lisp/bindings.el index bf0323cdf20..d077e641ac1 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el | |||
| @@ -604,7 +604,7 @@ language you are using." | |||
| 604 | (let ((l (generic-character-list)) | 604 | (let ((l (generic-character-list)) |
| 605 | (table (nth 1 global-map))) | 605 | (table (nth 1 global-map))) |
| 606 | (while l | 606 | (while l |
| 607 | (set-char-table-default table (car l) 'self-insert-command) | 607 | (aset table (car l) 'self-insert-command) |
| 608 | (setq l (cdr l)))) | 608 | (setq l (cdr l)))) |
| 609 | 609 | ||
| 610 | (setq help-event-list '(help f1)) | 610 | (setq help-event-list '(help f1)) |