/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */ /* * folder-browser-factory.c: A Bonobo Control factory for Folder Browsers * * Author: * Miguel de Icaza (miguel@ximian.com) * * (C) 2000 Ximian, Inc. */ #ifdef HAVE_CONFIG_H #include #endif #include #include #include #include #include #include #include #include #include "widgets/menus/gal-view-menus.h" #include #include #include "folder-browser-factory.h" #include "folder-browser.h" #include "folder-browser-ui.h" #include "mail.h" #include "mail-callbacks.h" #include "shell/Evolution.h" #include "mail-config.h" #include "mail-ops.h" #include "mail-session.h" #include "mail-folder-cache.h" #include "evolution-shell-component-utils.h" #include "camel/camel-vtrash-folder.h" /* The FolderBrowser BonoboControls we have. */ static EList *control_list = NULL; /* copied from mail-display.c for now.... */ static GNOME_Evolution_ShellView fb_get_svi (BonoboControl *control) { Bonobo_ControlFrame control_frame; GNOME_Evolution_ShellView shell_view_interface; CORBA_Environment ev; control_frame = bonobo_control_get_control_frame (control); if (control_frame == NULL) return CORBA_OBJECT_NIL; CORBA_exception_init (&ev); shell_view_interface = Bonobo_Unknown_queryInterface (control_frame, "IDL:GNOME/Evolution/ShellView:1.0", &ev); CORBA_exception_free (&ev); if (shell_view_interface == CORBA_OBJECT_NIL) g_warning ("Control frame doesn't have Evolution/ShellView."); return shell_view_interface; } static void control_activate (BonoboControl *control, BonoboUIComponent *uic, FolderBrowser *fb) { GtkWidget *folder_browser; Bonobo_UIContainer container; container = bonobo_control_get_remote_ui_container (control); bonobo_ui_component_set_container (uic, container); bonobo_object_release_unref (container, NULL); g_assert (container == bonobo_ui_component_get_container (uic)); g_return_if_fail (container != CORBA_OBJECT_NIL); folder_browser = bonobo_control_get_widget (control); folder_browser_set_ui_component (FOLDER_BROWSER (folder_browser), uic); folder_browser_ui_add_global (fb); folder_browser_ui_add_list (fb); folder_browser_ui_add_message (fb); folder_browser_set_shell_view(fb, fb_get_svi (control)); if (fb->folder) mail_refresh_folder (fb->folder, NULL, NULL); } static void control_deactivate (BonoboControl *control, BonoboUIComponent *uic, FolderBrowser *fb) { folder_browser_ui_rm_list (fb); folder_browser_ui_rm_all (fb); if (fb->folder) mail_sync_folder (fb->folder, NULL, NULL); folder_browser_set_ui_component (fb, NULL); folder_browser_set_shell_view (fb, CORBA_OBJECT_NIL); } static void control_activate_cb (BonoboControl *control, gboolean activate, gpointer user_data) { BonoboUIComponent *uic; uic = bonobo_control_get_ui_component (control); g_assert (uic != NULL); if (activate) control_activate (control, uic, user_data); else control_deactivate (control, uic, user_data); } static void control_destroy_cb (BonoboControl *control, GtkObject *folder_browser) { gtk_object_destroy (folder_browser); } static void browser_destroy_cb (FolderBrowser *fb, BonoboControl *control) { EIterator *it; /* We do this from browser_destroy_cb rather than * control_destroy_cb because currently, the controls * don't seem to all get destroyed properly at quit * time (but the widgets get destroyed by X). FIXME. */ for (it = e_list_get_iterator (control_list); e_iterator_is_valid (it); e_iterator_next (it)) { if (e_iterator_get (it) == control) { e_iterator_delete (it); break; } } gtk_object_unref (GTK_OBJECT (it)); } BonoboControl * folder_browser_factory_new_control (const char *uri, const GNOME_Evolution_Shell shell) { BonoboControl *control; GtkWidget *folder_browser; folder_browser = folder_browser_new (shell, uri); if (folder_browser == NULL) return NULL; FOLDER_BROWSER (folder_browser)->pref_master = TRUE; /* save UI settings changed in this FB */ gtk_widget_show (folder_browser); control = bonobo_control_new (folder_browser); if (control == NULL) { gtk_object_unref (GTK_OBJECT (folder_browser)); return NULL; } gtk_signal_connect (GTK_OBJECT (control), "activate", control_activate_cb, folder_browser); gtk_signal_connect (GTK_OBJECT (control), "destroy", control_destroy_cb, folder_browser); gtk_signal_connect (GTK_OBJECT (folder_browser), "destroy", browser_destroy_cb, control); if (!control_list) control_list = e_list_new (NULL, NULL, NULL); e_list_append (control_list, control); return control; } EList * folder_browser_factory_get_control_list (void) { if (!control_list) control_list = e_list_new (NULL, NULL, NULL); return control_list; } r0.10-removal'>aboutsummaryrefslogtreecommitdiffstats
path: root/mail/horde-imp
Commit message (Expand)AuthorAgeFilesLines
* - Update to 4.3.3beech2009-02-062-6/+5
* Bump PORTREVISION's after OpenLDAP update.delphij2009-01-061-0/+1
* - Update to 4.3.2beech2008-12-152-4/+4
* Update to 4.3beech2008-10-023-8/+20
* - Upadte to 4.2 (release)beech2008-06-303-36/+17
* Bump portrevision due to upgrade of devel/gettext.edwin2008-06-061-1/+1
* -Fix typobeech2008-03-072-3/+5
* - Update to 4.2-rc2beech2008-03-044-18/+23
* - Update to 4.2-rc2beech2008-02-294-230/+469
* - Update to 4.1.6beech2008-01-182-4/+4
* - Update to 4.1.5beech2007-10-032-5/+4
* - Update maintainer address.beech2007-06-151-1/+1
* - Welcome X.org 7.2 \o/.flz2007-05-201-1/+1
* - Introduce bsd.horde.mksat2007-04-095-615/+507
* - Remove dependency on imap serversat2007-04-064-108/+10
* - Update horde ports to latest versions:sat2007-03-253-32/+20
* - Fix dependency on cyrus-imapd23sat2007-03-221-2/+2
* - Don't depend on imap servers by defaultsat2007-03-131-3/+3
* Fix index breakage due to move of www/horde to www/horde-base.linimon2007-02-251-1/+1
* - Use horde mirrors from bsd.sites.mksat2007-02-131-6/+1
* - Update nag to 2.1.2. [1]shaun2007-01-291-1/+1
* - Since security/gnupg (2.x) installs symlink $PREFIX/bin/gpg,kuriyama2006-12-221-2/+2
* - Upgrade gnupg to 2.0.1. Old stable version (1.4.6) was repocopiedkuriyama2006-12-211-1/+2
* Upgrade to 4.1.3.shaun2006-08-182-4/+4
* Update to 4.1.2shaun2006-06-222-4/+4
* Switch to my @FreeBSD.org address.shaun2006-06-201-1/+1
* Update IMP to 4.1.1itetcu2006-05-123-7/+5
* make sure I update the PORTREVISIONscrappy2006-04-161-0/+1
* After a recent discussion on freebsd-ports, I have modified the Hordescrappy2006-04-162-14/+3
* After a recent discussion on freebsd-ports, I have modified the Hordescrappy2006-04-162-7/+26
* Adopt the Horde ports.thierry2006-04-101-1/+1
* Release maintainership.thierry2006-04-081-1/+1
* Upgrade to 4.1.thierry2006-03-166-52/+59
* Don't create a file when ${LOCALBASE}/etc/apache2/Includes has beenthierry2006-02-172-4/+4
* Replace ugly "@unexec rmdir %D... 2>/dev/null || true" with @dirrmtryedwin2006-01-221-2/+2
* - Replace WITH_APACHE2 by USE_APACHE, rename httpd.conf.xxx tothierry2006-01-064-10/+16
* Add a missing file useful for MSIE users.thierry2005-12-072-1/+4
* Upgrade to 4.0.4.thierry2005-10-193-7/+20
* Upgrade to 4.0.3.thierry2005-04-103-19/+6
* Fix dependency to mail/cyrus-imapd2.thierry2005-03-051-1/+1
* Fix bug #1367thierry2005-02-152-1/+13
* Upgrade to 4.0.2.thierry2005-02-122-3/+3
* Don't let RUN_DEPENDS rely on a fixed HORDEDIR.thierry2005-01-161-4/+4
* Upgrade to 4.0.1.thierry2005-01-082-3/+3
* Upgrade to 4.0.thierry2004-12-2610-0/+892
* IMP 2.2.x contains a SQL injection vulnerabilityleeym2003-02-247-1228/+0
* Point dependencies on net/openldap2 to net/openldap20edwin2003-02-241-2/+2
* Point dependencies on net/openldap to net/openldap12edwin2003-02-241-2/+2
* De-pkg-comment.knu2003-02-212-1/+1
* Chase libpq version bump.seanc2003-01-04