From cf1934e16f22369d34ef99508032d93a5f551a7e Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 23 Sep 2003 01:00:38 +0000 Subject: [PATCH] Synch to Gnus 200309221729. --- texi/ChangeLog | 8 ++++++++ texi/gnus-faq.texi | 6 +++--- texi/gnus-ja.texi | 27 +++++++++++++++------------ texi/gnus.texi | 33 ++++++++++++++++++--------------- texi/message-ja.texi | 2 +- texi/message.texi | 2 +- 6 files changed, 46 insertions(+), 32 deletions(-) diff --git a/texi/ChangeLog b/texi/ChangeLog index 84223c2..da31e68 100644 --- a/texi/ChangeLog +++ b/texi/ChangeLog @@ -1,5 +1,13 @@ +2003-09-22 Teodor Zlatanov + + * gnus.texi (Fancy Mail Splitting, SpamAssassin): corrected fancy + split example to use current buffer, mentioned + nnimap-split-download-body + 2003-09-22 Jesper Harder + * gnus.texi, gnus-faq.texi, message.texi: gnus -> Gnus. + * message.texi: Fixes. 2003-09-20 Jesper Harder diff --git a/texi/gnus-faq.texi b/texi/gnus-faq.texi index d0b72ae..8611ff2 100644 --- a/texi/gnus-faq.texi +++ b/texi/gnus-faq.texi @@ -214,7 +214,7 @@ Answer: @end example @noindent - Make sure that you don't have any gnus related stuff + Make sure that you don't have any Gnus related stuff before this line, on MS Windows use something like "C:/path/to/lisp" (yes, "/"). @@ -1385,7 +1385,7 @@ Answer: * [5.9]:: Sometimes I accidentally hit r instead of f in newsgroups. Can Gnus warn me, when I'm replying by mail in newsgroups? * [5.10]:: How to tell Gnus not to generate a sender header? -* [5.11]:: I want gnus to locally store copies of my send mail and news, +* [5.11]:: I want Gnus to locally store copies of my send mail and news, how to do it? * [5.12]:: People tell me my Message-IDs are not correct, why aren't they and how to fix it? @@ -1654,7 +1654,7 @@ alias al "Al " @noindent Then typing your alias (followed by a space or punctuation character) on a To: or Cc: line in the message buffer will - cause gnus to insert the full address for you. See the + cause Gnus to insert the full address for you. See the node "Mail Aliases" in Message (not Gnus) manual for details. diff --git a/texi/gnus-ja.texi b/texi/gnus-ja.texi index 7f4d26b..2f9c4a4 100644 --- a/texi/gnus-ja.texi +++ b/texi/gnus-ja.texi @@ -13160,16 +13160,18 @@ UNDELETED} はおそらくたいていの人には最良の選択でしょうが、ときど @lisp (defun split-on-body () (save-excursion - (set-buffer - (or (get-buffer " *nnmail incoming*") - (get-buffer " *nnml move*"))) + (widen) (goto-char (point-min)) (when (re-search-forward "Some.*string" nil t) "string.group"))) @end lisp @var{function} が走らされるとき、バッファはメッセージの部分に狭められま -す。 +す。それが、上記の例で @code{save-excursion} の後で @code{(widen)} が呼 +ばれる必要がある理由です。さらに nnimap バックエンドの場合、ディフォルト +では記事のボディがダウンロードされないことに注意して下さい。それをするた +めには、@code{nnimap-split-download-body} を t に設定する必要がありま +す (@pxref{Splitting in IMAP})。 @item (! @var{func} @var{split}) 分割がリストで、最初の要素が @code{!} であると @var{split} が実行され、 @@ -21335,16 +21337,17 @@ Spam を避けるための前項のヒントが十分だった日々は過ぎ去りました。今では ...)) (defun kevin-spamassassin () (save-excursion - (let ((buf (or (get-buffer " *nnmail incoming*") - (get-buffer " *nnml move*")))) - (if (not buf) - (progn (message "Oops, cannot find message buffer") nil) - (set-buffer buf) - (if (eq 1 (call-process-region (point-min) (point-max) - "spamc" nil nil nil "-c")) - "spam"))))) + (widen) + (if (eq 1 (call-process-region (point-min) (point-max) + "spamc" nil nil nil "-c")) + "spam"))) @end lisp +さらに nnimap バックエンドの場合、ディフォルトでは記事のボディがダウンロー +ドされないことに注意して下さい。それをするためには、 +@code{nnimap-split-download-body} を t に設定する必要がありま +す (@pxref{Splitting in IMAP})。 + 以上がこれに関することです。いくつかの spam はどうしても素通りしてしまう ので、spam を読むはめになったときに呼ぶための気の利いた関数が欲しいでしょ う。これがその気の利いた関数です: diff --git a/texi/gnus.texi b/texi/gnus.texi index 7151b6b..f12484b 100644 --- a/texi/gnus.texi +++ b/texi/gnus.texi @@ -976,7 +976,7 @@ If you want to start gnus in a different frame, you can use the command If things do not go smoothly at startup, you have to twiddle some variables in your @file{~/.gnus.el} file. This file is similar to -@file{~/.emacs}, but is read when gnus starts. +@file{~/.emacs}, but is read when Gnus starts. If you puzzle at any terms used in this manual, please refer to the terminology section (@pxref{Terminology}). @@ -13915,16 +13915,18 @@ body of the messages: @lisp (defun split-on-body () (save-excursion - (set-buffer - (or (get-buffer " *nnmail incoming*") - (get-buffer " *nnml move*"))) + (widen) (goto-char (point-min)) (when (re-search-forward "Some.*string" nil t) "string.group"))) @end lisp The buffer is narrowed to the message in question when @var{function} -is run. +is run. That's why @code{(widen)} needs to be called after +@code{save-excursion} in the example above. Also note that with the +nnimap backend, message bodies will not be downloaded by default. You +need to set @code{nnimap-split-download-body} to t to do that +(@pxref{Splitting in IMAP}). @item (! @var{func} @var{split}) If the split is a list, and the first element is @code{!}, then @@ -17684,7 +17686,7 @@ three forms: @item Score rule -This has the same syntax as a normal gnus score file except only a +This has the same syntax as a normal Gnus score file except only a subset of scoring keywords are available as mentioned above. example: @@ -20000,7 +20002,7 @@ from GroupLens in one of three ways controlled by the variable @vindex gnus-grouplens-override-scoring There are three ways to display predictions in grouplens. You may choose to have the GroupLens scores contribute to, or override the -regular gnus scoring mechanism. override is the default; however, some +regular Gnus scoring mechanism. override is the default; however, some people prefer to see the Gnus scores plus the grouplens scores. To get the separate scoring behavior you need to set @code{gnus-grouplens-override-scoring} to @code{'separate}. To have the @@ -22198,16 +22200,17 @@ call the external tools during splitting. Example fancy split method: ...)) (defun kevin-spamassassin () (save-excursion - (let ((buf (or (get-buffer " *nnmail incoming*") - (get-buffer " *nnml move*")))) - (if (not buf) - (progn (message "Oops, cannot find message buffer") nil) - (set-buffer buf) - (if (eq 1 (call-process-region (point-min) (point-max) - "spamc" nil nil nil "-c")) - "spam"))))) + (widen) + (if (eq 1 (call-process-region (point-min) (point-max) + "spamc" nil nil nil "-c")) + "spam"))) @end lisp +Note that with the nnimap backend, message bodies will not be +downloaded by default. You need to set +@code{nnimap-split-download-body} to t to do that (@pxref{Splitting in +IMAP}). + That is about it. As some spam is likely to get through anyway, you might want to have a nifty function to call when you happen to read spam. And here is the nifty function: diff --git a/texi/message-ja.texi b/texi/message-ja.texi index 4056f66..7e22732 100644 --- a/texi/message-ja.texi +++ b/texi/message-ja.texi @@ -339,7 +339,7 @@ constructed. The default value is @code{nil}. If this variable is @code{t} (the default), forwarded messages are included as inline @acronym{MIME} RFC822 parts. If it's @code{nil}, forwarded messages will just be copied inline to the new message, like previous, -non @acronym{MIME}-savvy versions of gnus would do. +non @acronym{MIME}-savvy versions of Gnus would do. @end ignore @item message-forward-before-signature diff --git a/texi/message.texi b/texi/message.texi index 868ee0f..697ea3d 100644 --- a/texi/message.texi +++ b/texi/message.texi @@ -312,7 +312,7 @@ constructed. The default value is @code{nil}. If this variable is @code{t} (the default), forwarded messages are included as inline @acronym{MIME} RFC822 parts. If it's @code{nil}, forwarded messages will just be copied inline to the new message, like previous, -non @acronym{MIME}-savvy versions of gnus would do. +non @acronym{MIME}-savvy versions of Gnus would do. @item message-forward-before-signature @vindex message-forward-before-signature -- 1.7.10.4