# HG changeset patch
# User Bill Wohler <wohler@newt.com>
# Date 1138582249 0
# Node ID 07c20c57ee3d503efb582859469342880da20e71
# Parent  e238dd02cdad01f4cd2c9af5cd02fba82d70814d
(mh-folder-mode): Use add-to-list to modify minor-mode-alias.

diff -r e238dd02cdad -r 07c20c57ee3d lisp/mh-e/mh-folder.el
--- a/lisp/mh-e/mh-folder.el	Mon Jan 30 00:49:56 2006 +0000
+++ b/lisp/mh-e/mh-folder.el	Mon Jan 30 00:50:49 2006 +0000
@@ -656,9 +656,7 @@
   (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)