Import Gnus v5.10.3.

[elisp/gnus.git-] / lisp / nndiary.el

diff --git a/lisp/nndiary.el b/lisp/nndiary.el
index 42cb838..51cbd9a 100644 (file)
--- a/lisp/nndiary.el
+++ b/lisp/nndiary.el
@@ -759,7 +759,9 @@ all.  This may very well take some time.")
   (when (nndiary-schedule)
     (let (result)
       (when nnmail-cache-accepted-message-ids
-       (nnmail-cache-insert (nnmail-fetch-field "message-id") group))
+       (nnmail-cache-insert (nnmail-fetch-field "message-id") 
+                            group
+                            (nnmail-fetch-field "subject")))
       (if (stringp group)
          (and
           (nnmail-activate 'nndiary)