Commit b9558683 authored by Alan Schmitt's avatar Alan Schmitt Committed by Katsumi Yamaoka
Browse files

gnus-sum.el (gnus-summary-expire-articles): Reinstall improved version of the 2014-08-05 change

parent 8f944212
2014-08-14 Alan Schmitt <>
* gnus-sum.el (gnus-summary-expire-articles): Functions registered to
the gnus-summary-article-expire-hook should be told where the function
is going. In particular, the Gnus registry might want to know.
2014-08-12 Stefan Monnier <>
* gnus-art.el (gnus-hidden-properties): Drop the evil `intangible'.
......@@ -10444,13 +10444,19 @@ This will be the case if the article has both been mailed and posted."
(when (and (not (memq article es))
(gnus-data-find article))
(gnus-summary-mark-article article gnus-canceled-mark)
(run-hook-with-args 'gnus-summary-article-expire-hook
(assoc article (gnus-data-list nil)))
(gnus-data-header (assoc article (gnus-data-list nil)))
((stringp nnmail-expiry-target) nnmail-expiry-target)
((eq nnmail-expiry-target 'delete) nil)
(let ((rescall (funcall nnmail-expiry-target
(if (stringp rescall) rescall nil))))
(gnus-message 6 "Expiring articles...done")))))
(defun gnus-summary-expire-articles-now ()
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment