Mercurial > emacs
changeset 110479:437c7aaf08fd
nnimap.el (nnimap-delete-article): Tell user if expunge won't happen.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Wed, 22 Sep 2010 13:34:37 +0000 |
| parents | 1167c781dfa2 |
| children | 5290c80fda43 |
| files | lisp/gnus/ChangeLog lisp/gnus/nnimap.el |
| diffstat | 2 files changed, 8 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Wed Sep 22 12:49:48 2010 +0000 +++ b/lisp/gnus/ChangeLog Wed Sep 22 13:34:37 2010 +0000 @@ -1,3 +1,7 @@ +2010-09-22 Teodor Zlatanov <tzz@lifelogs.com> + + * nnimap.el (nnimap-delete-article): Tell user if expunge won't happen. + 2010-09-22 Julien Danjou <julien@danjou.info> * gnus-group.el (gnus-group-update-hook): Call gnus-group-add-icon by
--- a/lisp/gnus/nnimap.el Wed Sep 22 12:49:48 2010 +0000 +++ b/lisp/gnus/nnimap.el Wed Sep 22 13:34:37 2010 +0000 @@ -580,7 +580,10 @@ t) (nnimap-expunge (nnimap-command "EXPUNGE") - t)))) + t) + (t (gnus-message 7 (concat "nnimap: nnimap-expunge is not set and the " + "server doesn't support UIDPLUS, so we won't " + "delete this article now")))))) (deffoo nnimap-request-scan (&optional group server) (when (and (nnimap-possibly-change-group nil server)