From 44982b91dc65a1064a7facb6f2c37b7ce8df6fde Mon Sep 17 00:00:00 2001 From: Jesper Harder Date: Fri, 5 Mar 2004 10:37:26 +0000 Subject: [PATCH] * sha1-el.el (sha1-maximum-internal-length): Doc fix. * nnmail.el (nnmail-split-fancy): do. * gnus-kill.el (gnus-kill, gnus-execute): do. --- lisp/ChangeLog | 8 ++++++++ lisp/gnus-kill.el | 4 ++-- lisp/nnmail.el | 2 +- lisp/sha1-el.el | 4 ++-- 4 files changed, 13 insertions(+), 5 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3d050ba75..bb3bc7888 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,11 @@ +2004-03-05 Jesper Harder + + * sha1-el.el (sha1-maximum-internal-length): Doc fix. + + * nnmail.el (nnmail-split-fancy): do. + + * gnus-kill.el (gnus-kill, gnus-execute): do. + 2004-03-05 Per Abrahamsen * gnus-sum.el (gnus-widget-reversible-match) diff --git a/lisp/gnus-kill.el b/lisp/gnus-kill.el index 2a5770f32..d634dfe3f 100644 --- a/lisp/gnus-kill.el +++ b/lisp/gnus-kill.el @@ -496,7 +496,7 @@ Optional 1st argument COMMAND is default to (gnus-summary-mark-as-read nil \"X\"). If optional 2nd argument ALL is non-nil, articles marked are also applied to. If FIELD is an empty string (or nil), entire article body is searched for. -COMMAND must be a lisp expression or a string representing a key sequence." +COMMAND must be a Lisp expression or a string representing a key sequence." ;; We don't want to change current point nor window configuration. (let ((old-buffer (current-buffer))) (save-excursion @@ -624,7 +624,7 @@ COMMAND must be a lisp expression or a string representing a key sequence." did-kill))) (defun gnus-execute (field regexp form &optional backward unread) - "If FIELD of article header matches REGEXP, execute lisp FORM (or a string). + "If FIELD of article header matches REGEXP, execute Lisp FORM (or a string). If FIELD is an empty string (or nil), entire article body is searched for. If optional 1st argument BACKWARD is non-nil, do backward instead. If optional 2nd argument UNREAD is non-nil, articles which are diff --git a/lisp/nnmail.el b/lisp/nnmail.el index 2b1fbab7b..2e19009f0 100644 --- a/lisp/nnmail.el +++ b/lisp/nnmail.el @@ -466,7 +466,7 @@ FIELD must match a complete field name. VALUE must match a complete word according to the `nnmail-split-fancy-syntax-table' syntax table. You can use \".*\" in the regexps to match partial field names or words. -FIELD and VALUE can also be lisp symbols, in that case they are expanded +FIELD and VALUE can also be Lisp symbols, in that case they are expanded as specified in `nnmail-split-abbrev-alist'. GROUP can contain \\& and \\N which will substitute from matching diff --git a/lisp/sha1-el.el b/lisp/sha1-el.el index e721f179b..44f3f5b31 100644 --- a/lisp/sha1-el.el +++ b/lisp/sha1-el.el @@ -63,10 +63,10 @@ :group 'extensions) (defcustom sha1-maximum-internal-length 500 - "*Maximum length of message to use lisp version of SHA1 function. + "*Maximum length of message to use Lisp version of SHA1 function. If message is longer than this, `sha1-program' is used instead. -If this variable is set to 0, use extarnal program only. +If this variable is set to 0, use external program only. If this variable is set to nil, use internal function only." :type 'integer :group 'sha1) -- 2.25.1