Fix a stupid crash caused by not taking account of the fact that the

root node has no folder associated with it.

svn path=/trunk/; revision=5277

shell/ChangeLog

@@ -1,3 +1,8 @@
+2000-09-08  Ettore Perazzoli  <ettore@helixcode.com>
+
+	* evolution-storage.c (list_through_listener_foreach): Don't crash
+	on nodes with no data.  [The root node has none indeed.]
+
 2000-09-08  Ettore Perazzoli  <ettore@helixcode.com>
 
 	* e-folder-tree.c (e_folder_tree_get_folder): Return NULL if there

shell/evolution-storage.c

@@ -63,6 +63,10 @@ list_through_listener_foreach (EFolderTree *tree,
 	corba_folder = (Evolution_Folder *) data;
 	corba_listener = (Evolution_StorageListener) closure;
 
+	/* The root folder has no data.  */
+	if (corba_folder == NULL)
+		return;
+	
 	CORBA_exception_init (&ev);
 	Evolution_StorageListener_new_folder (corba_listener, path, corba_folder, &ev);
 	CORBA_exception_free (&ev);