Fix for bug #1689

Monotone-Parent: 7605704028eff50386f4f9c1e4e93aa47eea31c3
Monotone-Revision: ae08767667624a609d7996a164800377cb574081

Monotone-Author: ludovic@Sophos.ca
Monotone-Date: 2012-09-17T10:06:18
Monotone-Branch: ca.inverse.sogo

OpenChange/iCalEvent+MAPIStore.m

@@ -151,6 +151,17 @@
   // else
   //   isException = NO;
 
+  /* privacy */
+  value = [properties objectForKey: MAPIPropertyKey(PidLidPrivate)];
+
+  if (value)
+    {
+      if ([value boolValue])
+	[self setAccessClass: @"PRIVATE"];
+      else
+	[self setAccessClass: @"PUBLIC"];
+    }
+
   userTimeZone = [userContext timeZone];
 
   /* CREATED */