shithub: plan9front

Download patch

ref: f7ae890ecb7c90cac69051816211c0cc97cd4c7c
parent: 9923ea348c75bf33754508e9d2a61e537e7c79d1
author: unobe <unobe@cpan.org>
date: Sat Apr 17 21:52:11 EDT 2021

patch for imap when imap fails
changeset:   8411:19f6a88ea241
branch:      mbp-2011
user:        Romano <unobe@cpan.org>
date:        Sat Apr 17 14:35:21 2021 -0700
files:       sys/src/cmd/upas/fs/imap.c
description:
When an imap fetch fails, it's helpful at times to know the underlying
cause.  This provides more details by providing the underlying error
message.

--- a/sys/src/cmd/upas/fs/imap.c	Sat Apr 17 21:46:02 2021
+++ b/sys/src/cmd/upas/fs/imap.c	Sat Apr 17 21:52:11 2021
@@ -865,14 +865,16 @@
 imap4fetch(Mailbox *mb, Message *m, uvlong o, ulong l)
 {
 	Imap *imap;
+	char *resp;
 
 	imap = mb->aux;
 	if(imap->flags & Fgmail)
 		l = gmaildiscount(m, o, l);
 	idprint(imap, "uid fetch %lud (flags body.peek[]<%llud.%lud>)\n", (ulong)m->imapuid, o, l);
 	imap4cmd(imap, "uid fetch %lud (flags body.peek[]<%llud.%lud>)", (ulong)m->imapuid, o, l);
-	if(!isokay(imap4resp0(imap, mb, m))){
-		eprint("imap: imap fetch failed\n");
+	resp = imap4resp0(imap, mb, m);
+	if(!isokay(resp)){
+		eprint("imap: imap fetch failed: %s\n", resp);
 		return -1;
 	}
 	return 0;