From 63406b55a8e17262dcd0a7b0afcda62a38fff293 Mon Sep 17 00:00:00 2001 From: Wolfgang Sourdeau Date: Wed, 6 Feb 2008 15:48:52 +0000 Subject: [PATCH] Monotone-Parent: 1ccdfc75b1ed2e0fae716ec0b1a616d696394d3e Monotone-Revision: 6c49cf25cf0512a766efc84b52fead9f13a423ff Monotone-Author: wsourdeau@inverse.ca Monotone-Date: 2008-02-06T15:48:52 Monotone-Branch: ca.inverse.sogo --- ChangeLog | 5 +++++ SoObjects/Mailer/SOGoMailAccount.m | 4 +++- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 4cb6edd32..ecc0ec5b3 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2008-02-06 Wolfgang Sourdeau + + * SoObjects/Mailer/SOGoMailAccount.m ([SOGoMailAccount + -supportsQuotas]): test quota support by querying the server capability. + 2008-02-05 Wolfgang Sourdeau * UI/MailPartViewers/UIxMailPartICalActions.m ([UIxMailPartICalActions -acceptAction]) diff --git a/SoObjects/Mailer/SOGoMailAccount.m b/SoObjects/Mailer/SOGoMailAccount.m index 8b3559860..4a64431b4 100644 --- a/SoObjects/Mailer/SOGoMailAccount.m +++ b/SoObjects/Mailer/SOGoMailAccount.m @@ -175,10 +175,12 @@ static NSString *otherUsersFolderName = @""; // TODO: add English default - (BOOL) supportsQuotas { NGImap4Client *imapClient; + NSArray *capability; imapClient = [[self imap4Connection] client]; + capability = [[imapClient capability] objectForKey: @"capability"]; - return [[imapClient context] canQuota]; + return [capability containsObject: @"quota"]; } /* hierarchy */