From: keiichi <keiichi>
Date: Thu, 23 Dec 1999 10:24:29 +0000 (+0000)
Subject: (nnmail-get-new-mail): Use `sources' insted of `nnmail-spool-file'. (Maybe BUG
X-Git-Tag: nana-gnus-7_1_0_16~83
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=f605c2b69609221bb33807c6cbd098cba295dd7e;p=elisp%2Fgnus.git-

(nnmail-get-new-mail): Use `sources' insted of `nnmail-spool-file'. (Maybe BUG
of Gnus 5.8.2)
---

diff --git a/lisp/nnmail.el b/lisp/nnmail.el
index 88ccb1e..104a84d 100644
--- a/lisp/nnmail.el
+++ b/lisp/nnmail.el
@@ -397,7 +397,8 @@ parameter.  It should return nil, `warn' or `delete'."
 		 (const delete)))
 
 (defcustom nnmail-extra-headers nil
-  "*Extra headers to parse."
+  "*Extra headers to parse.
+Symbols must be catitalized."
   :group 'nnmail
   :type '(repeat symbol))
 
@@ -1398,7 +1399,7 @@ See the documentation for the variable `nnmail-split-fancy' for documentation."
 	 (total 0)
 	 incoming incomings source)
     (when (and (nnmail-get-value "%s-get-new-mail" method)
-	       nnmail-spool-file)
+	       sources)
       ;; We first activate all the groups.
       (nnmail-activate method)
       ;; Allow the user to hook.