diff options
| author | Miles Bader | 2008-04-07 13:08:33 +0000 |
|---|---|---|
| committer | Miles Bader | 2008-04-07 13:08:33 +0000 |
| commit | 59429511341a4d2dbec1f8b890f628ad928bfd5c (patch) | |
| tree | 245e70521d05baf90de36fd4c14f57815bc5e342 /lisp/gnus | |
| parent | fbf57abbfe59545a0b0bb9e6c7288a375f68de94 (diff) | |
| download | emacs-59429511341a4d2dbec1f8b890f628ad928bfd5c.tar.gz emacs-59429511341a4d2dbec1f8b890f628ad928bfd5c.zip | |
Merge from gnus--devo--0
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1110
Diffstat (limited to 'lisp/gnus')
| -rw-r--r-- | lisp/gnus/ChangeLog | 18 | ||||
| -rw-r--r-- | lisp/gnus/gnus-sum.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/nnimap.el | 3 |
3 files changed, 21 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 5710f01ccaa..96cc3112700 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -30,6 +30,20 @@ | |||
| 30 | * gnus-win.el (gnus-configure-frame, gnus-all-windows-visible-p): | 30 | * gnus-win.el (gnus-configure-frame, gnus-all-windows-visible-p): |
| 31 | Fix last change in case the element is not even a symbol. | 31 | Fix last change in case the element is not even a symbol. |
| 32 | 32 | ||
| 33 | 2008-04-02 Simon Josefsson <simon@josefsson.org> | ||
| 34 | |||
| 35 | * nnimap.el (nnimap-enable-minmax-bug-workaround): Remove, replaced by | ||
| 36 | imap-enable-exchange-bug-workaround. | ||
| 37 | (nnimap-find-minmax-uid): Use imap-enable-exchange-bug-workaround. | ||
| 38 | |||
| 39 | 2008-04-01 Simon Josefsson <simon@josefsson.org> | ||
| 40 | |||
| 41 | * nnimap.el (nnimap-find-minmax-uid): Revert last fix, the "fix" turns | ||
| 42 | a 100 byte status-checks into a 2-3MB transfer for each group. | ||
| 43 | (nnimap-enable-minmax-bug-workaround): New variable to toggle whether | ||
| 44 | to enable bug workaround or not. | ||
| 45 | (nnimap-find-minmax-uid): Only enable workaround conditionally. | ||
| 46 | |||
| 33 | 2008-03-31 Glenn Morris <rgm@gnu.org> | 47 | 2008-03-31 Glenn Morris <rgm@gnu.org> |
| 34 | 48 | ||
| 35 | * message.el (mml2015-use): Declare for compiler. | 49 | * message.el (mml2015-use): Declare for compiler. |
| @@ -46,6 +60,10 @@ | |||
| 46 | (nntp-open-netcat-stream): New function. | 60 | (nntp-open-netcat-stream): New function. |
| 47 | (nntp-open-via-rlogin-and-netcat): Don't use a pty. | 61 | (nntp-open-via-rlogin-and-netcat): Don't use a pty. |
| 48 | 62 | ||
| 63 | 2008-03-29 Sven Joachim <svenjoac@gmx.de> | ||
| 64 | |||
| 65 | * gnus-sum.el (gnus-summary-make-menu-bar): Add missing dots. | ||
| 66 | |||
| 49 | 2008-03-29 Stefan Monnier <monnier@iro.umontreal.ca> | 67 | 2008-03-29 Stefan Monnier <monnier@iro.umontreal.ca> |
| 50 | 68 | ||
| 51 | * message.el (message-make-in-reply-to): Use mm-with-multibyte-buffer. | 69 | * message.el (message-make-in-reply-to): Use mm-with-multibyte-buffer. |
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 2e3b55a0c42..0d76e63bf74 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el | |||
| @@ -2262,7 +2262,7 @@ increase the score of each group you read." | |||
| 2262 | ["Set mark below..." gnus-score-set-mark-below t] | 2262 | ["Set mark below..." gnus-score-set-mark-below t] |
| 2263 | ["Set expunge below..." gnus-score-set-expunge-below t] | 2263 | ["Set expunge below..." gnus-score-set-expunge-below t] |
| 2264 | ["Edit current score file" gnus-score-edit-current-scores t] | 2264 | ["Edit current score file" gnus-score-edit-current-scores t] |
| 2265 | ["Edit score file" gnus-score-edit-file t] | 2265 | ["Edit score file..." gnus-score-edit-file t] |
| 2266 | ["Trace score" gnus-score-find-trace t] | 2266 | ["Trace score" gnus-score-find-trace t] |
| 2267 | ["Find words" gnus-score-find-favourite-words t] | 2267 | ["Find words" gnus-score-find-favourite-words t] |
| 2268 | ["Rescore buffer" gnus-summary-rescore t] | 2268 | ["Rescore buffer" gnus-summary-rescore t] |
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index b2d23d32a80..45f794626a6 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el | |||
| @@ -555,7 +555,8 @@ If EXAMINE is non-nil the group is selected read-only." | |||
| 555 | (imap-mailbox-select group examine)) | 555 | (imap-mailbox-select group examine)) |
| 556 | (let (minuid maxuid) | 556 | (let (minuid maxuid) |
| 557 | (when (> (imap-mailbox-get 'exists) 0) | 557 | (when (> (imap-mailbox-get 'exists) 0) |
| 558 | (imap-fetch "1:*" "UID" nil 'nouidfetch) | 558 | (imap-fetch (if imap-enable-exchange-bug-workaround "1,*:*" "1,*") |
| 559 | "UID" nil 'nouidfetch) | ||
| 559 | (imap-message-map (lambda (uid Uid) | 560 | (imap-message-map (lambda (uid Uid) |
| 560 | (setq minuid (if minuid (min minuid uid) uid) | 561 | (setq minuid (if minuid (min minuid uid) uid) |
| 561 | maxuid (if maxuid (max maxuid uid) uid))) | 562 | maxuid (if maxuid (max maxuid uid) uid))) |