diff --git a/SOPE/NGCards/ChangeLog b/SOPE/NGCards/ChangeLog
index 01a0a820c..a7eb1a4b5 100644
--- a/SOPE/NGCards/ChangeLog
+++ b/SOPE/NGCards/ChangeLog
@@ -1,3 +1,8 @@
+2010-06-08  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
+
+	* iCalXMLRenderer.m (-[CardGroup xmlRender]): don't append empty
+	rendering from child elements to avoid an exception.
+
 2010-06-04  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
 	* iCalXMLRenderer.m: new class module for exporting iCalCalendar
diff --git a/SOPE/NGCards/iCalXMLRenderer.m b/SOPE/NGCards/iCalXMLRenderer.m
index 50fa9436a..530e582c7 100644
--- a/SOPE/NGCards/iCalXMLRenderer.m
+++ b/SOPE/NGCards/iCalXMLRenderer.m
@@ -298,7 +298,7 @@
 
 - (NSString *) xmlRender
 {
-  NSString *lowerTag;
+  NSString *lowerTag, *childRendering;
   int count, max;
   NSMutableString *rendering;
   NSMutableArray *properties, *components;
@@ -313,10 +313,14 @@
       for (count = 0; count < max; count++)
         {
           currentChild = [children objectAtIndex: count];
-          if ([currentChild isKindOfClass: [CardGroup class]])
-            [components addObject: [currentChild xmlRender]];
-          else
-            [properties addObject: [currentChild xmlRender]];
+          childRendering = [currentChild xmlRender];
+          if (childRendering)
+            {
+              if ([currentChild isKindOfClass: [CardGroup class]])
+                [components addObject: childRendering];
+              else
+                [properties addObject: childRendering];
+            }
         }
 
       lowerTag = [tag lowercaseString];