From 2b452d74cf0ddeb7e3afe428c8d46ca5fb573145 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 21 Nov 2001 10:42:11 +0000 Subject: [PATCH] Don't alter minor-map-alist. --- lisp/ChangeLog | 10 ++++++++++ lisp/international/encoded-kb.el | 12 ++++++------ 2 files changed, 16 insertions(+), 6 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index da78448299e..655e2d4713d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2001-11-21 Richard M. Stallman + + * international/encoded-kb.el: Don't alter minor-map-alist. + 2001-11-20 Kai Grossjohann * files.el (auto-save-file-name-transforms): Put remote files in @@ -37,6 +41,12 @@ * replace.el (occur-mode): Undo 2001-5-20 change. +2001-11-20 Richard M. Stallman + + * ruler-mode.el: Add pagination. + (ruler-mode-toggle-show-tab-stops): No need to + test `ruler-mode' variable. + 2001-11-20 Eli Zaretskii * play/landmark.el: Mark lm-mode as special. 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.") -- 2.39.2