From f8e85ea8a78a47e86498a084d5546a203e86fe4d Mon Sep 17 00:00:00 2001
From: Kenichi Handa <handa@m17n.org>
Date: Fri, 22 Sep 2006 12:55:25 +0000
Subject: [PATCH] Fix setting self-insert-command for multibyte characters in
 global-map.

---
 lisp/bindings.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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."
 (let ((l (generic-character-list))
       (table (nth 1 global-map)))
   (while l
-    (set-char-table-default table (car l) 'self-insert-command)
+    (aset table (car l) 'self-insert-command)
     (setq l (cdr l))))
 
 (setq help-event-list '(help f1))
-- 
2.39.2