[Emacs-diffs] /srv/bzr/emacs/trunk r103030: nnmail.el (nnmail-article-group): A better test for fanciness.

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 103030
author: Lars Ingebrigtsen <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Sun 2011-01-30 03:00:34 +0000
message:
  nnmail.el (nnmail-article-group): A better test for fanciness.
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/nnmail.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2011-01-30 02:51:45 +0000
+++ b/lisp/gnus/ChangeLog       2011-01-30 03:00:34 +0000
@@ -2,6 +2,7 @@
 
        * nnmail.el (nnmail-article-group): Check for a direct fancy split
        method.
+       (nnmail-article-group): A better test for fanciness.
 
        * nnimap.el (nnimap-request-head): Protect against not finding the
        article by Message-ID.

=== modified file 'lisp/gnus/nnmail.el'
--- a/lisp/gnus/nnmail.el       2011-01-30 02:51:45 +0000
+++ b/lisp/gnus/nnmail.el       2011-01-30 03:00:34 +0000
@@ -1148,8 +1148,7 @@
          (setq nnmail-split-trace nil))
        (if (or (and (symbolp nnmail-split-methods)
                     (fboundp nnmail-split-methods))
-               (memq (car-safe nnmail-split-methods)
-                     '(| &))
+               (not (consp (car-safe nnmail-split-methods)))
                (and (listp nnmail-split-methods)
                     ;; Not a regular split method, so it has to be a
                     ;; fancy one.