aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorGnus developers2010-12-15 22:24:36 +0000
committerKatsumi Yamaoka2010-12-15 22:24:36 +0000
commit156e3f9ca9d668ac781d48e9f6f5d4d5fd7e4a0b (patch)
tree81ef9a540148c893f55b0339865997aa229fbfed /lisp
parent68251e166138388f243993c83d0ef211fb05c847 (diff)
downloademacs-156e3f9ca9d668ac781d48e9f6f5d4d5fd7e4a0b.tar.gz
emacs-156e3f9ca9d668ac781d48e9f6f5d4d5fd7e4a0b.zip
gnus-agent.el: Indent.
gnus.texi: Fix a couple nnir -> @code{nnir} things. nnimap.el (nnimap-retrieve-group-data-early): Fix the syntax of the QRESYNC command by deleting a superfluous space which broke Cyrus servers. This change will break other servers that are buggy the other way around. gnus.texi (The hyrex Engine): Say that this engine as obsolete.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/gnus/ChangeLog7
-rw-r--r--lisp/gnus/gnus-agent.el8
-rw-r--r--lisp/gnus/nnimap.el2
3 files changed, 12 insertions, 5 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 013c7ee4c74..e416abf6d77 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,10 @@
12010-12-15 Lars Magne Ingebrigtsen <larsi@gnus.org>
2
3 * nnimap.el (nnimap-retrieve-group-data-early): Fix the syntax of the
4 QRESYNC command by deleting a superfluous space which broke Cyrus
5 servers. This change will break other servers that are buggy the other
6 way around.
7
12010-12-14 Teodor Zlatanov <tzz@lifelogs.com> 82010-12-14 Teodor Zlatanov <tzz@lifelogs.com>
2 9
3 * spam.el: Reindent and fix long lines. 10 * spam.el: Reindent and fix long lines.
diff --git a/lisp/gnus/gnus-agent.el b/lisp/gnus/gnus-agent.el
index fbd86f2e6f5..6dc1f51cd9c 100644
--- a/lisp/gnus/gnus-agent.el
+++ b/lisp/gnus/gnus-agent.el
@@ -1513,7 +1513,7 @@ downloaded into the agent."
1513 "Fetch ARTICLES from GROUP and put them into the Agent." 1513 "Fetch ARTICLES from GROUP and put them into the Agent."
1514 (when articles 1514 (when articles
1515 (gnus-agent-load-alist group) 1515 (gnus-agent-load-alist group)
1516 (let* ((alist gnus-agent-article-alist) 1516 (let* ((alist gnus-agent-article-alist)
1517 (headers (if (< (length articles) 2) nil gnus-newsgroup-headers)) 1517 (headers (if (< (length articles) 2) nil gnus-newsgroup-headers))
1518 (selected-sets (list nil)) 1518 (selected-sets (list nil))
1519 (current-set-size 0) 1519 (current-set-size 0)
@@ -1555,9 +1555,9 @@ downloaded into the agent."
1555 ;; 65 char/line. If the line count 1555 ;; 65 char/line. If the line count
1556 ;; is missing, arbitrarily assume a 1556 ;; is missing, arbitrarily assume a
1557 ;; size of 1000 characters. 1557 ;; size of 1000 characters.
1558 (max (* 65 (mail-header-lines 1558 (max (* 65 (mail-header-lines
1559 (car headers))) 1559 (car headers)))
1560 1000) 1560 1000)
1561 char-size)) 1561 char-size))
1562 0)))) 1562 0))))
1563 (setcar selected-sets (nreverse (car selected-sets))) 1563 (setcar selected-sets (nreverse (car selected-sets)))
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index 0462cf946eb..ae1929d1bd5 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -1080,7 +1080,7 @@ textual parts.")
1080 uidvalidity 1080 uidvalidity
1081 modseq) 1081 modseq)
1082 (push 1082 (push
1083 (list (nnimap-send-command "EXAMINE %S (QRESYNC (%s %s))" 1083 (list (nnimap-send-command "EXAMINE %S (QRESYNC (%s %s))"
1084 (utf7-encode group t) 1084 (utf7-encode group t)
1085 uidvalidity modseq) 1085 uidvalidity modseq)
1086 'qresync 1086 'qresync