[Emacs-commit] emacs/lisp/mh-e mh-folder.el

[Bill Wohler]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Branch:         
Changes by:     Bill Wohler <address@hidden>    06/01/30 00:50:49

Modified files:
        lisp/mh-e      : mh-folder.el 

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

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/emacs/lisp/mh-e/mh-folder.el.diff?tr1=1.2&tr2=1.3&r1=text&r2=text

Patches:
Index: emacs/lisp/mh-e/mh-folder.el
diff -u emacs/lisp/mh-e/mh-folder.el:1.2 emacs/lisp/mh-e/mh-folder.el:1.3
--- emacs/lisp/mh-e/mh-folder.el:1.2    Mon Jan 30 00:29:30 2006
+++ emacs/lisp/mh-e/mh-folder.el        Mon Jan 30 00:50:49 2006
@@ -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)