[elpa] externals/gnorb 4f99dd7 304/449: Handle conditions where `registry-search' returns nil

[Stefan Monnier]

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

    Handle conditions where `registry-search' returns nil
    
    * nngnorb.el (nnir-run-gnorb): Don't let the nils through. Probably it's
      our fault that there's nil in there to begin with, and we'll sort that
      out, but this check should be in place anyway.
---
 nngnorb.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/nngnorb.el b/nngnorb.el
index 6e7a018..deb1d1a 100644
--- a/nngnorb.el
+++ b/nngnorb.el
@@ -142,7 +142,7 @@ be scanned for gnus messages, and those messages displayed."
       (dolist (i (delq nil org-ids))
        (let ((rel-msg-id (gnorb-registry-org-id-search i)))
          (when rel-msg-id
-           (setq msg-ids (append rel-msg-id msg-ids)))))
+           (setq msg-ids (append (delq nil rel-msg-id) msg-ids)))))
       (when msg-ids
          (dolist (id msg-ids)
            (let ((link (gnorb-msg-id-to-link id)))