Mantis 1268: SOGo Web: Module au démarrage

Monotone-Parent: c21bac350b493f251e4917c5ae6b5e88a532b0a0
Monotone-Revision: ca6dc2412eb31b0b8d9918590d81e48f8a2088b4

Monotone-Author: crobert@inverse.ca
Monotone-Date: 2009-08-19T17:19:32
Monotone-Branch: ca.inverse.sogo

UI/Scheduler/UIxCalMainView.m

@@ -43,12 +43,29 @@
 
 @implementation UIxCalMainView
 
+- (void) checkDefaultModulePreference
+{
+  NSUserDefaults *userd;
+  NSString *pref;
+
+  userd = [[context activeUser] userDefaults];
+  pref = [userd stringForKey: @"SOGoUIxDefaultModule"];
+
+  if (pref && [pref isEqualToString: @"Last"])
+    {
+      [userd setObject: @"Calendar" forKey: @"SOGoUIxLastModule"];
+      [userd synchronize];
+    }
+}
+
 - (void) _setupContext
 {
   SOGoUser *activeUser;
   NSString *module;
   SOGoAppointmentFolders *clientObject;
 
+  [self checkDefaultModulePreference];
+
   activeUser = [context activeUser];
   clientObject = [self clientObject];