Monotone-Parent: 2914b9eab0b116cea42ae4eefee3758488d098c7

Monotone-Revision: 1159908dc1415c3892d49b916e424c7360c2d205 Monotone-Author: wsourdeau@inverse.ca Monotone-Date: 2007-03-21T14:28:42 Monotone-Branch: ca.inverse.sogo
2026-07-06 17:05:10 +00:00 · 2007-03-21 14:28:42 +00:00
parent e0ec28e71b
commit 376c009180
3 changed files with 31 additions and 0 deletions
@@ -19,6 +19,9 @@
  02111-1307, USA.
 */

+#import <NGObjWeb/WOContext.h>
+#import <NGObjWeb/WOResponse.h>
+
 #import <Contacts/SOGoContactObject.h>
 #import <Contacts/SOGoContactFolder.h>
 #import <Contacts/SOGoContactFolders.h>
@@ -104,6 +107,25 @@
  return self;
 }

+- (id <WOActionResults>) deleteAction
+{
+  id <WOActionResults> result;
+  NSException <WOActionResults> *ex;
+  WOResponse *response;
+
+  ex = [[self clientObject] delete];
+  if (ex)
+    result = ex;
+  else
+    {
+      response = [context response];
+      [response setStatus: 200];
+      result = response;
+    }
+
+  return result;
+}
+
 - (NSString *) defaultSortKey
 {
  return @"fn";