Synch to Gnus 200311122054.

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

diff --git a/lisp/nnmail.el b/lisp/nnmail.el
index 6912cf3..8665edf 100644 (file)
--- a/lisp/nnmail.el
+++ b/lisp/nnmail.el
@@ -1496,12 +1496,12 @@ See the documentation for the variable `nnmail-split-fancy' for details."
 (defvar group)
 (defvar group-art-list)
 (defvar group-art)
-(defun nnmail-cache-insert (id grp &optional subject)
+(defun nnmail-cache-insert (id grp &optional subject sender)
   (when (stringp id)
     ;; this will handle cases like `B r' where the group is nil
     (let ((grp (or grp gnus-newsgroup-name "UNKNOWN")))
       (run-hook-with-args 'nnmail-spool-hook 
-                         id grp subject))
+                         id grp subject sender))
     (when nnmail-treat-duplicates
       ;; Store some information about the group this message is written
       ;; to.  This is passed in as the grp argument -- all locations this