minor enh for default file extensions

git-svn-id: http://svn.opengroupware.org/SOGo/trunk@373 d1b88da0-ebda-0310-925b-ed51d893ca5b

diff --git a/SOGo/SoObjects/SOGo/ChangeLog b/SOGo/SoObjects/SOGo/ChangeLog
index eb38acfdcd0fc59a18a11bebd1a286c5697ec2fc..d89057583c4c7f0a6b9db6d90f062457e46220ef 100644 (file)
--- a/SOGo/SoObjects/SOGo/ChangeLog
+++ b/SOGo/SoObjects/SOGo/ChangeLog
@@ -1,5 +1,7 @@
 2004-10-08  Helge Hess  <helge.hess@opengroupware.org>
 
+       * SOGoFolder.m: added facility to define default extensions (v0.9.24)
+
        * SOGoObject.m: fixed not implemented return status (501, not 502)
          (v0.9.23)
        

diff --git a/SOGo/SoObjects/SOGo/SOGoFolder.m b/SOGo/SoObjects/SOGo/SOGoFolder.m
index ff770364ea65a0fc64ae94b0c76b0e379b086041..4eee453b58cd8256439a7a762a27cd88d8816683 100644 (file)
--- a/SOGo/SoObjects/SOGo/SOGoFolder.m
+++ b/SOGo/SoObjects/SOGo/SOGoFolder.m
@@ -82,9 +82,44 @@
 
 /* reflection */
 
+- (NSString *)defaultFilenameExtension {
+  /* 
+     Override to add an extension to a filename
+     
+     Note: be careful with that, needs to be consistent with object lookup!
+  */
+  return nil;
+}
+
 - (NSArray *)toOneRelationshipKeys {
   /* toOneRelationshipKeys are the 'files' contained in a folder */
-  return [self fetchContentObjectNames];
+  NSMutableArray *ma;
+  NSArray  *names;
+  NSString *ext;
+  unsigned i, count;
+
+  if ((names = [self fetchContentObjectNames]) == nil)
+    return names;
+  
+  if ((count = [names count]) == 0)
+    return names;
+  
+  if ((ext = [self defaultFilenameExtension]) == nil)
+    return names;
+  
+  ma = [NSMutableArray arrayWithCapacity:count];
+  for (i = 0; i < count; i++) {
+    NSRange  r;
+    NSString *name;
+    
+    name = [names objectAtIndex:i];
+    r = [name rangeOfString:@"."];
+    if (r.length == 0)
+      name = [[name stringByAppendingString:@"."] stringByAppendingString:ext];
+    
+    [ma addObject:name];
+  }
+  return ma;
 }
 
 /* WebDAV */

diff --git a/SOGo/SoObjects/SOGo/Version b/SOGo/SoObjects/SOGo/Version
index 134290ff530c4da43ceb43846968a5faf79fa51c..b110bb31ce7383dfcec38a12568c72e0378c3cb2 100644 (file)
--- a/SOGo/SoObjects/SOGo/Version
+++ b/SOGo/SoObjects/SOGo/Version
@@ -1,3 +1,3 @@
 # $Id: Version 170 2004-08-11 10:45:40Z helge $
 
-SUBMINOR_VERSION:=23
+SUBMINOR_VERSION:=24