diff --git a/ChangeLog b/ChangeLog
index 54360bd72..f297e4cf7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-03-21  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
+
+	* SoObjects/SOGo/SOGoFolder.m ([SOGoFolder -delete]): new method
+	that forwards the deletion request to the folder manager.
+
 2007-03-19  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
 	* UI/Scheduler/UIxAttendeesEditor.m ([UIxAttendeesEditor
diff --git a/SoObjects/SOGo/SOGoFolder.h b/SoObjects/SOGo/SOGoFolder.h
index e768cd22d..53a75ce97 100644
--- a/SoObjects/SOGo/SOGoFolder.h
+++ b/SoObjects/SOGo/SOGoFolder.h
@@ -65,6 +65,7 @@
 - (NSString *)outlookFolderClass;
 
 - (BOOL) create;
+- (NSException *) delete;
 
 @end
 
diff --git a/SoObjects/SOGo/SOGoFolder.m b/SoObjects/SOGo/SOGoFolder.m
index d7fe67b6f..463344eb5 100644
--- a/SoObjects/SOGo/SOGoFolder.m
+++ b/SoObjects/SOGo/SOGoFolder.m
@@ -128,6 +128,11 @@
   return (result == nil);
 }
 
+- (NSException *) delete
+{
+  return [[self folderManager] deleteFolderAtPath: ocsPath];
+}
+
 - (NSArray *)fetchContentObjectNames {
   NSArray *fields, *records;