Commit bb50aaa3 authored by Lars Ingebrigtsen's avatar Lars Ingebrigtsen
Browse files

Clean up nnimap-split-incoming-mail slightly

* lisp/gnus/nnimap.el (nnimap-split-incoming-mail): Don't call
-delete-articles on empty lists (bug#37541).
parent c49e36e6
......@@ -1125,6 +1125,7 @@ If LIMIT, first try to limit the search to the N last articles."
(defun nnimap-delete-article (articles)
"Delete ARTICLES."
(debug articles)
(with-current-buffer (nnimap-buffer)
(nnimap-command "UID STORE %s +FLAGS.SILENT (\\Deleted)"
(nnimap-article-ranges articles))
......@@ -2177,7 +2178,8 @@ Return the server's response to the SELECT or EXAMINE command."
;; and possibly expunge them.
(nnimap-parse-copied-articles sequences)))
(nnimap-delete-article junk-articles)))))))
(when junk-articles
(nnimap-delete-article junk-articles))))))))
(defun nnimap-parse-copied-articles (sequences)
(let (sequence copied range)
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