From 6dfccb76a58a189ead89cab654cac2a0c3fdd494 Mon Sep 17 00:00:00 2001
From: Oswald Buddenhagen <ossi@users.sf.net>
Date: Sat, 27 Jul 2013 15:35:42 +0200
Subject: [PATCH] be somewhat stricter about the LIST response syntax

the first token *must* be a list.
---
 src/drv_imap.c | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/src/drv_imap.c b/src/drv_imap.c
index 07fcbe9..6951c0c 100644
--- a/src/drv_imap.c
+++ b/src/drv_imap.c
@@ -887,16 +887,16 @@ parse_list_rsp( imap_store_t *ctx, list_t *list, char *cmd )
 	char *arg;
 	list_t *lp;
 
-	if (!list) {
+	if (!is_list( list )) {
 		error( "IMAP error: malformed LIST response\n" );
+		free_list( list );
 		return LIST_BAD;
 	}
-	if (list->val == LIST)
-		for (lp = list->child; lp; lp = lp->next)
-			if (is_atom( lp ) && !strcasecmp( lp->val, "\\NoSelect" )) {
-				free_list( list );
-				return LIST_OK;
-			}
+	for (lp = list->child; lp; lp = lp->next)
+		if (is_atom( lp ) && !strcasecmp( lp->val, "\\NoSelect" )) {
+			free_list( list );
+			return LIST_OK;
+		}
 	free_list( list );
 	arg = next_arg( &cmd );
 	if (!ctx->delimiter)