Monotone-Parent: 90a8213f1d4a44142eb3eb21c4a1a2200390d5c0

Monotone-Revision: cd56286d917362c02385175d3f2f34744449e59d

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2006-08-04T23:00:32
Monotone-Branch: ca.inverse.sogo

ChangeLog

@@ -1,5 +1,10 @@
 2006-08-04  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
+	* UI/Contacts/UIxContactsListViewContainer.m
+	([UIxContactsListViewContainer -contactFolderName]): new method to
+	return the absolute path to the current contact folder, called
+	from within the template.
+
 	* UI/Templates/ContactsUI/UIxContactsListViewContainer.wox: added
 	JS code to initialize the 'currentContactFolder' generic var.
 

UI/Contacts/UIxContactsListViewContainer.m

@@ -20,8 +20,34 @@
  * Boston, MA 02111-1307, USA.
  */
 
+#import <Foundation/NSArray.h>
+#import <Foundation/NSString.h>
+
+#import <NGObjWeb/SoObjects.h>
+
+#import <SoObjects/Contacts/SOGoContactFolders.h>
+
 #import "UIxContactsListViewContainer.h"
 
 @implementation UIxContactsListViewContainer
 
+- (NSString *) contactFolderName
+{
+  NSMutableArray *folders;
+  SOGoObject *currentObject;
+
+  folders = [NSMutableArray new];
+  [folders autorelease];
+
+  currentObject = [self clientObject];
+  while (![currentObject isKindOfClass: [SOGoContactFolders class]])
+    {
+      [folders insertObject: [currentObject nameInContainer] atIndex: 0];
+      currentObject = [currentObject container];
+    }
+
+  return [NSString stringWithFormat: @"/%@",
+                   [folders componentsJoinedByString: @"/"]];
+}
+
 @end