add every folder to the sequence except the root folder

2002-05-07  JP Rosevear  <jpr@ximian.com>

	* evolution-storage.c (get_folder_list_foreach): add every folder
	to the sequence except the root folder
	(impl_Storage_get_folder_list): implement corba method
	(evolution_storage_get_epv): set new method implementation

	* evolution-folder-selector-button.h: fix signal prototype

	* e-folder-tree.h: new proto

	* e-folder-tree.c (e_folder_tree_get_count): count nodes
	(count_nodes): bump count foreach path

	* e-corba-storage-registry.c
	(impl_StorageRegistry_getStorageList): implement idl method
	(corba_class_init): set epv method

	* Evolution-Storage.idl: add getStorageList and getFolderList
	methods

svn path=/trunk/; revision=16708

1 files changed, 8 insertions, 0 deletions

diff --git a/shell/Evolution-Storage.idl b/shell/Evolution-Storage.idl
index 04999d24a3..824d6e32e3 100644
--- a/shell/Evolution-Storage.idl
+++ b/shell/Evolution-Storage.idl
@@ -21,6 +21,8 @@ module Evolution {
 
 		attribute string name;
 
+		typedef sequence<Folder> FolderList;
+
 		enum Result {
 			OK,
 			UNSUPPORTED_OPERATION,
@@ -39,6 +41,8 @@ module Evolution {
 			string path;
 		};
 
+		FolderList getFolderList ();
+		
 		void asyncCreateFolder (in string path,
 					in string type,
 					in string description,
@@ -95,6 +99,8 @@ module Evolution {
 		exception NotFound {};
 		exception AlreadyListening {};
 
+		typedef sequence<Storage> StorageList;
+		
 		enum MessageType {
 			STORAGE_CREATED,
 			STORAGE_DESTROYED
@@ -108,6 +114,8 @@ module Evolution {
 		StorageListener addStorage (in Storage storage,
 					    in string name)
 			raises (Exists);
+
+		StorageList getStorageList ();
 		
 		Storage getStorageByName (in string name)
 			raises (NotFound);