Mercurial > emacs
changeset 108566:b7c1f69ad104
Synch with Gnus trunk.
(gnus-summary-save-article): Don't bother to re-fetch article unless
decoding article to be saved.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Fri, 14 May 2010 07:48:21 +0000 |
| parents | e53bb6f016b3 |
| children | 6c7b3dc7c246 4e87133f8f2c |
| files | lisp/gnus/ChangeLog lisp/gnus/gnus-sum.el |
| diffstat | 2 files changed, 7 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Fri May 14 07:46:03 2010 +0000 +++ b/lisp/gnus/ChangeLog Fri May 14 07:48:21 2010 +0000 @@ -1,3 +1,8 @@ +2010-05-14 Katsumi Yamaoka <yamaoka@jpl.org> + + * gnus-sum.el (gnus-summary-save-article): Don't bother to re-fetch + article unless decoding article to be saved. + 2010-05-13 Katsumi Yamaoka <yamaoka@jpl.org> * mml1991.el (mml1991-mailcrypt-encrypt, mml1991-gpg-encrypt)
--- a/lisp/gnus/gnus-sum.el Fri May 14 07:46:03 2010 +0000 +++ b/lisp/gnus/gnus-sum.el Fri May 14 07:48:21 2010 +0000 @@ -11664,12 +11664,8 @@ (gnus-message 1 "Article %d is unsaveable" article)) ;; This is a real article. (save-window-excursion - (let ((gnus-display-mime-function (when decode - gnus-display-mime-function)) - (gnus-article-prepare-hook (when decode - gnus-article-prepare-hook))) - (gnus-summary-select-article t t nil article) - (gnus-summary-goto-subject article))) + (gnus-summary-select-article decode decode nil article) + (gnus-summary-goto-subject article)) (with-current-buffer save-buffer (erase-buffer) (insert-buffer-substring (if decode