[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: IMAP parse error
- To: wl-en@ml.gentei.org
- Subject: Re: IMAP parse error
- From: Juliusz Chroboczek <jch@pps.univ-paris-diderot.fr>
- Date: Mon, 26 May 2014 22:52:03 +0200
- In-reply-to: <201405260600.s4Q603n8002966@korolev.univ-paris7.fr>
- References: <201405260600.s4Q603n8002966@korolev.univ-paris7.fr>
- Reply-to: wl-en@ml.gentei.org
- User-agent: Wanderlust/2.15.9
> elmo-imap4-read-response: Wrong type argument: listp, "IMAP server information: Mailbox is at 90% of quota"
Heh. Funny.
Please try this (completely untested).
diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el
index 964dc06..0b9346b 100644
--- a/elmo/elmo-imap4.el
+++ b/elmo/elmo-imap4.el
@@ -1582,8 +1582,9 @@ Return nil if no complete line has arrived."
(match-string 2)
(match-string 3))))
((search-forward "ALERT] " nil t)
- (message "IMAP server information: %s"
- (buffer-substring (point) (point-max))))
+ (let ((message (buffer-substring (point) (point-max))))
+ (message "IMAP server information: %s" message)
+ (list 'alert message)))
(t (list 'unknown))))))
(defun elmo-imap4-parse-data-list ()