# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1006339305 0
# Node ID 439723f7a566e1c511dc75ddc758008e8d2eed38
# Parent  54db34b4f62cec45072fbb1cd1c7a7489d87363d
Don't alter minor-map-alist.

diff -r 54db34b4f62c -r 439723f7a566 lisp/international/encoded-kb.el
--- a/lisp/international/encoded-kb.el	Wed Nov 21 08:32:57 2001 +0000
+++ b/lisp/international/encoded-kb.el	Wed Nov 21 10:41:45 2001 +0000
@@ -28,12 +28,12 @@
   "Non-nil if in Encoded-kbd minor mode.")
 (put 'encoded-kbd-mode 'permanent-local t)
 
-(let ((slot (assq 'encoded-kbd-mode minor-mode-alist))
-      (name " Encoded-kbd"))
-  (if slot
-      (setcar (cdr slot) name)
-    (setq minor-mode-alist
-	  (cons '(encoded-kbd-mode " Encoded-kbd") minor-mode-alist))))
+;;; (let ((slot (assq 'encoded-kbd-mode minor-mode-alist))
+;;;       (name " Encoded-kbd"))
+;;;   (if slot
+;;;       (setcar (cdr slot) name)
+;;;     (setq minor-mode-alist
+;;; 	  (cons '(encoded-kbd-mode " Encoded-kbd") minor-mode-alist))))
 
 (defconst encoded-kbd-mode-map (make-sparse-keymap)
   "Keymap for Encoded-kbd minor mode.")