From 44ac798451c4802744b9621fdf9a0f331c39a004 Mon Sep 17 00:00:00 2001 From: Arturo Espinosa Date: Sat, 29 Jan 2000 22:26:15 +0000 Subject: Add missing file svn path=/trunk/; revision=1655 --- mail/test-mail.c | 58 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 58 insertions(+) create mode 100644 mail/test-mail.c diff --git a/mail/test-mail.c b/mail/test-mail.c new file mode 100644 index 0000000000..883c7fedf4 --- /dev/null +++ b/mail/test-mail.c @@ -0,0 +1,58 @@ +/* + * Tests the mail summary display bonobo component + * + * Author: + * Miguel de Icaza (miguel@kernel.org) + * + * (C) 2000 Helix Code, Inc. + */ +#include +#include + +static void +create_container (void) +{ + GtkWidget *window, *control; + + window = gtk_window_new (GTK_WINDOW_TOPLEVEL); + gtk_widget_show (window); + + control = bonobo_widget_new_control ("GOADID:Evolution:FolderBrowser:1.0"); + if (control == NULL){ + printf ("Could not launch mail control\n"); + exit (1); + } + gtk_container_add (GTK_CONTAINER (window), control); + + gtk_widget_show (window); + gtk_widget_show (control); +} + +int +main (int argc, char *argv []) +{ + CORBA_Environment ev; + CORBA_ORB orb; + + CORBA_exception_init (&ev); + + gnome_CORBA_init ("sample-control-container", "1.0", &argc, argv, 0, &ev); + + CORBA_exception_free (&ev); + + orb = gnome_CORBA_ORB (); + + if (bonobo_init (orb, NULL, NULL) == FALSE) + g_error ("Could not initialize Bonobo\n"); + + bonobo_activate (); + + create_container (); + + /* + * Main loop + */ + gtk_main (); + + return 0; +} -- cgit v1.2.3