See ChangeLog.

Monotone-Parent: 66db9463cbafa20e7fce07829dca8d5d59f33165
Monotone-Revision: aa47b57f3bbc833ffcc7199f21b79f0453a1cd87

Monotone-Author: flachapelle@inverse.ca
Monotone-Date: 2010-06-29T20:21:48
Monotone-Branch: ca.inverse.sogo

SoObjects/SOGo/SOGoGCSFolder.m

@@ -1,7 +1,7 @@
 /* SOGoGCSFolder.m - this file is part of SOGo
  *
  * Copyright (C) 2004-2005 SKYRIX Software AG
- * Copyright (C) 2006-2009 Inverse inc.
+ * Copyright (C) 2006-2010 Inverse inc.
  *
  * Author: Wolfgang Sourdeau <wsourdeau@inverse.ca>
  *
@@ -419,6 +419,21 @@ static NSArray *childRecordFields = nil;
   return error;
 }
 
+- (NSURL *) publicDavURL
+{
+  NSMutableArray *newPath;
+  NSURL *davURL;
+
+  davURL = [self realDavURL];
+  newPath = [NSMutableArray arrayWithArray: [[davURL path] componentsSeparatedByString: @"/"]];
+  [newPath insertObject: @"public" atIndex: 3];
+  davURL = [[NSURL alloc] initWithScheme: [davURL scheme]
+				    host: [davURL host]
+				    path: [newPath componentsJoinedByString: @"/"]];
+
+  return davURL;
+}
+
 - (NSURL *) realDavURL
 {
   NSURL *realDavURL, *currentDavURL;