cl-assertion-failed when listing a folder.

[kjell.myksvoll@telenor.com (Kjell M. Myksvoll)]

Hello,

I'm using the following combination

 nnimap-0.103
 pgnus-0.84
 xemacs-21.1.2

to read the IMAP folders on a MS Exchange server (versjon 5.5.2448.8).

Earlier I've used Outlook to manage the folders, among them a folder
"Annet" containing 7 letters.

When I try to access that folder from gnus (with nnimap) I get
error/warnings about cl-assertion-failed and none of the letters in
that folder shows up.  Actually gnus just hangs util I press C-g and
then the error/warning messages pops up.

The error/warning message I get is as follows

  (1) (error/warning) Error in process filter: (cl-assertion-failed 
  (imap-parse-nil))

I get 6 of those numbered 1 to 6 (although there are 7 letters in the
folder).

At the end of this letter I've included the relevant bits from the 
*imap-log* and *nnimap-debug* buffers (as far as I can tell).

I also get the same error/warning message when I try to read the
letters in other folders and it also seems like that each of the
letter that triggers the error/warning message does not get listed at
all (all the others letters in the folder shows up). Perhaps nnimap
fails in parsing the letter and simply skips it? The "Annet" folder is
special since all the letters there triggers the error/warning
message.

Any solutions? Anything else I might do in order to collect more
information about the problem? (I ran a session with gnus-verbose
set to 9 in order to get the output listed below.)

best regards,
kmm
-- 
kjell m. myksvoll                          kjell.myksvoll@telenor.com




output from the *imap-log* buffer:

24 SELECT Annet
* 6 EXISTS
* 0 RECENT
* FLAGS (\Seen \Answered \Flagged \Deleted \Draft)
* OK [PERMANENTFLAGS (\Seen \Answered \Flagged \Deleted \Draft)]
* OK [UIDVALIDITY 14633] UIDVALIDITY-verdi.
24 OK [READ-WRITE] SELECT fullført.
25 UID SEARCH UNSEEN UNDELETED
* SEARCH
25 OK SEARCH fullført.
26 UID SEARCH SEEN
* SEARCH 1 3 4 5 6 7
26 OK SEARCH fullført.
27 UID SEARCH FLAGGED
* SEARCH
27 OK SEARCH fullført.
28 UID SEARCH ANSWERED
* SEARCH

28 OK SEARCH fullført.
29 UID FETCH 1:7 (UID RFC822.SIZE ENVELOPE BODY BODY.PEEK[HEADER.FIELDS (References)])
* 1 FETCH (UID 1 RFC822.SIZE 1656 ENVELOPE ("Tue, 18 May 1999 07:44:45 +0200" "RE: Viva le frogs" (("A1" NIL "A1" "D1")) (("A1" NIL "A1" "D1")) (("A1" NIL "A1" "D1")) (("A2" NIL "A2" "A2") (NIL NIL "A3" "D3") ("A4" NIL "A4" "D4") ("A5" NIL "A5" "D5") (NIL NIL "A6" "D6") (NIL NIL "A7" "D7") ("A8" NIL "A8" "D8") (NIL NIL "A9" "D9") (NIL NIL "A10" "D10") (NIL NIL "A11" "D11") (NIL NIL "A12" "D12") (NIL NIL "A13" "D13") (NIL NIL "A14" "D14") ("A15" NIL "A15" "D15") ("A16" NIL "A16" "D16") (NIL NIL "A17" "D17") ("A18" NIL "A18" "D18") (NIL NIL "A19" "D19") (NIL NIL "A20" "D20") (NIL NIL "A21" "D21") (NIL NIL "A22" "D22") (NIL NIL "A23" "D23") (NIL NIL "A24" "D24") (NIL NIL "A25" "D25") (NIL NIL "A26" "D26")) NIL NIL NIL "<5F842E20596AD21187780008C75DC0E8182CCA@mjoelner.oslo.telenor.no>") BODY ("TEXT" "PLAIN" ("charset" "iso-8859-1") NIL NIL "QUOTED-PRINTABLE" 379 13) BODY[HEADER.FIELDS (References)] {2}

)

>>  Removed some line since the *FETCH* line above repeats 6 times
>>  (ie. for 6 letters). Also edited the output replacing the address
>>  with dummy names (An@Dn).

29 OK FETCH fullført.



output from the *nnimap-debug* buffer:

======================================================================
1 -> nnimap-request-group: group="Annet" server="fou" fast=t
| 2 -> nnimap-request-update-info-internal: group="Annet" info=("nnimap+fou:Anne
t" 3 ((1 . 7)) nil (nnimap "fou" (nnimap-address "fou-kj-21-001.nta.no")) ((visi
ble . t))) server="fou"
| | 3 -> nnimap-update-alist-soft: key=uidvalidity value=nil alist=((visible . t
))
| | 3 <- nnimap-update-alist-soft: ((visible . t))
| | 3 -> nnimap-possibly-change-group: group="Annet" server="fou"
| | | 4 -> nnimap-possibly-change-server: server="fou"
| | | 4 <- nnimap-possibly-change-server: " *nnimap* fou"
| | | 4 -> nnimap-expunge-close-group: server=nil
| | | | 5 -> nnimap-possibly-change-server: server=nil
| | | | 5 <- nnimap-possibly-change-server: " *nnimap* fou"
| | | 4 <- nnimap-expunge-close-group: t
| | 3 <- nnimap-possibly-change-group: "Annet"
| | 3 -> nnimap-update-alist-soft: key=tick value=nil alist=nil
| | 3 <- nnimap-update-alist-soft: nil
| | 3 -> nnimap-update-alist-soft: key=reply value=nil alist=nil
| | 3 <- nnimap-update-alist-soft: nil
| 2 <- nnimap-request-update-info-internal: ("nnimap+fou:Annet" 3 ((1 . 7)) nil 
(nnimap "fou" (nnimap-address "fou-kj-21-001.nta.no")) ((visible . t)))
| 2 -> nnimap-possibly-change-group: group="Annet" server="fou"
| | 3 -> nnimap-possibly-change-server: server="fou"
| | 3 <- nnimap-possibly-change-server: " *nnimap* fou"
| 2 <- nnimap-possibly-change-group: "Annet"
1 <- nnimap-request-group: "Annet"
======================================================================
1 -> nnimap-retrieve-headers: articles=(1 2 3 4 5 6 7) group="Annet" server="fou
" fetch-old=nil
| 2 -> nnimap-possibly-change-group: group="Annet" server="fou"
| | 3 -> nnimap-possibly-change-server: server="fou"
| | 3 <- nnimap-possibly-change-server: " *nnimap* fou"
| 2 <- nnimap-possibly-change-group: "Annet"
| 2 -> nnimap-retrieve-headers-get-uids: articles=(1 2 3 4 5 6 7) fetch-old=nil
| 2 <- nnimap-retrieve-headers-get-uids: (1 2 3 4 5 6 7)
| 2 -> nnimap-range-to-string: range=((1 . 7))
| 2 <- nnimap-range-to-string: "1:7"