Mercurial > emacs

diff lisp/mh-e/mh-init.el @ 56787:25da1d331c99

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Upgraded to MH-E version 7.82. See etc/MH-E-NEWS and lisp/mh-e/ChangeLog for details.
author Bill Wohler <wohler@newt.com>
date Wed, 25 Aug 2004 05:55:39 +0000
parents 5aafbbdd005f
children 4f4f410e6fe8
line wrap: on
line diff
--- a/lisp/mh-e/mh-init.el	Wed Aug 25 00:22:23 2004 +0000
+++ b/lisp/mh-e/mh-init.el	Wed Aug 25 05:55:39 2004 +0000
@@ -90,7 +90,7 @@
       (cond
        ((mh-variant-set-variant 'nmh)
         (message "%s installed as MH variant" mh-variant-in-use))
-       ((mh-variant-set-variant 'MH)
+       ((mh-variant-set-variant 'mh)
         (message "%s installed as MH variant" mh-variant-in-use))
        ((mh-variant-set-variant 'mu-mh)
         (message "%s installed as MH variant" mh-variant-in-use))
@@ -145,7 +145,7 @@
 ;;;###mh-autoload
 (defun mh-variant-p (&rest variants)
   "Return t if variant is any of VARIANTS.
-Currently known variants are 'mh and 'nmh."
+Currently known variants are 'MH, 'nmh, and 'mu-mh."
   (let ((variant-in-use
          (cadr (assoc 'variant (assoc mh-variant-in-use mh-variants)))))
     (not (null (member variant-in-use variants)))))