emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master e17aea7: When registering Gnus message ids, guard against no regi


From: Eric Abrahamsen
Subject: master e17aea7: When registering Gnus message ids, guard against no registry
Date: Mon, 6 Dec 2021 16:45:40 -0500 (EST)

branch: master
commit e17aea73a5b2ae5f7cbf9057d7dad286be81ffc0
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Eric Abrahamsen <eric@ericabrahamsen.net>

    When registering Gnus message ids, guard against no registry
    
    * lisp/gnus/gnus-registry.el (gnus-registry-register-message-ids):
    There are situations where this code is called without a full Gnus
    startup (eg, debbugs). If the registry doesn't exist, just skip this
    process.
---
 lisp/gnus/gnus-registry.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/gnus/gnus-registry.el b/lisp/gnus/gnus-registry.el
index 8ce88dc..163d543 100644
--- a/lisp/gnus/gnus-registry.el
+++ b/lisp/gnus/gnus-registry.el
@@ -847,7 +847,8 @@ Overrides existing keywords with FORCE set non-nil."
 (defun gnus-registry-register-message-ids ()
   "Register the Message-ID of every article in the group."
   (unless (or (gnus-parameter-registry-ignore gnus-newsgroup-name)
-             (null gnus-registry-register-all))
+             (null gnus-registry-register-all)
+              (null (eieio-object-p gnus-registry-db)))
     (dolist (article gnus-newsgroup-articles)
       (let* ((id (gnus-registry-fetch-message-id-fast article))
              (groups (gnus-registry-get-id-key id 'group)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]