git-svn-id: http://svn.opengroupware.org/SOGo/inverse/trunk@1305 d1b88da0-ebda-0310...

[scalable-opengroupware.org] / UI / MailerUI / UIxMailMainFrame.m

diff --git a/UI/MailerUI/UIxMailMainFrame.m b/UI/MailerUI/UIxMailMainFrame.m
index 94842a19ef081df0b2cab66aac5ec0d371bc8d2f..e45d9d3016b36d8a37b3902ed8628b868131d44a 100644 (file)
--- a/UI/MailerUI/UIxMailMainFrame.m
+++ b/UI/MailerUI/UIxMailMainFrame.m
@@ -20,8 +20,10 @@
 */
 
 #import <Foundation/NSUserDefaults.h>
+
 #import <NGObjWeb/WOContext.h>
 #import <NGObjWeb/WORequest.h>
+#import <NGObjWeb/WOResponse.h>
 #import <NGObjWeb/SoComponent.h>
 #import <NGExtensions/NSString+misc.h>
 
@@ -36,6 +38,28 @@
 
 @implementation UIxMailMainFrame
 
+- (void) _setupContext
+{
+  SOGoUser *activeUser;
+  NSString *login, *module;
+  SOGoMailAccounts *clientObject;
+
+  activeUser = [context activeUser];
+  login = [activeUser login];
+  clientObject = [self clientObject];
+
+  module = [clientObject nameInContainer];
+
+  ud = [activeUser userSettings];
+  moduleSettings = [ud objectForKey: module];
+  if (!moduleSettings)
+    {
+      moduleSettings = [NSMutableDictionary new];
+      [moduleSettings autorelease];
+    }
+  [ud setObject: moduleSettings forKey: module];
+}
+
 /* accessors */
 - (NSString *) mailAccounts
 {
@@ -95,7 +119,7 @@
 - (id <WOActionResults>) composeAction
 {
   NSArray *accounts;
-  NSString *firstAccount, *newLocation;
+  NSString *firstAccount, *newLocation, *parameters;
   SOGoMailAccounts *co;
   NSDictionary *formValues;
 
@@ -103,12 +127,40 @@
   accounts = [[context activeUser] mailAccounts];
   firstAccount = [[accounts objectsForKey: @"name"] objectAtIndex: 0];
   formValues = [[context request] formValues];
+  parameters = [formValues count] > 0 ? [formValues asURLParameters] : @"?mailto=";
   newLocation = [NSString stringWithFormat: @"%@/%@/compose%@",
                          [co baseURLInContext: context],
                          firstAccount,
-                         [formValues asURLParameters]];
+                         parameters];
 
   return [self redirectToLocation: newLocation];
 }
 
+- (WOResponse *) getFoldersStateAction
+{
+  NSString *expandedFolders;
+
+  [self _setupContext];
+  expandedFolders = [moduleSettings objectForKey: @"ExpandedFolders"];
+
+  return [self responseWithStatus: 200 andString: expandedFolders];
+}
+
+- (WOResponse *) saveFoldersStateAction
+{
+  WORequest *request;
+  NSString *expandedFolders;
+  
+  [self _setupContext];
+  request = [context request];
+  expandedFolders = [request formValueForKey: @"expandedFolders"];
+
+  [moduleSettings setObject: expandedFolders
+                 forKey: @"ExpandedFolders"];
+
+  [ud synchronize];
+
+  return [self responseWithStatus: 204];
+}
+
 @end /* UIxMailMainFrame */