From: Bill Wohler <wohler@newt.com>
Date: Mon, 30 Jan 2006 00:50:49 +0000 (+0000)
Subject: (mh-folder-mode): Use add-to-list to modify minor-mode-alias.
X-Git-Tag: emacs-pretest-22.0.90~4501
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4f3a7d02d5eafad053d26851123f18e387a1eee5;p=emacs.git

(mh-folder-mode): Use add-to-list to modify minor-mode-alias.
---

diff --git a/lisp/mh-e/mh-folder.el b/lisp/mh-e/mh-folder.el
index cf5aad82ae9..98ecc06d7c2 100644
--- a/lisp/mh-e/mh-folder.el
+++ b/lisp/mh-e/mh-folder.el
@@ -656,9 +656,7 @@ perform the operation on all messages in that region.
   (make-local-variable 'hl-line-mode)   ; avoid pollution
   (mh-funcall-if-exists hl-line-mode 1)
   (setq revert-buffer-function 'mh-undo-folder)
-  (or (assq 'mh-showing-mode minor-mode-alist)
-      (setq minor-mode-alist
-            (cons '(mh-showing-mode " Show") minor-mode-alist)))
+  (add-to-list 'minor-mode-alist '(mh-showing-mode " Show"))
   (easy-menu-add mh-folder-sequence-menu)
   (easy-menu-add mh-folder-message-menu)
   (easy-menu-add mh-folder-folder-menu)