(defgroup nndiary nil
"The Gnus Diary backend."
+ :version "22.1"
:group 'gnus-diary)
(defcustom nndiary-mail-sources
(when (nndiary-schedule)
(let (result)
(when nnmail-cache-accepted-message-ids
- (nnmail-cache-insert (nnmail-fetch-field "message-id")
+ (nnmail-cache-insert (nnmail-fetch-field "message-id")
group
(nnmail-fetch-field "subject")))
(if (stringp group)