diff options
| author | Lars Magne Ingebrigtsen | 2013-01-02 09:20:32 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka | 2013-01-02 09:20:32 +0000 |
| commit | 9d9ffa13100af63fdb4fd2c6d2595d8abc0dde8b (patch) | |
| tree | e6ad90d34925fee6d6bf25931642c2c23b5167f5 | |
| parent | 71376d4b88555139065d6ac862734d7e5c14f043 (diff) | |
| download | emacs-9d9ffa13100af63fdb4fd2c6d2595d8abc0dde8b.tar.gz emacs-9d9ffa13100af63fdb4fd2c6d2595d8abc0dde8b.zip | |
Merge changes made in Gnus master
lisp/gnus/gnus-msg.el: Don't do Gcc handling if Gnus isn't running
lisp/gnus/nnimap.el: Make nnimap treat \Deleted articles as \Read articles
| -rw-r--r-- | lisp/gnus/ChangeLog | 9 | ||||
| -rw-r--r-- | lisp/gnus/gnus-msg.el | 3 | ||||
| -rw-r--r-- | lisp/gnus/nnimap.el | 4 |
3 files changed, 14 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 6dca9e6cb7c..044903b0cb8 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,12 @@ | |||
| 1 | 2012-12-31 Lars Magne Ingebrigtsen <larsi@gnus.org> | ||
| 2 | |||
| 3 | * gnus-msg.el (gnus-inews-insert-gcc): Don't insert Gcc headers if Gnus | ||
| 4 | isn't running, because Gnus will probably not know how to handle the | ||
| 5 | Gcc header (bug#11941). | ||
| 6 | |||
| 7 | * nnimap.el (nnimap-update-info): Treat \Deleted articles as \Read | ||
| 8 | articles. | ||
| 9 | |||
| 1 | 2012-12-29 Lars Magne Ingebrigtsen <larsi@gnus.org> | 10 | 2012-12-29 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 2 | 11 | ||
| 3 | * nnfolder.el (nnfolder-recursive-directory-files): New function. | 12 | * nnfolder.el (nnfolder-recursive-directory-files): New function. |
diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el index c967bc06565..559c5bbce1e 100644 --- a/lisp/gnus/gnus-msg.el +++ b/lisp/gnus/gnus-msg.el | |||
| @@ -1745,7 +1745,8 @@ this is a reply." | |||
| 1745 | (setq var (cdr var))) | 1745 | (setq var (cdr var))) |
| 1746 | result))) | 1746 | result))) |
| 1747 | name) | 1747 | name) |
| 1748 | (when (or groups gcc-self-val) | 1748 | (when (and (or groups gcc-self-val) |
| 1749 | (gnus-alive-p)) | ||
| 1749 | (when (stringp groups) | 1750 | (when (stringp groups) |
| 1750 | (setq groups (list groups))) | 1751 | (setq groups (list groups))) |
| 1751 | (save-excursion | 1752 | (save-excursion |
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index 38ece41ad37..5a8d0d6a1fa 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el | |||
| @@ -1420,7 +1420,9 @@ textual parts.") | |||
| 1420 | (gnus-set-difference | 1420 | (gnus-set-difference |
| 1421 | (gnus-set-difference | 1421 | (gnus-set-difference |
| 1422 | existing | 1422 | existing |
| 1423 | (cdr (assoc '%Seen flags))) | 1423 | (gnus-sorted-union |
| 1424 | (cdr (assoc '%Seen flags)) | ||
| 1425 | (cdr (assoc '%Deleted flags)))) | ||
| 1424 | (cdr (assoc '%Flagged flags))))) | 1426 | (cdr (assoc '%Flagged flags))))) |
| 1425 | (read (gnus-range-difference | 1427 | (read (gnus-range-difference |
| 1426 | (cons start-article high) unread))) | 1428 | (cons start-article high) unread))) |