From 635af037a869dd47bf199e02f9eeefedfdb08311 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Mon, 13 Oct 2003 07:03:17 +0000 Subject: [PATCH] Synch to Gnus 200310122045. --- lisp/ChangeLog | 3 +++ lisp/gnus-sum.el | 16 +++++++--------- texi/ChangeLog | 4 ++++ texi/gnus-ja.texi | 4 ++-- texi/gnus.texi | 2 +- 5 files changed, 17 insertions(+), 12 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 360088e..1229811 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2003-10-12 Jesper Harder + * gnus-sum.el (gnus-summary-respool-query): Don't narrow to head, + it's done by nnmail-article-group. + * gnus-uu.el (gnus-uu-grab-articles): Fix misplaced parens. From Mark Hood (tiny change) diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el index e161584..fe39b55 100644 --- a/lisp/gnus-sum.el +++ b/lisp/gnus-sum.el @@ -9556,15 +9556,13 @@ groups." (gnus-summary-select-article) (save-excursion (set-buffer gnus-original-article-buffer) - (save-restriction - (message-narrow-to-head) - (let ((groups (nnmail-article-group 'identity trace))) - (unless silent - (if groups - (message "This message would go to %s" - (mapconcat 'car groups ", ")) - (message "This message would go to no groups")) - groups)))))) + (let ((groups (nnmail-article-group 'identity trace))) + (unless silent + (if groups + (message "This message would go to %s" + (mapconcat 'car groups ", ")) + (message "This message would go to no groups")) + groups))))) (defun gnus-summary-respool-trace () "Trace where the respool algorithm would put this article. diff --git a/texi/ChangeLog b/texi/ChangeLog index afb90be..6850c06 100644 --- a/texi/ChangeLog +++ b/texi/ChangeLog @@ -1,3 +1,7 @@ +2003-10-12 Jesper Harder + + * gnus.texi (Group Mail Splitting): Markup fix. + 2003-10-03 Jesper Harder * emacs-mime.texi (Files and Directories): Update. diff --git a/texi/gnus-ja.texi b/texi/gnus-ja.texi index b0c8761..c3c280d 100644 --- a/texi/gnus-ja.texi +++ b/texi/gnus-ja.texi @@ -13373,8 +13373,8 @@ nnml:mail.others: @var{groups} は出力の分割を生成するためにパラメータが走査されるグループ 名のリストか正規表現です。@var{no-crosspost} は相互投稿を使用禁止にるた めに使うことができます。その場合、単一の @code{|} 分割が出力されます。 -@var{catch-all} は @var{gnus-group-split-default-catch-all-group} のよう -に、最後の手段として使われる特級分割です。 +@var{catch-all} は @code{gnus-group-split-default-catch-all-group} のよ +うに、最後の手段として使われる特級分割です。 @var{catch-all} が @code{nil} であるか、@var{split-regexp} がどれかの選 択されたグループ空文字列に合致すると、全捕獲分割は行われません。そうでな い場合、グループに @var{split-spec} が @code{catch-all} に設定されている diff --git a/texi/gnus.texi b/texi/gnus.texi index 22b72cf..6269cb7 100644 --- a/texi/gnus.texi +++ b/texi/gnus.texi @@ -14124,7 +14124,7 @@ splits like this: parameters will be scanned to generate the output split. @var{no-crosspost} can be used to disable cross-posting; in this case, a single @code{|} split will be output. @var{catch-all} is the fall back -fancy split, used like @var{gnus-group-split-default-catch-all-group}. +fancy split, used like @code{gnus-group-split-default-catch-all-group}. If @var{catch-all} is @code{nil}, or if @var{split-regexp} matches the empty string in any selected group, no catch-all split will be issued. Otherwise, if some group has @var{split-spec} set to @code{catch-all}, -- 1.7.10.4