diff --git a/ChangeLog b/ChangeLog
index 6fed7866f..c6b673f5a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2007-11-08  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
+	* SoObjects/SOGo/SOGoParentFolder.m ([SOGoParentFolder
+	-newFolderWithName:nameandNameInContainer:newNameInContainer]):
+	write the new folder's name in the folder cache.
+
 	* UI/Scheduler/UIxCalendarSelector.m ([UIxCalendarSelector
 	-calendars]): same as below.
 
diff --git a/SoObjects/SOGo/SOGoParentFolder.m b/SoObjects/SOGo/SOGoParentFolder.m
index c73ed9f12..b71a0f0c5 100644
--- a/SoObjects/SOGo/SOGoParentFolder.m
+++ b/SoObjects/SOGo/SOGoParentFolder.m
@@ -212,7 +212,10 @@
       [newFolder setOCSPath: [NSString stringWithFormat: @"%@/%@",
                                        OCSPath, newFolderID]];
       if ([newFolder create])
-	error = nil;
+	{
+	  [subFolders setObject: newFolder forKey: name];
+	  error = nil;
+	}
       else
         error = [NSException exceptionWithHTTPStatus: 400
 			     reason: @"The new folder could not be created"];