Mercurial > emacs
changeset 81857:97af23020f6c
(gnus-mime-delete-part): Don't go through article-edit
finishing actions if we did not edit the article.
| author | David Kastrup <dak@gnu.org> |
|---|---|
| date | Sat, 14 Jul 2007 09:12:16 +0000 |
| parents | 45f2b335e74c |
| children | 9ce3048c49ba |
| files | lisp/gnus/ChangeLog lisp/gnus/gnus-art.el |
| diffstat | 2 files changed, 10 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Sat Jul 14 09:02:35 2007 +0000 +++ b/lisp/gnus/ChangeLog Sat Jul 14 09:12:16 2007 +0000 @@ -1,3 +1,8 @@ +2007-07-14 David Kastrup <dak@gnu.org> + + * gnus-art.el (gnus-mime-delete-part): Don't go through article-edit + finishing actions if we did not edit the article. + 2007-07-04 Katsumi Yamaoka <yamaoka@jpl.org> * gnus-sum.el (gnus-summary-catchup): Don't recognize cached articles
--- a/lisp/gnus/gnus-art.el Sat Jul 14 09:02:35 2007 +0000 +++ b/lisp/gnus/gnus-art.el Sat Jul 14 09:12:16 2007 +0000 @@ -4408,11 +4408,11 @@ (gnus-summary-edit-article-done ,(or (mail-header-references gnus-current-headers) "") ,(gnus-group-read-only-p) - ,gnus-summary-buffer no-highlight))))) - ;; Not in `gnus-mime-save-part-and-strip': - (gnus-article-edit-done) - (gnus-summary-expand-window) - (gnus-summary-show-article)) + ,gnus-summary-buffer no-highlight)))) + ;; Not in `gnus-mime-save-part-and-strip': + (gnus-article-edit-done) + (gnus-summary-expand-window) + (gnus-summary-show-article))) (defun gnus-mime-save-part () "Save the MIME part under point."