[gnus git] branch master updated: m0-11-121-g2846158 =1= Make nnmairix always select the correct article

Lars <[email protected]> Tue, 27 Jan 2015 06:04:37 +0100
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  28461585b1ee1f47c6354fd831fe267b3e400cb1 (commit)
      from  b09dda08485435ecdc6476f7a5a5fd0db6d5f422 (commit)


- Log -----------------------------------------------------------------
commit 28461585b1ee1f47c6354fd831fe267b3e400cb1
Author: Eric Abrahamsen <[email protected]>
Date:   Tue Jan 27 16:03:14 2015 +1100

    Make nnmairix always select the correct article
    
    * gnus-bcklg.el (gnus-backlog-enter-article): No virtual groups should
    be added to the backlog.
    
    * nnmairix.el ("nnmairix"): Declare nnmairix as virtual.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 071269c..fb860d6 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2015-01-27  Eric Abrahamsen  <[email protected]>
+
+	* nnmairix.el ("nnmairix"): Declare nnmairix as virtual.
+
+	* gnus-bcklg.el (gnus-backlog-enter-article): No virtual groups should
+	be added to the backlog.
+
 2015-01-26  Tassilo Horn  <[email protected]>
 
 	* Makefile.in (all total, warn, fail-on-warning): Call gnus-load.el
diff --git a/lisp/gnus-bcklg.el b/lisp/gnus-bcklg.el
index b26f367..e0c457a 100644
--- a/lisp/gnus-bcklg.el
+++ b/lisp/gnus-bcklg.el
@@ -61,7 +61,7 @@
 
 (defun gnus-backlog-enter-article (group number buffer)
   (when (and (numberp number)
-	     (not (string-match "^nnvirtual" group)))
+	     (not (gnus-virtual-group-p group)))
     (gnus-backlog-setup)
     (let ((ident (intern (concat group ":" (int-to-string number))
 			 gnus-backlog-hashtb))
@@ -126,7 +126,7 @@
 
 (defun gnus-backlog-request-article (group number &optional buffer)
   (when (and (numberp number)
-	     (not (string-match "^nnvirtual" group)))
+	     (not (gnus-virtual-group-p group)))
     (gnus-backlog-setup)
     (let ((ident (intern (concat group ":" (int-to-string number))
 			 gnus-backlog-hashtb))
diff --git a/lisp/nnmairix.el b/lisp/nnmairix.el
index 5a01ce8..96b40e5 100644
--- a/lisp/nnmairix.el
+++ b/lisp/nnmairix.el
@@ -417,7 +417,7 @@ Other back ends might or might not work.")
 
 (nnoo-define-basics nnmairix)
 
-(gnus-declare-backend "nnmairix" 'mail 'address)
+(gnus-declare-backend "nnmairix" 'mail 'address 'virtual)
 
 (deffoo nnmairix-open-server (server &optional definitions)
   ;; just set server variables

-----------------------------------------------------------------------
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-bcklg.el |    4 ++--
 lisp/nnmairix.el   |    2 +-
 3 files changed, 10 insertions(+), 3 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