diff options
author | Richard M. Stallman <rms@gnu.org> | 2001-11-21 10:42:11 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 2001-11-21 10:42:11 +0000 |
commit | 2b452d74cf0ddeb7e3afe428c8d46ca5fb573145 (patch) | |
tree | f79c51b574411be1324450c35aa316baacab9684 /lisp/international/encoded-kb.el | |
parent | a2899d6cc6839b9c7d2674cc3d6f6bff6a7289c0 (diff) | |
download | emacs-2b452d74cf0ddeb7e3afe428c8d46ca5fb573145.tar.gz |
Don't alter minor-map-alist.
Diffstat (limited to 'lisp/international/encoded-kb.el')
-rw-r--r-- | lisp/international/encoded-kb.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/international/encoded-kb.el b/lisp/international/encoded-kb.el index fa3a6407c6b..754ba2b77c0 100644 --- a/lisp/international/encoded-kb.el +++ b/lisp/international/encoded-kb.el @@ -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.") |