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

[Bill Wohler]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Bill Wohler <wohler>    08/08/10 23:13:54

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

Log message:
        (mh-pick-regexp-builder): Rename variant mu-mh to gnu-mh and be
        explicit about GNU mailutils MH in docstrings (with thanks to Darel
        Henman) (closes SF #1768928).

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mh-e/mh-search.el?cvsroot=emacs&r1=1.20&r2=1.21

Patches:
Index: mh-search.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/mh-e/mh-search.el,v
retrieving revision 1.20
retrieving revision 1.21
diff -u -b -r1.20 -r1.21
--- mh-search.el        19 May 2008 01:54:32 -0000      1.20
+++ mh-search.el        10 Aug 2008 23:13:54 -0000      1.21
@@ -1274,12 +1274,12 @@
       (when (cdr pattern)
         (setq result `(,@result "-and" "-lbrace"
                        ,@(mh-pick-construct-regexp
-                          (if (and (mh-variant-p 'mu-mh) (car pattern))
+                          (if (and (mh-variant-p 'gnu-mh) (car pattern))
                               (format "--pattern=%s" (cdr pattern))
                             (cdr pattern))
                           (if (car pattern)
                               (cond
-                               ((mh-variant-p 'mu-mh)
+                               ((mh-variant-p 'gnu-mh)
                                 (format "--component=%s" (car pattern)))
                                ((member (car pattern) mh-pick-single-dash)
                                 (format "-%s" (car pattern)))