Monotone-Parent: b2699a981cd5458fbd1da1a9a72992020a29a4fc

Monotone-Revision: 3a8b54652636e357a114d90c7fbe2ff4f944a60f

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2006-12-14T21:22:57
Monotone-Branch: ca.inverse.sogo

ChangeLog

@@ -1,5 +1,7 @@
 2006-12-14  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
+	* Main/SOGo.m: declare "Freebusy" permissions for the top objects.
+
 	* UI/Contacts/UIxContactsAclsSelection.m: new component specific
 	to the handling of the user selection for the acls.
 

Main/SOGo.m

@@ -87,9 +87,9 @@ static BOOL doCrashOnSessionCreate = NO;
     WOResourceManager *rm;
     
     /* ensure core SoClass'es are setup */
-    [NSClassFromString(@"SOGoObject")        soClass];
-    [NSClassFromString(@"SOGoContentObject") soClass];
-    [NSClassFromString(@"SOGoFolder")        soClass];
+    [$(@"SOGoObject")        soClass];
+    [$(@"SOGoContentObject") soClass];
+    [$(@"SOGoFolder")        soClass];
     
     /* setup locale cache */
     self->localeLUT = [[NSMutableDictionary alloc] initWithCapacity:2];
@@ -129,7 +129,7 @@ static BOOL doCrashOnSessionCreate = NO;
 
 - (id)lookupUser:(NSString *)_key inContext:(id)_ctx {
   NSLog (@"lookupUser: %@", _key);
-  return [[[NSClassFromString(@"SOGoUserFolder") alloc] 
+  return [[[$(@"SOGoUserFolder") alloc] 
 	    initWithName:_key inContainer:self] autorelease];
 }
 
@@ -267,7 +267,7 @@ static BOOL doCrashOnSessionCreate = NO;
     return lpath;
   
   if (MainProduct == Nil) {
-    if ((MainProduct = NSClassFromString(@"MainUIProduct")) == Nil)
+    if ((MainProduct = $(@"MainUIProduct")) == Nil)
       [self errorWithFormat:@"did not find MainUIProduct class!"];
   }