From c97b4067e023b358d8e1ba0f90d63101deef8baa Mon Sep 17 00:00:00 2001 From: Eric Abrahamsen Date: Mon, 29 Apr 2024 13:13:38 -0700 Subject: [PATCH] Add (semi-redundant) fix to nnatom backend declaration * lisp/gnus/gnus.el (gnus-valid-select-methods): We need a value for post/mail/none in order to conform to the option type. * lisp/gnus/nnatom.el: This call to gnus-declare-backend does the exact same thing as above, and needs to be adjusted accordingly. (cherry picked from commit 97a2710554fbd10a0c866e890f507e391620e769) --- lisp/gnus/gnus.el | 2 +- lisp/gnus/nnatom.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el index bc8819dc967..f1fc129a505 100644 --- a/lisp/gnus/gnus.el +++ b/lisp/gnus/gnus.el @@ -1360,7 +1360,7 @@ slower." ("nnimap" post-mail address prompt-address physical-address respool server-marks cloud) ("nnmaildir" mail respool address server-marks) - ("nnatom" address) + ("nnatom" none address) ("nnnil" none)) "An alist of valid select methods. The first element of each list lists should be a string with the name diff --git a/lisp/gnus/nnatom.el b/lisp/gnus/nnatom.el index e8dfa12aff5..add9ae2dff9 100644 --- a/lisp/gnus/nnatom.el +++ b/lisp/gnus/nnatom.el @@ -269,7 +269,7 @@ return the subject. Otherwise, return nil." (defvoo nnatom-read-parts-function #'nnatom--read-parts nil nnfeed-read-parts-function) -(gnus-declare-backend (symbol-name nnatom-backend) 'address) +(gnus-declare-backend (symbol-name nnatom-backend) 'none 'address) (provide 'nnatom) -- 2.39.5