mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-18 18:05:07 +00:00
Code Issues Releases Activity

mm-decode.el (mm-preferred-alternative-precedence): Don't bug out on nested related parts.

Browse Source 
nnfolder.el (nnfolder-request-expire-articles): Return the list of unexpired articles.  This fixes the regression that led expiry marks to disappear from nnfolder groups.
This commit is contained in:
Lars Ingebrigtsen 2011-01-22 12:34:50 +00:00 committed by Katsumi Yamaoka
parent 3fb695589e
commit acf151a815
3 changed files with 15 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lisp/gnus/ChangeLog
View File

@ -1,3 +1,12 @@
2011-01-22 Lars Ingebrigtsen <larsi@gnus.org>
* mm-decode.el (mm-preferred-alternative-precedence): Don't bug out on
nested related parts.
* nnfolder.el (nnfolder-request-expire-articles): Return the list of
unexpired articles. This fixes the regression that led expiry marks to
disappear from nnfolder groups.
2011-01-21 Stefan Monnier <monnier@iro.umontreal.ca>
* gnus-art.el (gnus-button-alist, gnus-button-handle-info-keystrokes):

7
lisp/gnus/mm-decode.el
View File

@ -1379,9 +1379,10 @@ Use CMD as the process."
(setq handles (nconc (delete handle handles) (list handle))))))
;; Remove empty parts.
(dolist (handle (copy-sequence handles))
(unless (with-current-buffer (mm-handle-buffer handle)
(goto-char (point-min))
(re-search-forward "[^ \t\n]" nil t))
(when (and (bufferp (mm-handle-buffer handle))
(not (with-current-buffer (mm-handle-buffer handle)
(goto-char (point-min))
(re-search-forward "[^ \t\n]" nil t))))
(setq handles (nconc (delete handle handles) (list handle)))))
(mapcar #'mm-handle-media-type handles))

4
lisp/gnus/nnfolder.el
View File

@ -488,8 +488,8 @@ the group. Then the marks file will be regenerated properly by Gnus.")
(nnfolder-save-buffer)
(nnfolder-adjust-min-active newsgroup)
(nnfolder-save-active nnfolder-group-alist nnfolder-active-file)
(gnus-sorted-difference articles (nreverse deleted-articles)))
(nnfolder-save-all-buffers)))
(nnfolder-save-all-buffers)
(gnus-sorted-difference articles (nreverse deleted-articles)))))
(deffoo nnfolder-request-move-article (article group server accept-form
&optional last move-is-internal)