[gnus git] branch master updated: n0-15-64-g064c974 =1= Fix Gnus registry sender splitting and logging.

       via  064c97455e6e3edf10018a4c9b812d43194f67af (commit)
      from  33da5baf94e156abfb77c9a73ebb8e1d0be78a6d (commit)


- Log -----------------------------------------------------------------
commit 064c97455e6e3edf10018a4c9b812d43194f67af
Author: Ted Zlatanov <[email protected]>
Date:   Tue Apr 12 13:37:52 2011 -0500

    Fix Gnus registry sender splitting and logging.
    
    * gnus-registry.el (gnus-registry--split-fancy-with-parent-internal):
    Fix logic bug.
    (gnus-registry-post-process-groups): Fix logging of no results and
    quote sender and subject.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b53c38a..9193af8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2011-04-12  Teodor Zlatanov  <[email protected]>
+
+	* gnus-registry.el (gnus-registry--split-fancy-with-parent-internal):
+	Fix logic bug.
+	(gnus-registry-post-process-groups): Fix logging of no results and
+	quote sender and subject.
+
 2011-04-12  Lars Magne Ingebrigtsen  <[email protected]>
 
 	* proto-stream.el (proto-stream-open-starttls): Only do opportunistic
diff --git a/lisp/gnus-registry.el b/lisp/gnus-registry.el
index ce76f7f..680a3b2 100644
--- a/lisp/gnus-registry.el
+++ b/lisp/gnus-registry.el
@@ -428,9 +428,9 @@ See the Info node `(gnus)Fancy Mail Splitting' for more details."
      (when (and (null found)
                 (memq 'sender gnus-registry-track-extra)
                 sender
-                (gnus-grep-in-list
+                (not (gnus-grep-in-list
                  sender
-                 gnus-registry-unfollowed-addresses))
+                      gnus-registry-unfollowed-addresses)))
        (let ((groups (apply
                       'append
                       (mapcar
@@ -564,12 +564,12 @@ possible.  Uses `gnus-registry-split-strategy'."
      ((null out)
       (gnus-message
        5
-       "%s: no matches for %s %s."
-       log-agent out mode key)
+       "%s: no matches for %s '%s'."
+       log-agent mode key)
       nil)
      (t (gnus-message
          5
-         "%s: too many extra matches (%s) for %s %s.  Returning none."
+         "%s: too many extra matches (%s) for %s '%s'.  Returning none."
          log-agent out mode key)
         nil))))
 

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog        |    7 +++++++
 lisp/gnus-registry.el |   12 ++++++------
 2 files changed, 13 insertions(+), 6 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project