[elpa] externals/gnorb ebce811 144/449: Also check for nnir when storing BBDB message links

[Stefan Monnier]

branch: externals/gnorb
commit ebce81175c00d8c85072e223b91c336c10740c9b
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Eric Abrahamsen <eric@ericabrahamsen.net>

    Also check for nnir when storing BBDB message links
    
    lisp/gnorb-bbdb.el (gnorb-bbdb-store-message-link) Always need to find
                   the "real" backend group. Previously only checked for
                   nnvirtual, this adds nnir to the check as well.
---
 lisp/gnorb-bbdb.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/lisp/gnorb-bbdb.el b/lisp/gnorb-bbdb.el
index 43df598..02ba64c 100644
--- a/lisp/gnorb-bbdb.el
+++ b/lisp/gnorb-bbdb.el
@@ -527,10 +527,14 @@ to a message into the record's 
`gnorb-bbdb-messages-field'."
             (id (mail-header-id heads))
             (group gnus-newsgroup-name)
             link)
-       ;; link to the real group, not the virtual one
-       (when (eq (car (gnus-find-method-for-group gnus-newsgroup-name))
+       ;; check for both nnvirtual and nnir, and link to the real
+       ;; group in those cases
+       (when (eq (car (gnus-find-method-for-group group))
                  'nnvirtual)
          (setq group (car (nnvirtual-map-article art-no))))
+       (when (eq (car (gnus-find-method-for-group group))
+                 'nnir)
+         (setq group (nnir-article-group art-no)))
        (if (not (and date subject id group))
            (message "Could not save a link to this message")
          (setq link (make-gnorb-bbdb-link :subject subject :date date