This commit was manufactured by cvs2svn to create tagGNOME_PIM_1_4_7

'GNOME_PIM_1_4_7'.

svn path=/tags/GNOME_PIM_1_4_7/; revision=16859

1 files changed, 0 insertions, 905 deletions

diff --git a/shell/e-shell-startup-wizard.c b/shell/e-shell-startup-wizard.c
deleted file mode 100644
index 33e3297bd6..0000000000
--- a/shell/e-shell-startup-wizard.c
+++ /dev/null
@@ -1,905 +0,0 @@
-/*
- * e-shell-startup-wizard.c
- *
- * Copyright (C) 2001 Ximian, Inc.
- *
- * This program is free software; you can redistribute it and/or
- * modify it under the terms of version 2 of the GNU General Public
- * License as published by the Free Software Foundation.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * General Public License for more details.
- *
- * You should have received a copy of the GNU General Public
- * License along with this program; if not, write to the
- * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
- * Boston, MA 02111-1307, USA.
- *
- * Authors: Iain Holmes <iain@ximian.com>
- */
-
-#ifdef HAVE_CONFIG_H
-#include <config.h>
-#endif
-
-#include "e-shell-startup-wizard.h"
-
-#include <errno.h>
-
-#include <glib.h>
-#include <gtk/gtk.h>
-#include <gnome.h>
-#include <glade/glade.h>
-#include <liboaf/liboaf.h>
-
-#include <bonobo/bonobo-object.h>
-#include <bonobo/bonobo-widget.h>
-#include <bonobo/bonobo-exception.h>
-#include <bonobo/bonobo-moniker-util.h>
-#include <bonobo-conf/bonobo-config-database.h>
-
-#include <gal/widgets/e-gui-utils.h>
-
-#include <widgets/e-timezone-dialog/e-timezone-dialog.h>
-
-#include "importer/GNOME_Evolution_Importer.h"
-
-#include "e-timezone-dialog/e-timezone-dialog.h"
-#include "e-util/e-gtk-utils.h"
-
-#include <evolution-wizard.h>
-#include "Evolution.h"
-
-typedef struct _TimezoneDialogPage {
-	GtkWidget *page;
-	GtkWidget *vbox;
-	GtkObject *etd;
-} TimezoneDialogPage;
-
-typedef struct _ImportDialogPage {
-	GtkWidget *page;
-	GtkWidget *vbox;
-
-	GList *importers;
-	
-	int running;
-	gboolean prepared;
-} ImportDialogPage;
-
-typedef struct _MailDialogPage {
-	GtkWidget *page;
-	GtkWidget *vbox;
-	GtkWidget *widget;
-	
-	Bonobo_Control control;
-} MailDialogPage;
-
-typedef struct _SWData {
-	GladeXML *wizard;
-	GtkWidget *dialog;
-	GtkWidget *druid;
-
-	GtkWidget *start, *finish;
-
-	MailDialogPage *id_page;
-	MailDialogPage *source_page;
-	MailDialogPage *extra_page;
-	MailDialogPage *transport_page;
-	MailDialogPage *management_page;
-
-	TimezoneDialogPage *timezone_page;
-	ImportDialogPage *import_page;
-	
-	gboolean cancel;
-	CORBA_Object mailer;
-	Bonobo_EventSource event_source;
-	BonoboListener *listener;
-	int id;
-
-	Bonobo_ConfigDatabase db;
-} SWData;
-
-typedef struct _IntelligentImporterData {
-	CORBA_Object object;
-	Bonobo_Control control;
-	GtkWidget *widget;
-
-	char *name;
-	char *blurb;
-	char *iid;
-} IntelligentImporterData;
-
-typedef struct _SelectedImporterData{
-	CORBA_Object importer;
-	char *iid;
-} SelectedImporterData;
-
-static GHashTable *page_hash;
-static GList *page_list = NULL;
-
-static void
-druid_event_notify_cb (BonoboListener *listener,
-		       const char *name,
-		       BonoboArg *arg,
-		       CORBA_Environment *ev,
-		       SWData *data)
-{
-	int buttons, pagenum;
-	GnomeDruidPage *page;
-
-	if (strcmp (name, EVOLUTION_WIZARD_SET_BUTTONS_SENSITIVE) == 0) {
-		buttons = (int) *((CORBA_short *)arg->_value);
-		gnome_druid_set_buttons_sensitive (GNOME_DRUID (data->druid),
-						   (buttons & 4) >> 2,
-						   (buttons & 2) >> 1,
-						   (buttons & 1));
-	} else if (strcmp (name, EVOLUTION_WIZARD_SET_SHOW_FINISH) == 0) {
-		gnome_druid_set_show_finish (GNOME_DRUID (data->druid),
-					     (gboolean) *((CORBA_boolean *) arg->_value));
-	} else if (strcmp (name, EVOLUTION_WIZARD_SET_PAGE) == 0) {
-		pagenum = (int) *((CORBA_short *) arg->_value);
-
-		page = g_list_nth_data (page_list, pagenum);
-		gnome_druid_set_page (GNOME_DRUID (data->druid), page);
-	}
-}
-
-static void
-make_mail_dialog_pages (SWData *data)
-{
-	CORBA_Environment ev;
-	CORBA_Object object;
-
-	CORBA_exception_init (&ev);
-	data->mailer = oaf_activate_from_id ("OAFIID:GNOME_Evolution_Mail_Wizard", 0, NULL, &ev);
-	if (BONOBO_EX (&ev)) {
-		e_notice (NULL, GNOME_MESSAGE_BOX_ERROR,
-			  _("Could not start the Evolution Mailer Assistant interface\n(%s)"), CORBA_exception_id (&ev));
-		g_warning ("Could not start mailer (%s)", CORBA_exception_id (&ev));
-		CORBA_exception_free (&ev);
-		data->mailer = CORBA_OBJECT_NIL;
-		return;
-	}
-
-	CORBA_exception_free (&ev);
-	if (data->mailer == CORBA_OBJECT_NIL) {
-		e_notice (NULL, GNOME_MESSAGE_BOX_ERROR,
-			  _("Could not start the Evolution Mailer Assistant interface\n"));
-		return;
-	}
-
-	CORBA_exception_init (&ev);
-	data->event_source = Bonobo_Unknown_queryInterface (data->mailer, "IDL:Bonobo/EventSource:1.0", &ev);
-	CORBA_exception_free (&ev);
-	data->listener = bonobo_listener_new (NULL, NULL);
-	gtk_signal_connect (GTK_OBJECT (data->listener), "event-notify",
-			    GTK_SIGNAL_FUNC (druid_event_notify_cb), data);
-	object = bonobo_object_corba_objref (BONOBO_OBJECT (data->listener));
-	CORBA_exception_init (&ev);
-	data->id = Bonobo_EventSource_addListener (data->event_source, object, &ev);
-	CORBA_exception_free (&ev);
-}
-
-static int
-page_to_num (GnomeDruidPage *page)
-{
-	return GPOINTER_TO_INT (g_hash_table_lookup (page_hash, page));
-}
-
-static gboolean
-next_func (GnomeDruidPage *page,
-	   GnomeDruid *druid,
-	   SWData *data)
-{
-	CORBA_Environment ev;
-	int pagenum;
-
-	CORBA_exception_init (&ev);
-	pagenum = page_to_num (page);
-	GNOME_Evolution_Wizard_notifyAction (data->mailer, pagenum, GNOME_Evolution_Wizard_NEXT, &ev);
-	CORBA_exception_free (&ev);
-
-	/* If on last page we own, let druid goto next page */
-	if (pagenum == g_list_length(page_list)-1)
-		return FALSE;
-
-	return TRUE;
-}
-
-static gboolean
-prepare_func (GnomeDruidPage *page,
-	      GnomeDruid *druid,
-	      SWData *data)
-{
-	CORBA_Environment ev;
-	int pagenum;
-
-	CORBA_exception_init (&ev);
-	pagenum = page_to_num (page);
-	GNOME_Evolution_Wizard_notifyAction (data->mailer, pagenum, GNOME_Evolution_Wizard_PREPARE, &ev);
-	CORBA_exception_free (&ev);
-	return FALSE;
-}
-
-static gboolean
-back_func (GnomeDruidPage *page,
-	   GnomeDruid *druid,
-	   SWData *data)
-{
-	CORBA_Environment ev;
-	int pagenum;
-
-	CORBA_exception_init (&ev);
-	pagenum = page_to_num (page);
-	GNOME_Evolution_Wizard_notifyAction (data->mailer, pagenum, GNOME_Evolution_Wizard_BACK, &ev);
-	CORBA_exception_free (&ev);
-
-	/* if we're on page 0, let the druid go back to the start page, if we have one */
-	if (pagenum == 0)
-		return FALSE;
-
-	return TRUE;
-}
-
-static void
-free_importers (SWData *data)
-{
-	GList *l;
-
-	for (l = data->import_page->importers; l; l = l->next) {
-		IntelligentImporterData *iid;
-
-		iid = l->data;
-		if (iid->object != CORBA_OBJECT_NIL) {
-			bonobo_object_release_unref (iid->object, NULL);
-		}
-	}
-
-	g_list_free (data->import_page->importers);
-}
-
-static void
-start_importers (GList *p)
-{
-	CORBA_Environment ev;
-	
-	for (; p; p = p->next) {
-		SelectedImporterData *sid = p->data;
-
-		CORBA_exception_init (&ev);
-		GNOME_Evolution_IntelligentImporter_importData (sid->importer, &ev);
-		if (BONOBO_EX (&ev)) {
-			g_warning ("Error importing %s\n%s", sid->iid,
-				   CORBA_exception_id (&ev));
-		}
-		CORBA_exception_free (&ev);
-	}
-}
-
-static void
-do_import (SWData *data)
-{
-	CORBA_Environment ev;
-	GList *l, *selected = NULL;
-
-	for (l = data->import_page->importers; l; l = l->next) {
-		IntelligentImporterData *importer_data;
-		SelectedImporterData *sid;
-		char *iid;
-
-		importer_data = l->data;
-		iid = g_strdup (importer_data->iid);
-
-		sid = g_new (SelectedImporterData, 1);
-		sid->iid = iid;
-
-		CORBA_exception_init (&ev);
-		sid->importer = bonobo_object_dup_ref (importer_data->object, &ev);
-		if (BONOBO_EX (&ev)) {
-			g_warning ("Error duplication %s\n(%s)", iid,
-				   CORBA_exception_id (&ev));
-			g_free (iid);
-			CORBA_exception_free (&ev);
-			g_free (sid);
-			continue;
-		}
-		CORBA_exception_free (&ev);
-
-		selected = g_list_prepend (selected, sid);
-	}
-
-	free_importers (data);
-
-	if (selected != NULL) {
-		start_importers (selected);
-
-		for (l = selected; l; l = l->next) {
-			SelectedImporterData *sid = l->data;
-
-			CORBA_exception_init (&ev);
-			bonobo_object_release_unref (sid->importer, &ev);
-			CORBA_exception_free (&ev);
-
-			g_free (sid->iid);
-			g_free (sid);
-		}
-		g_list_free (selected);
-	}
-}
-				
-static gboolean
-finish_func (GnomeDruidPage *page,
-	     GnomeDruid *druid,
-	     SWData *data)
-{
-	CORBA_Environment ev;
-	char *displayname, *tz;
-	icaltimezone *zone;
-
-	/* Notify mailer */
-	CORBA_exception_init (&ev);
-	GNOME_Evolution_Wizard_notifyAction (data->mailer, 0, GNOME_Evolution_Wizard_FINISH, &ev);
-	CORBA_exception_free (&ev);
-
-	/* Set Timezone */
-	CORBA_exception_init (&ev);
-
-	e_timezone_dialog_get_timezone (E_TIMEZONE_DIALOG (data->timezone_page->etd), &displayname);
-	/* We know it is a builtin timezone, as that is all the user can change
-	   it to. */
-	zone = e_timezone_dialog_get_builtin_timezone (displayname);
-	if (zone == NULL)
-		tz = g_strdup ("UTC");
-	else
-		tz = g_strdup (icaltimezone_get_location (zone));
-	
-	bonobo_config_set_string (data->db, "/Calendar/Display/Timezone", tz, &ev);
-	g_free (tz);
-	CORBA_exception_free (&ev);
-
-	do_import (data);
-
-	/* Free data */
-	data->cancel = FALSE;
-	gtk_widget_destroy (data->dialog);
-	gtk_main_quit ();
-
-	return TRUE;
-}
-
-static void
-connect_page (GtkWidget *page,
-	      SWData *data)
-{
-	gtk_signal_connect (GTK_OBJECT (page), "next",
-			    GTK_SIGNAL_FUNC (next_func), data);
-	gtk_signal_connect (GTK_OBJECT (page), "prepare",
-			    GTK_SIGNAL_FUNC (prepare_func), data);
-	gtk_signal_connect (GTK_OBJECT (page), "back",
-			    GTK_SIGNAL_FUNC (back_func), data);
-	gtk_signal_connect (GTK_OBJECT (page), "finish",
-			    GTK_SIGNAL_FUNC (finish_func), data);
-}
-
-static MailDialogPage *
-make_identity_page (SWData *data)
-{
-	MailDialogPage *page;
-	CORBA_Environment ev;
-
-	g_return_val_if_fail (data != NULL, NULL);
-	g_return_val_if_fail (data->mailer != CORBA_OBJECT_NIL, NULL);
-	
-	page = g_new0 (MailDialogPage, 1);
-	page->page = glade_xml_get_widget (data->wizard, "identity-page");
-	g_return_val_if_fail (page->page != NULL, NULL);
-
-	connect_page (page->page, data);
-	g_hash_table_insert (page_hash, page->page, GINT_TO_POINTER (0));
-	page_list = g_list_append (page_list, page->page);
-	page->vbox = GNOME_DRUID_PAGE_STANDARD (page->page)->vbox;
-
-	CORBA_exception_init (&ev);
-	page->control = GNOME_Evolution_Wizard_getControl (data->mailer, 0, &ev);
-	if (BONOBO_EX (&ev) || page->control == CORBA_OBJECT_NIL) {
-		g_warning ("Error creating page: %s", CORBA_exception_id (&ev));
-		g_free (page);
-		CORBA_exception_free (&ev);
-
-		return NULL;
-	}
-
-	CORBA_exception_free (&ev);
-
-	page->widget = bonobo_widget_new_control_from_objref (page->control, CORBA_OBJECT_NIL);
-	gtk_box_pack_start (GTK_BOX (page->vbox), page->widget, TRUE, TRUE, 0);
-	gtk_widget_show_all (page->widget);
-
-	return page;
-}
-
-static MailDialogPage *
-make_receive_page (SWData *data)
-{
-	MailDialogPage *page;
-	CORBA_Environment ev;
-
-	g_return_val_if_fail (data != NULL, NULL);
-	g_return_val_if_fail (data->mailer != CORBA_OBJECT_NIL, NULL);
-
-	page = g_new0 (MailDialogPage, 1);
-	page->page = glade_xml_get_widget (data->wizard, "receive-page");
-	g_return_val_if_fail (page->page != NULL, NULL);
-
-	connect_page (page->page, data);
-	g_hash_table_insert (page_hash, page->page, GINT_TO_POINTER (1));
-	page_list = g_list_append (page_list, page->page);
-	page->vbox = GNOME_DRUID_PAGE_STANDARD (page->page)->vbox;
-
-	CORBA_exception_init (&ev);
-	page->control = GNOME_Evolution_Wizard_getControl (data->mailer, 1, &ev);
-	if (BONOBO_EX (&ev) || page->control == CORBA_OBJECT_NIL) {
-		g_warning ("Error creating page: %s", CORBA_exception_id (&ev));
-		g_free (page);
-		CORBA_exception_free (&ev);
-
-		return NULL;
-	}
-
-	CORBA_exception_free (&ev);
-
-	page->widget = bonobo_widget_new_control_from_objref (page->control, CORBA_OBJECT_NIL);
-	gtk_box_pack_start (GTK_BOX (page->vbox), page->widget, TRUE, TRUE, 0);
-	gtk_widget_show_all (page->widget);
-
-	return page;
-}
-
-static MailDialogPage *
-make_extra_page (SWData *data)
-{
-	MailDialogPage *page;
-	CORBA_Environment ev;
-
-	g_return_val_if_fail (data != NULL, NULL);
-	g_return_val_if_fail (data->mailer != CORBA_OBJECT_NIL, NULL);
-
-	page = g_new0 (MailDialogPage, 1);
-	page->page = glade_xml_get_widget (data->wizard, "extra-page");
-	page_list = g_list_append (page_list, page->page);
-	g_return_val_if_fail (page->page != NULL, NULL);
-
-	connect_page (page->page, data);
-	g_hash_table_insert (page_hash, page->page, GINT_TO_POINTER (2));
-	page->vbox = GNOME_DRUID_PAGE_STANDARD (page->page)->vbox;
-
-	CORBA_exception_init (&ev);
-	page->control = GNOME_Evolution_Wizard_getControl (data->mailer, 2, &ev);
-	if (BONOBO_EX (&ev) || page->control == CORBA_OBJECT_NIL) {
-		g_warning ("Error creating page: %s", CORBA_exception_id (&ev));
-		g_free (page);
-		CORBA_exception_free (&ev);
-
-		return NULL;
-	}
-
-	CORBA_exception_free (&ev);
-
-	page->widget = bonobo_widget_new_control_from_objref (page->control, CORBA_OBJECT_NIL);
-	gtk_box_pack_start (GTK_BOX (page->vbox), page->widget, TRUE, TRUE, 0);
-	gtk_widget_show_all (page->widget);
-
-	return page;
-}
-
-static MailDialogPage *
-make_transport_page (SWData *data)
-{
-	MailDialogPage *page;
-	CORBA_Environment ev;
-
-	g_return_val_if_fail (data != NULL, NULL);
-	g_return_val_if_fail (data->mailer != CORBA_OBJECT_NIL, NULL);
-
-	page = g_new0 (MailDialogPage, 1);
-	page->page = glade_xml_get_widget (data->wizard, "send-page");
-	g_return_val_if_fail (page->page != NULL, NULL);
-
-	connect_page (page->page, data);
-	g_hash_table_insert (page_hash, page->page, GINT_TO_POINTER (3));
-	page_list = g_list_append (page_list, page->page);
-	page->vbox = GNOME_DRUID_PAGE_STANDARD (page->page)->vbox;
-
-	CORBA_exception_init (&ev);
-	page->control = GNOME_Evolution_Wizard_getControl (data->mailer, 3, &ev);
-	if (BONOBO_EX (&ev) || page->control == CORBA_OBJECT_NIL) {
-		g_warning ("Error creating page: %s", CORBA_exception_id (&ev));
-		g_free (page);
-		CORBA_exception_free (&ev);
-
-		return NULL;
-	}
-
-	CORBA_exception_free (&ev);
-
-	page->widget = bonobo_widget_new_control_from_objref (page->control, CORBA_OBJECT_NIL);
-	gtk_box_pack_start (GTK_BOX (page->vbox), page->widget, TRUE, TRUE, 0);
-	gtk_widget_show_all (page->widget);
-
-	return page;
-}
-
-static MailDialogPage *
-make_management_page (SWData *data)
-{
-	MailDialogPage *page;
-	CORBA_Environment ev;
-
-	g_return_val_if_fail (data != NULL, NULL);
-	g_return_val_if_fail (data->mailer != CORBA_OBJECT_NIL, NULL);
-
-	page = g_new0 (MailDialogPage, 1);
-	page->page = glade_xml_get_widget (data->wizard, "management-page");
-	g_return_val_if_fail (page->page != NULL, NULL);
-
-	connect_page (page->page, data);
-	g_hash_table_insert (page_hash, page->page, GINT_TO_POINTER (4));
-	page_list = g_list_append (page_list, page->page);
-	page->vbox = GNOME_DRUID_PAGE_STANDARD (page->page)->vbox;
-
-	CORBA_exception_init (&ev);
-	page->control = GNOME_Evolution_Wizard_getControl (data->mailer, 4, &ev);
-	if (BONOBO_EX (&ev) || page->control == CORBA_OBJECT_NIL) {
-		g_warning ("Error creating page: %s", CORBA_exception_id (&ev));
-		g_free (page);
-		CORBA_exception_free (&ev);
-
-		return NULL;
-	}
-
-	CORBA_exception_free (&ev);
-
-	page->widget = bonobo_widget_new_control_from_objref (page->control, CORBA_OBJECT_NIL);
-	gtk_box_pack_start (GTK_BOX (page->vbox), page->widget, TRUE, TRUE, 0);
-	gtk_widget_show_all (page->widget);
-
-	return page;
-}
-
-static TimezoneDialogPage *
-make_timezone_page (SWData *data)
-{
-	TimezoneDialogPage *page;
-	ETimezoneDialog *etd;
-	
-	g_return_val_if_fail (data != NULL, NULL);
-
-	page = g_new0 (TimezoneDialogPage, 1);
-	page->page = glade_xml_get_widget (data->wizard, "timezone-page");
-	g_return_val_if_fail (page->page != NULL, NULL);
-
-	page->vbox = GTK_WIDGET (GNOME_DRUID_PAGE_STANDARD (page->page)->vbox);
-
-	etd = e_timezone_dialog_new ();
-	page->etd = GTK_OBJECT (etd);
-	e_timezone_dialog_reparent (E_TIMEZONE_DIALOG (page->etd), page->vbox);
-
-	return page;
-}
-
-static GList *
-get_intelligent_importers (void)
-{
-	OAF_ServerInfoList *info_list;
-	GList *iids_ret = NULL;
-	CORBA_Environment ev;
-	int i;
-
-	CORBA_exception_init (&ev);
-	info_list = oaf_query ("repo_ids.has ('IDL:GNOME/Evolution/IntelligentImporter:1.0')", NULL, &ev);
-	CORBA_exception_free (&ev);
-
-	for (i = 0; i < info_list->_length; i++) {
-		const OAF_ServerInfo *info;
-
-		info = info_list->_buffer + i;
-		iids_ret = g_list_prepend (iids_ret, g_strdup (info->iid));
-	}
-
-	return iids_ret;
-}
-
-static gboolean
-prepare_importer_page (GnomeDruidPage *page,
-
-		       GnomeDruid *druid,
-		       SWData *data)
-{
-	GtkWidget *dialog;
-	ImportDialogPage *import;
-	GList *l, *importers;
-	GtkWidget *table;
-	int running = 0;
-
-	if (data->import_page->prepared == TRUE) {
-		return TRUE;
-	}
-
-	data->import_page->prepared = TRUE;
-
-	dialog = gnome_message_box_new (_("Please wait...\nScanning for existing setups"), GNOME_MESSAGE_BOX_INFO, NULL);
-	e_make_widget_backing_stored (dialog);
-
-	gtk_window_set_title (GTK_WINDOW (dialog), _("Starting Intelligent Importers"));
-	gtk_widget_show_all (dialog);
-	gtk_widget_show_now (dialog);
-
-	gtk_widget_queue_draw (dialog);
-	gdk_flush ();
-
-	while (gtk_events_pending ()) {
-		gtk_main_iteration ();
-	}
-
-	import = data->import_page;
-	importers = get_intelligent_importers ();
-	if (importers == NULL) {
-		/* No importers, go directly to finish, do not pass go
-		   Do not collect $200 */
-		gnome_druid_set_page (druid, GNOME_DRUID_PAGE (data->finish))
-;
-		gtk_widget_destroy (dialog);
-		return TRUE;
-	}
-
-	table = gtk_table_new (g_list_length (importers), 2, FALSE);
-	for (l = importers; l; l = l->next) {
-		GtkWidget *label;
-		IntelligentImporterData *id;
-		CORBA_Environment ev;
-		gboolean can_run;
-		char *str;
-		
-		id = g_new0 (IntelligentImporterData, 1);
-		id->iid = g_strdup (l->data);
-
-		CORBA_exception_init (&ev);
-		id->object = oaf_activate_from_id ((char *) id->iid, 0, NULL, &ev);
-		if (BONOBO_EX (&ev)) {
-			g_warning ("Could not start %s:%s", id->iid,
-				   CORBA_exception_id (&ev));
-
-			CORBA_exception_free (&ev);
-			/* Clean up the IID */
-			g_free (id->iid);
-			g_free (id);
-			continue;
-		}
-
-		if (id->object == CORBA_OBJECT_NIL) {
-			g_warning ("Could not activate component %s", id->iid);
-			CORBA_exception_free (&ev);
-
-			g_free (id->iid);
-			g_free (id);
-			continue;
-		}
-
-		can_run = GNOME_Evolution_IntelligentImporter_canImport (id->object, &ev);
-		if (BONOBO_EX (&ev)) {
-			g_warning ("Could not call canImport(%s): %s", id->iid,
-				   CORBA_exception_id (&ev));
-			bonobo_object_release_unref (id->object, &ev);
-			CORBA_exception_free (&ev);
-
-			g_free (id->iid);
-			g_free (id);
-			continue;
-		}
-
-		if (can_run == FALSE) {
-			bonobo_object_release_unref (id->object, &ev);
-			CORBA_exception_free (&ev);
-			g_free (id->iid);
-			g_free (id);
-			continue;
-		}
-
-		running++;
-		id->name = GNOME_Evolution_IntelligentImporter__get_importername (id->object, &ev);
-		if (BONOBO_EX (&ev)) {
-			g_warning ("Could not get name(%s): %s", id->iid,
-				   CORBA_exception_id (&ev));
-			bonobo_object_release_unref (id->object, &ev);
-			CORBA_exception_free (&ev);
-			g_free (id->iid);
-			g_free (id);
-			continue;
-		}
-
-		id->blurb = GNOME_Evolution_IntelligentImporter__get_message (id->object, &ev);
-		if (BONOBO_EX (&ev)) {
-			g_warning ("Could not get message(%s): %s",
-				   id->iid, CORBA_exception_id (&ev));
-			bonobo_object_release_unref (id->object, &ev);
-			CORBA_exception_free (&ev);
-			g_free (id->iid);
-			CORBA_free (id->name);
-			g_free (id);
-			continue;
-		}
-
-		id->control = Bonobo_Unknown_queryInterface (id->object,
-							     "IDL:Bonobo/Control:1.0", &ev);
-		if (BONOBO_EX (&ev)) {
-			g_warning ("Could not QI for Bonobo/Control:1.0 %s:%s",
-				   id->iid, CORBA_exception_id (&ev));
-			bonobo_object_release_unref (id->object, &ev);
-			CORBA_exception_free (&ev);
-			g_free (id->iid);
-			CORBA_free (id->name);
-			CORBA_free (id->blurb);
-			continue;
-		}
-
-		if (id->control != CORBA_OBJECT_NIL) {
-			id->widget = bonobo_widget_new_control_from_objref (id->control, CORBA_OBJECT_NIL);
-			gtk_widget_show (id->widget);
-		} else {
-			id->widget = gtk_label_new ("");
-			gtk_widget_show (id->widget);
-		}
-
-		CORBA_exception_free (&ev);
-
-		import->importers = g_list_prepend (import->importers, id);
-		str = g_strdup_printf (_("From %s:"), id->name);
-		label = gtk_label_new (str);
-		g_free (str);
-
-		gtk_misc_set_alignment (GTK_MISC (label), 0, .5); 
-
-		gtk_table_attach (GTK_TABLE (table), label, 0, 1, running - 1,
-				  running, GTK_FILL, 0, 0, 0);
-		gtk_table_attach (GTK_TABLE (table), id->widget, 1, 2,
-				  running - 1, running, GTK_FILL, 0, 3, 0);
-		gtk_widget_show_all (table);
-
-		gtk_box_pack_start (GTK_BOX (data->import_page->vbox), table,
-				    FALSE, FALSE, 0);
-	}
-
-	if (running == 0) {
-		gnome_druid_set_page (druid, GNOME_DRUID_PAGE (data->finish));
-		gtk_widget_destroy (dialog);
-		return TRUE;
-	}
-
-	import->running = running;
-	gtk_widget_destroy (dialog);
-
-	return FALSE;
-}
-
-static ImportDialogPage *
-make_importer_page (SWData *data)
-{
-	ImportDialogPage *page;
-	GtkWidget *label, *sep;
-	
-	g_return_val_if_fail (data != NULL, NULL);
-
-	page = g_new0 (ImportDialogPage, 1);
-	page->page = glade_xml_get_widget (data->wizard, "import-page");
-	g_return_val_if_fail (page->page != NULL, NULL);
-
-	gtk_signal_connect (GTK_OBJECT (page->page), "prepare",
-			    GTK_SIGNAL_FUNC (prepare_importer_page), data);
-	page->vbox = GNOME_DRUID_PAGE_STANDARD (page->page)->vbox;
-	gtk_container_set_border_width (GTK_CONTAINER (page->vbox), 4);
-
-	label = gtk_label_new (_("Please select the information that you would like to import:"));
-	gtk_box_pack_start (GTK_BOX (page->vbox), label, FALSE, FALSE, 3);
-
-	sep = gtk_hseparator_new ();
-	gtk_box_pack_start (GTK_BOX (page->vbox), sep, FALSE, FALSE, 3);
-
-	page->prepared = FALSE;
-	return page;
-}
-
-static void
-startup_wizard_cancel (GnomeDruid *druid,
-		       SWData *data)
-{
-	/* Free data */
-	data->cancel = TRUE;
-	gtk_widget_destroy (data->dialog);
-	gtk_main_quit ();
-}
-
-gboolean
-e_shell_startup_wizard_create (void)
-{
-	SWData *data;
-	CORBA_Environment ev;
-	int num_accounts;
-
-	data = g_new0 (SWData, 1);
-
-	CORBA_exception_init (&ev);
-	data->db = bonobo_get_object ("wombat:", "Bonobo/ConfigDatabase", &ev);
-	if (BONOBO_EX (&ev) || data->db == CORBA_OBJECT_NIL) {
-		g_warning ("Error starting wombat: (%s)", CORBA_exception_id (&ev));
-		CORBA_exception_free (&ev);
-		g_free (data);
-
-		return FALSE;
-	}
-
-	num_accounts = bonobo_config_get_long_with_default (data->db, "/Mail/Accounts/num", 0, NULL);
-	CORBA_exception_free (&ev);
-
-	if (num_accounts != 0) {
-		bonobo_object_release_unref (data->db, NULL);
-		g_free (data);
-		return TRUE;
-	}
-
-	data->wizard = glade_xml_new (EVOLUTION_GLADEDIR "/evolution-startup-wizard.glade", NULL);
-	g_return_val_if_fail (data->wizard != NULL, FALSE);
-	data->dialog = glade_xml_get_widget (data->wizard, "startup-wizard");
-	g_return_val_if_fail (data->dialog != NULL, FALSE);
-	gtk_window_set_wmclass (GTK_WINDOW (data->dialog), "startup-wizard",
-				"Evolution:shell");
-
-	page_hash = g_hash_table_new (NULL, NULL);
-	data->druid = glade_xml_get_widget (data->wizard, "startup-druid");
-	g_return_val_if_fail (data->druid != NULL, FALSE);
-	gnome_druid_set_buttons_sensitive (GNOME_DRUID (data->druid),
-					   FALSE, TRUE, FALSE);
-
-	gtk_signal_connect (GTK_OBJECT (data->druid), "cancel",
-			    GTK_SIGNAL_FUNC (startup_wizard_cancel), data);
-
-	data->start = glade_xml_get_widget (data->wizard, "start-page");
-	data->finish = glade_xml_get_widget (data->wizard, "done-page");
-	g_return_val_if_fail (data->start != NULL, FALSE);
-	g_return_val_if_fail (data->finish != NULL, FALSE);
-	gtk_signal_connect (GTK_OBJECT (data->finish), "finish",
-			    GTK_SIGNAL_FUNC (finish_func), data);
-
-	make_mail_dialog_pages (data);
-	g_return_val_if_fail (data->mailer != CORBA_OBJECT_NIL, TRUE);
-
-	data->id_page = make_identity_page (data);
-	data->source_page = make_receive_page (data);
-	data->extra_page = make_extra_page (data);
-	data->transport_page = make_transport_page (data);
-	data->management_page = make_management_page (data);
-
-	data->timezone_page = make_timezone_page (data);
-	data->import_page = make_importer_page (data);
-
-	g_return_val_if_fail (data->id_page != NULL, TRUE);
-	g_return_val_if_fail (data->source_page != NULL, TRUE);
-	g_return_val_if_fail (data->extra_page != NULL, TRUE);
-	g_return_val_if_fail (data->transport_page != NULL, TRUE);
-	g_return_val_if_fail (data->management_page != NULL, TRUE);
-	g_return_val_if_fail (data->timezone_page != NULL, TRUE);
-	g_return_val_if_fail (data->import_page != NULL, TRUE);
-
-	gnome_druid_set_buttons_sensitive (GNOME_DRUID (data->druid), FALSE, TRUE, TRUE);
-	gtk_widget_show_all (data->dialog);
-
-	gtk_main ();
-
-	/* Sync database */
-	Bonobo_ConfigDatabase_sync (data->db, &ev);
-	bonobo_object_release_unref (data->db, NULL);
-	CORBA_exception_free (&ev);
-
-	return !data->cancel;
-}