Monotone-Parent: 205cd428c17e1d08bc362707f74e0be93d3d5fff

Monotone-Revision: 8da67e77abaa8a3dd458ac3f8ab6cbb3bbcc9a3b

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2007-08-20T21:49:28
Monotone-Branch: ca.inverse.sogo

ChangeLog

@@ -1,5 +1,9 @@
 2007-08-20  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
+	* SoObjects/Mailer/SOGoMailAccounts.m ([SOGoMailAccounts
+	-isValidMailAccountName:_key]): prevent unknown accounts from
+	being accessed.
+
 	* UI/MailPartViewers/UIxMailPartViewer.m ([UIxMailPartViewer
 	-pathToAttachmentObject]): we no longer need the filename
 	extension for SoLookup...

SoObjects/Mailer/SOGoMailAccounts.m

@@ -55,7 +55,11 @@ static NSString *AgenorShareLoginMarker  = @".-.";
 
 - (BOOL) isValidMailAccountName: (NSString *) _key
 {
-  return ([_key length] > 0);
+  NSArray *accounts;
+
+  accounts = [[context activeUser] mailAccounts];
+
+  return [[accounts objectsForKey: @"name"] containsObject: _key];
 }
 
 - (id) mailAccountWithName: (NSString *) _key