Initial support for creating/removing folders. This implies some new

IDL methods and new functions to implement on the component side.  I
have also added a simple folder creation dialog in the shell.  It's
quite unfinished and untested.

svn path=/trunk/; revision=3491

1 files changed, 12 insertions, 2 deletions

diff --git a/shell/e-shell-view.c b/shell/e-shell-view.c
index 80c5e1551b..e3b47c3d25 100644
--- a/shell/e-shell-view.c
+++ b/shell/e-shell-view.c
@@ -668,7 +668,7 @@ get_control_for_uri (EShellView *shell_view,
 	EStorageSet *storage_set;
 	EFolder *folder;
 	Bonobo_UIHandler corba_uih;
-	BonoboObjectClient *handler_client;
+	EvolutionShellComponentClient *handler_client;
 	Bonobo_Control corba_control;
 	Evolution_ShellComponent handler;
 	const char *path;
@@ -707,7 +707,8 @@ get_control_for_uri (EShellView *shell_view,
 
 	CORBA_exception_init (&ev);
 
-	corba_control = Evolution_ShellComponent_create_view (handler, e_folder_get_physical_uri (folder), &ev);
+	corba_control = Evolution_ShellComponent_create_view (handler, e_folder_get_physical_uri (folder),
+							      folder_type, &ev);
 	if (ev._major != CORBA_NO_EXCEPTION) {
 		CORBA_exception_free (&ev);
 		return NULL;
@@ -970,5 +971,14 @@ e_shell_view_get_appbar (EShellView *shell_view)
 	return shell_view->priv->appbar;
 }
 
+const char *
+e_shell_view_get_current_uri (EShellView *shell_view)
+{
+	g_return_val_if_fail (shell_view != NULL, NULL);
+	g_return_val_if_fail (E_IS_SHELL_VIEW (shell_view), NULL);
+
+	return shell_view->priv->uri;
+}
+
 
 E_MAKE_TYPE (e_shell_view, "EShellView", EShellView, class_init, init, PARENT_TYPE)