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/MailerUI/UIxMailListView.m

@@ -470,6 +470,21 @@
   return 1;
 }
 
+- (void) checkDefaultModulePreference
+{
+  NSUserDefaults *ud;
+  NSString *pref;
+
+  ud = [[context activeUser] userDefaults];
+  pref = [ud stringForKey: @"SOGoUIxDefaultModule"];
+
+  if (pref && [pref isEqualToString: @"Last"])
+    {
+      [ud setObject: @"Mail" forKey: @"SOGoUIxLastModule"];
+      [ud synchronize];
+    }
+}
+
 - (NSArray *) messages 
 {
   NSMutableArray *unsortedMsgs;
@@ -479,6 +494,8 @@
 
   unsigned len, i, count;
   NSRange r;
+
+  [self checkDefaultModulePreference];
   
   if (!messages)
     {