diff --git a/ChangeLog b/ChangeLog
index d0f9cf89d..8bbf9143b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2007-02-15  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
+	* SoObjects/Mailer/SOGoMailObject.m ([SOGoMailObject
+	-addRequiredKeysOfStructure:path:toArray:recurse:]): accepts the
+	fetching of HTML parts.
+
 	* SoObjects/Appointments/SOGoCalendarComponent.m
 	([SOGoCalendarComponent -componentTag]): new template method that
 	returns the vcalendar tag of the current object.
diff --git a/SoObjects/Mailer/SOGoMailObject.m b/SoObjects/Mailer/SOGoMailObject.m
index 4b30424b0..10d848cf1 100644
--- a/SoObjects/Mailer/SOGoMailObject.m
+++ b/SoObjects/Mailer/SOGoMailObject.m
@@ -418,7 +418,8 @@ static BOOL debugSoParts       = NO;
   _subtype = [_subtype lowercaseString];
   
   if ([_type isEqualToString:@"text"]) {
-    if ([_subtype isEqualToString:@"plain"])
+    if ([_subtype isEqualToString:@"plain"]
+        || [_subtype isEqualToString:@"html"])
       return YES;
 
     if ([_subtype isEqualToString:@"calendar"]) /* we also fetch calendars */