Monotone-Parent: fdc1029cea8bf902ceb3325858089ba7d8fdb070

Monotone-Revision: 828852e3641e027c929bbe98983fa943acedb718

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2007-05-17T23:13:12
Monotone-Branch: ca.inverse.sogo

UI/Common/UIxObjectActions.m

@@ -27,6 +27,7 @@
 #import <NGObjWeb/WOResponse.h>
 #import <SoObjects/SOGo/LDAPUserManager.h>
 #import <SoObjects/SOGo/SOGoObject.h>
+#import <SoObjects/SOGo/SOGoPermissions.h>
 
 #import "UIxObjectActions.h"
 
@@ -49,9 +50,9 @@
       um = [LDAPUserManager sharedUserManager];
       if ([um contactInfosForUserWithUIDorEmail: uid])
         {
-          clientObject = [self clientObject];
-          [clientObject setRoles: [clientObject defaultAclRoles]
-                        forUser: uid];
+	  clientObject = [self clientObject];
+	  [clientObject setRoles: [clientObject aclsForUser: uid]
+			forUser: uid];
           code = 204;
         }
     }
@@ -78,7 +79,8 @@
       um = [LDAPUserManager sharedUserManager];
       if ([um contactInfosForUserWithUIDorEmail: uid])
 	{
-	  [[self clientObject] removeAclsForUsers: [NSArray arrayWithObject: uid]];
+	  [[self clientObject] removeAclsForUsers:
+				 [NSArray arrayWithObject: uid]];
           code = 204;
         }
     }