Monotone-Parent: 5f2a3e7eefe739c0e656450e9cc85846e27c80b8

Monotone-Revision: 3239b46c1626108a2b1a3d6cab30ae4c9bd6a731

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2007-11-13T22:38:05
Monotone-Branch: ca.inverse.sogo

SoObjects/SOGo/SOGoContentObject.m

@@ -138,6 +138,11 @@
   return content;
 }
 
+- (void) setContentString: (NSString *) newContent
+{
+  ASSIGN (content, newContent);
+}
+
 - (NSException *) saveContentString: (NSString *) newContent
                         baseVersion: (unsigned int) newBaseVersion
 {
@@ -147,12 +152,11 @@
 
   ex = nil;
 
-  ASSIGN (content, newContent);
+  [self setContentString: newContent];
   folder = [container ocsFolder];
   if (folder)
     {
-      ex = [folder writeContent: newContent
-		   toName: nameInContainer
+      ex = [folder writeContent: content toName: nameInContainer
 		   baseVersion: newBaseVersion];
       if (ex)
 	[self errorWithFormat:@"write failed: %@", ex];