Monotone-Parent: 06205eb1b9669a6fa1b780ee9bb1f7c53024f79c

Monotone-Revision: 2914b9eab0b116cea42ae4eefee3758488d098c7

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2007-03-21T14:27:48
Monotone-Branch: ca.inverse.sogo

ChangeLog

@@ -1,5 +1,9 @@
 2007-03-21  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
+	* SoObjects/Contacts/SOGoContactGCSFolder.m ([SOGoContactGCSFolder
+	-delete]): override method to refuse the deletion of the folder if
+	its nameInContainer is "personal".
+
 	* SoObjects/SOGo/SOGoFolder.m ([SOGoFolder -delete]): new method
 	that forwards the deletion request to the folder manager.
 

SoObjects/Contacts/SOGoContactGCSFolder.m

@@ -179,6 +179,14 @@
   return @"vcard-collection";
 }
 
+- (NSException *) delete
+{
+  return (([nameInContainer isEqualToString: @"personal"])
+	  ? [NSException exceptionWithHTTPStatus: 403
+			 reason: @"the 'personal' folder cannot be deleted"]
+	  : [super delete]);
+}
+
 // /* GET */
 
 // - (id) GETAction: (id)_ctx