diff --git a/ChangeLog b/ChangeLog
index 3be5ad04b..01f5ee2b0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2010-06-16  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
+
+	* SoObjects/Mailer/SOGoDraftObject.m
+	(_purgeRecipients:fromAddresses:): we need to compare the email
+	addresses case-insensitively.
+
 2010-06-15  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
 	* SoObjects/SOGo/SOGoDAVAuthenticator.m (-checkLogin:password:):
diff --git a/SoObjects/Mailer/SOGoDraftObject.m b/SoObjects/Mailer/SOGoDraftObject.m
index 0e7cebc42..0d8156b3c 100644
--- a/SoObjects/Mailer/SOGoDraftObject.m
+++ b/SoObjects/Mailer/SOGoDraftObject.m
@@ -444,7 +444,9 @@ static NSString    *userAgent      = nil;
     for (count = max - 1; count >= 0; count--)
       {
 	currentAddress = [addresses objectAtIndex: count];
-	if ([currentRecipient isEqualToString: [currentAddress baseEMail]])
+	if ([currentRecipient
+              caseInsensitiveCompare: [currentAddress baseEMail]]
+            == NSOrderedSame)
 	  {
 	    [addresses removeObjectAtIndex: count];
 	    max--;