diff options
| author | Karoly Lorentey <lorentey@elte.hu> | 2006-12-03 12:36:08 +0000 |
|---|---|---|
| committer | Karoly Lorentey <lorentey@elte.hu> | 2006-12-03 12:36:08 +0000 |
| commit | d0104e754a241cf83811fef30195d41201de533c (patch) | |
| tree | 6a5a31760801bd70649d0f9b132f61c46fac8445 /lisp/gnus/gnus-sum.el | |
| parent | 19739b34866e6a4789d842961470123b50158612 (diff) | |
| parent | ab785936c82ac81edb8b20ac27c0558bc04797e5 (diff) | |
| download | emacs-d0104e754a241cf83811fef30195d41201de533c.tar.gz | |
Merged from emacs@sv.gnu.org.
Patches applied:
* emacs@sv.gnu.org/emacs--devo--0--patch-486
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-487
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-488
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-489
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/gnus--rel--5.10--patch-156
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-157
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-158
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-159
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-160
Update from CVS
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-587
Diffstat (limited to 'lisp/gnus/gnus-sum.el')
| -rw-r--r-- | lisp/gnus/gnus-sum.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index fb0ef25c916..7d0b7203654 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el @@ -5711,8 +5711,9 @@ If WHERE is `summary', the summary mode line format will be used." (let* ((mformat (symbol-value (intern (format "gnus-%s-mode-line-format-spec" where)))) - (gnus-tmp-group-name (gnus-group-decoded-name - gnus-newsgroup-name)) + (gnus-tmp-group-name (gnus-mode-string-quote + (gnus-group-decoded-name + gnus-newsgroup-name))) (gnus-tmp-article-number (or gnus-current-article 0)) (gnus-tmp-unread gnus-newsgroup-unreads) (gnus-tmp-unread-and-unticked (length gnus-newsgroup-unreads)) @@ -9153,7 +9154,7 @@ ACTION can be either `move' (the default), `crosspost' or `copy'." (gnus-request-article-this-buffer article gnus-newsgroup-name) (when (consp (setq art-group (gnus-request-accept-article - to-newsgroup select-method (not articles)))) + to-newsgroup select-method (not articles) t))) (setq new-xref (concat new-xref " " (car art-group) ":" (number-to-string (cdr art-group)))) @@ -9161,7 +9162,7 @@ ACTION can be either `move' (the default), `crosspost' or `copy'." ;; it and replace the new article. (nnheader-replace-header "Xref" new-xref) (gnus-request-replace-article - (cdr art-group) to-newsgroup (current-buffer)) + (cdr art-group) to-newsgroup (current-buffer) t) art-group)))))) (cond ((not art-group) @@ -9259,7 +9260,7 @@ ACTION can be either `move' (the default), `crosspost' or `copy'." (gnus-request-article-this-buffer article gnus-newsgroup-name) (nnheader-replace-header "Xref" new-xref) (gnus-request-replace-article - article gnus-newsgroup-name (current-buffer)))) + article gnus-newsgroup-name (current-buffer) t))) ;; run the move/copy/crosspost/respool hook (run-hook-with-args 'gnus-summary-article-move-hook |