diff --git a/ChangeLog b/ChangeLog
index 24061285d..df985f619 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -3,6 +3,8 @@
 	* SoObjects/Appointments/SOGoCalendarComponent.m
 	(-lookupOccurrence:): now a virtual method forcing the use by
 	subclasses of the new methods below.
+	(-saveCalendar:): new method that enables the saving of an
+	iCalendar object.
 
 	* SoObjects/Appointments/iCalCalendar+SOGo.m: new category module.
 	(-eventWithRecurrenceId, -todoWithRecurrenceId): new method that
diff --git a/SoObjects/Appointments/SOGoCalendarComponent.h b/SoObjects/Appointments/SOGoCalendarComponent.h
index 25b381582..3512339c2 100644
--- a/SoObjects/Appointments/SOGoCalendarComponent.h
+++ b/SoObjects/Appointments/SOGoCalendarComponent.h
@@ -62,6 +62,7 @@
 		       toFolder: (SOGoGCSFolder *) newFolder;
 
 - (void) updateComponent: (iCalRepeatableEntityObject *) newObject;
+- (NSException *) saveCalendar: (iCalCalendar *) newCalendar;
 - (NSException *) saveComponent: (iCalRepeatableEntityObject *) newObject;
 
 /* mail notifications */
diff --git a/SoObjects/Appointments/SOGoCalendarComponent.m b/SoObjects/Appointments/SOGoCalendarComponent.m
index eb25f9876..20b0ea0e4 100644
--- a/SoObjects/Appointments/SOGoCalendarComponent.m
+++ b/SoObjects/Appointments/SOGoCalendarComponent.m
@@ -645,17 +645,18 @@
     }
 }
 
-- (NSException *) saveComponent: (iCalRepeatableEntityObject *) newObject
+- (NSException *) saveCalendar: (iCalCalendar *) newCalendar
 {
-  NSString *newiCalString;
-
-  newiCalString = [[newObject parent] versitString];
-
-  [self saveContentString: newiCalString];
+  [self saveContentString: [newCalendar versitString]];
 
   return nil;
 }
 
+- (NSException *) saveComponent: (iCalRepeatableEntityObject *) newObject
+{
+  return [self saveCalendar: [newObject parent]];
+}
+
 /* raw saving */
 
 /* EMail Notifications */