summaryrefslogtreecommitdiff
path: root/lisp/gnus/nnml.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2012-02-12 22:20:48 +0000
committerKatsumi Yamaoka <yamaoka@jpl.org>2012-02-12 22:20:48 +0000
commit4eff9c1abb072f0769c6b7dcb7233903d6c6e761 (patch)
tree9f47eeaa187a0e1e911d35e22c4dd709f89350db /lisp/gnus/nnml.el
parentfa9958a67ebe5b7d5783288d464f8b10c28dce4f (diff)
downloademacs-4eff9c1abb072f0769c6b7dcb7233903d6c6e761.tar.gz
Merge changes made in No Gnus
nnml.el (nnml-request-compact-group): Delete the marks file after compaction (bug#10800). gnus-art.el (gnus-stop-downloads): Stop `url-queue' downloads on group exit. nnimap.el (nnimap-parse-flags): Parse correctly when we have mixed QRESYNC/FETCH output.
Diffstat (limited to 'lisp/gnus/nnml.el')
-rw-r--r--lisp/gnus/nnml.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/gnus/nnml.el b/lisp/gnus/nnml.el
index acb23ed1693..b8652600ae7 100644
--- a/lisp/gnus/nnml.el
+++ b/lisp/gnus/nnml.el
@@ -1298,6 +1298,9 @@ Use the nov database for the current group if available."
(nnml-save-nov)
;; b/ Save the active file:
(nnmail-save-active nnml-group-alist nnml-active-file)
+ (let ((marks (nnml-group-pathname group nnml-marks-file-name server)))
+ (when (file-exists-p marks)
+ (delete-file marks)))
t)))))
(defun nnml-request-compact (&optional server)