aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKarl Heuer1996-01-04 23:46:02 +0000
committerKarl Heuer1996-01-04 23:46:02 +0000
commit821db8fd07e39a8b30ecc8aa9d688c86222829af (patch)
tree610ab54097b506f4101f615dc25f16425e6004f9
parent6331da4b66c17ca595179031d39b4d80f6e4bc9e (diff)
downloademacs-821db8fd07e39a8b30ecc8aa9d688c86222829af.tar.gz
emacs-821db8fd07e39a8b30ecc8aa9d688c86222829af.zip
(nnmail-message-id-cache-length): Doc fix.
-rw-r--r--lisp/nnmail.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/nnmail.el b/lisp/nnmail.el
index 2de0bcaad2a..a8eecb18baa 100644
--- a/lisp/nnmail.el
+++ b/lisp/nnmail.el
@@ -202,7 +202,7 @@ Example:
202(defvar nnmail-message-id-cache-length 1000 202(defvar nnmail-message-id-cache-length 1000
203 "*The approximate number of Message-IDs nnmail will keep in its cache. 203 "*The approximate number of Message-IDs nnmail will keep in its cache.
204If this variable is nil, no checking on duplicate messages will be 204If this variable is nil, no checking on duplicate messages will be
205perfomed.") 205performed.")
206 206
207(defvar nnmail-message-id-cache-file "~/.nnmail-cache" 207(defvar nnmail-message-id-cache-file "~/.nnmail-cache"
208 "*The file name of the nnmail Message-ID cache.") 208 "*The file name of the nnmail Message-ID cache.")
@@ -570,7 +570,7 @@ FUNC will be called with the buffer narrowed to each mail."
570 (current-buffer) 570 (current-buffer)
571 (kill-buffer (current-buffer)))))) 571 (kill-buffer (current-buffer))))))
572 572
573;; Mail crossposts syggested by Brian Edmonds <edmonds@cs.ubc.ca>. 573;; Mail crossposts suggested by Brian Edmonds <edmonds@cs.ubc.ca>.
574(defun nnmail-article-group (func) 574(defun nnmail-article-group (func)
575 "Look at the headers and return an alist of groups that match. 575 "Look at the headers and return an alist of groups that match.
576FUNC will be called with the group name to determine the article number." 576FUNC will be called with the group name to determine the article number."
@@ -610,7 +610,7 @@ FUNC will be called with the group name to determine the article number."
610Problems with `nnmail-split-methods', using `bogus' mail group") 610Problems with `nnmail-split-methods', using `bogus' mail group")
611 (sit-for 1) 611 (sit-for 1)
612 '("bogus"))))) 612 '("bogus")))))
613 ;; Go throught the split methods to find a match. 613 ;; Go through the split methods to find a match.
614 (while (and methods (or nnmail-crosspost (not group-art))) 614 (while (and methods (or nnmail-crosspost (not group-art)))
615 (goto-char (point-max)) 615 (goto-char (point-max))
616 (if (or (cdr methods) 616 (if (or (cdr methods)
@@ -688,7 +688,7 @@ See the documentation for the variable `nnmail-split-fancy' for documentation."
688 (nnmail-split-it nnmail-split-fancy)) 688 (nnmail-split-it nnmail-split-fancy))
689 689
690(defvar nnmail-split-cache nil) 690(defvar nnmail-split-cache nil)
691;; Alist of split expresions their equivalent regexps. 691;; Alist of split expressions their equivalent regexps.
692 692
693(defun nnmail-split-it (split) 693(defun nnmail-split-it (split)
694 ;; Return a list of groups matching SPLIT. 694 ;; Return a list of groups matching SPLIT.
@@ -742,7 +742,7 @@ See the documentation for the variable `nnmail-split-fancy' for documentation."
742 t (concat (if group group "") 742 t (concat (if group group "")
743 nnmail-procmail-suffix "$") t))) 743 nnmail-procmail-suffix "$") t)))
744 (p procmails)) 744 (p procmails))
745 ;; Remove any directories that inadvertantly match the procmail 745 ;; Remove any directories that inadvertently match the procmail
746 ;; suffix, which might happen if the suffix is "". 746 ;; suffix, which might happen if the suffix is "".
747 (while p 747 (while p
748 (and (or (file-directory-p (car p)) 748 (and (or (file-directory-p (car p))