Monotone-Parent: 4b3e779fea77f240e47bc50eb2b081a68379e9d7

Monotone-Revision: fa2db8adc03dd0adbd001a03cd74271b07fb41fe

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2006-10-16T22:30:47
Monotone-Branch: ca.inverse.sogo

SoObjects/Appointments/SOGoAppointmentFolder.m

@@ -730,9 +730,13 @@ static NSNumber   *sharedYes = nil;
 {
   Class objectClass;
   unsigned int count, max;
-  NSString *currentId;
+  NSString *currentId, *currentUser;
+  WOContext *context;
   id deleteObject;
 
+  context = [[WOApplication application] context];
+  currentUser = [[context activeUser] login];
+
   max = [ids count];
   for (count = 0; count < max; count++)
     {
@@ -741,8 +745,11 @@ static NSNumber   *sharedYes = nil;
         = [self objectClassForResourceNamed: currentId];
       deleteObject = [objectClass objectWithName: currentId
                                   inContainer: self];
-      [deleteObject delete];
-      [deleteObject primaryDelete];
+      if ([currentUser isEqualToString: [deleteObject ownerInContext: nil]])
+        {
+          [deleteObject delete];
+          [deleteObject primaryDelete];
+        }
     }
 }