* RFC822.PEEK in mail-source-fetch-imap
@ 2001-10-01 14:50 Hannu Koivisto
2001-10-01 15:21 ` Simon Josefsson
0 siblings, 1 reply; 2+ messages in thread
From: Hannu Koivisto @ 2001-10-01 14:50 UTC (permalink / raw)
Greetings,
A friend of mine tried to get Gnus 5.8.8 running on XEmacs running
on Debian GNU/Linux unstable to fetch mail from a UW-IMAPD
2001beta010722 (also from Debian GNU/Linux unstable) server using
mail-sources but failed. From some debug log he found:
5 UID FETCH 1 RFC822.PEEK
5 BAD Bogus attribute list in UID FETCH
That RFC822.PEEK seems to originate in mail-source-fetch-imap.
I know nothing about IMAP but found some RFC from WWW
(<http://www.isi.edu/in-notes/rfc2060.txt>) that says RFC822.PEEK
attribute is obsolete. Based on this sketchy information, does
anyone have any idea of what is going on? Even almost-the-latest
CVS sources seem to use that RFC822.PEEK...
--
Hannu
Please don't send copies of list mail
^ permalink raw reply [flat|nested] 2+ messages in thread
* Re: RFC822.PEEK in mail-source-fetch-imap
2001-10-01 14:50 RFC822.PEEK in mail-source-fetch-imap Hannu Koivisto
@ 2001-10-01 15:21 ` Simon Josefsson
0 siblings, 0 replies; 2+ messages in thread
From: Simon Josefsson @ 2001-10-01 15:21 UTC (permalink / raw)
Cc: ding
On 1 Oct 2001, Hannu Koivisto wrote:
> 5 UID FETCH 1 RFC822.PEEK
> 5 BAD Bogus attribute list in UID FETCH
>
> That RFC822.PEEK seems to originate in mail-source-fetch-imap.
Try this:
Index: mail-source.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/mail-source.el,v
retrieving revision 6.9
diff -u -3 -p -c -r6.9 mail-source.el
cvs server: conflicting specifications of output style
*** mail-source.el 2001/08/30 18:40:37 6.9
--- mail-source.el 2001/10/01 15:11:44
*************** This only works when `display-time' is e
*** 901,907 ****
(push (cons from imap-password) mail-source-password-cache)))
;; if predicate is nil, use all uids
(dolist (uid (imap-search (or predicate "1:*") buf))
! (when (setq str (imap-fetch uid "RFC822.PEEK" 'RFC822 nil buf))
(push uid remove)
(insert "From imap " (current-time-string) "\n")
(save-excursion
--- 901,910 ----
(push (cons from imap-password) mail-source-password-cache)))
;; if predicate is nil, use all uids
(dolist (uid (imap-search (or predicate "1:*") buf))
! (when (setq str (if (imap-capability 'IMAP4rev1 buf)
! (imap-fetch uid "BODY.PEEK[]" 'BODYDETAIL
! nil buf)
! (imap-fetch uid "RFC822.PEEK" 'RFC822 nil buf)))
(push uid remove)
(insert "From imap " (current-time-string) "\n")
(save-excursion
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2001-10-01 15:21 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2001-10-01 14:50 RFC822.PEEK in mail-source-fetch-imap Hannu Koivisto
2001-10-01 15:21 ` Simon Josefsson
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).