New. (create_component): Pass it as the @request_quit_fn to

* component-factory.c (request_quit): New.
(create_component): Pass it as the @request_quit_fn to
evolution_shell_component_new().

* e-msg-composer.c: New local `all_composers'; keeps a list of all
the composer windows created.  Changed type of `parent_class' to
BonoboWindowClass *.
(do_exit): Cleaned up a bit.  Raise the composer window before
showing the message box dialog.
(exit_dialog_cb): Removed.
(e_msg_composer_request_close_all): New.
(create_composer): Add the composer to the all_composers list and
weakref it.
(msg_composer_destroy_notify): GtkDestroyNotify function for the
composer's weakref; remove the composer from the all_composers
list.

svn path=/trunk/; revision=16930

3 files changed, 16 insertions, 9 deletions

diff --git a/mail/ChangeLog b/mail/ChangeLog
index 2f682983a9..1a04992f4f 100644
--- a/mail/ChangeLog
+++ b/mail/ChangeLog
@@ -1,3 +1,9 @@
+2002-05-16  Ettore Perazzoli  <ettore@ximian.com>
+
+	* component-factory.c (request_quit): New.
+	(create_component): Pass it as the @request_quit_fn to
+	evolution_shell_component_new().
+
 2002-05-15  Ettore Perazzoli  <ettore@ximian.com>
 
 	* component-factory.c (create_component): Pass NULL as
diff --git a/mail/component-factory.c b/mail/component-factory.c
index 439e11ccf5..8f6a8b9565 100644
--- a/mail/component-factory.c
+++ b/mail/component-factory.c
@@ -936,6 +936,13 @@ send_receive_cb (EvolutionShellComponent *shell_component,
 	mail_send_receive ();
 }
 
+static gboolean
+request_quit (EvolutionShellComponent *shell_component,
+	      void *closure)
+{
+	return e_msg_composer_request_close_all ();
+}
+
 static BonoboObject *
 create_component (void)
 {
@@ -952,7 +959,8 @@ create_component (void)
 							 xfer_folder,
 							 populate_folder_context_menu,
 							 get_dnd_selection,
-							 NULL, NULL);
+							 request_quit,
+							 NULL);
 
 	gtk_signal_connect (GTK_OBJECT (shell_component), "send_receive",
 			    GTK_SIGNAL_FUNC (send_receive_cb), NULL);
diff --git a/mail/main.c b/mail/main.c
index d6c2e7ffcb..5abc160999 100644
--- a/mail/main.c
+++ b/mail/main.c
@@ -88,15 +88,8 @@ main (int argc, char *argv [])
 	CORBA_ORB orb;
 	struct sigaction sa, osa;
 
-#ifdef DO_MCHECK
-	/* used to make elfence work */
-#if 0
 	free (malloc (10));
-#else
-	/*mtrace();*/
-	mcheck(blowup);
-#endif
-#endif
+
 	bindtextdomain (PACKAGE, EVOLUTION_LOCALEDIR);
 	textdomain (PACKAGE);