From 41f19c23e2bc0a6989e4d0d3dff4f508f6b795e4 Mon Sep 17 00:00:00 2001
From: "ducarroz%netscape.com" <ducarroz%netscape.com>
Date: Thu, 4 Mar 1999 19:33:55 +0000
Subject: [PATCH] Add the function NewMessage to popup the compose window.

---
 mailnews/ui/messenger/resources/mailshell.xul | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/mailnews/ui/messenger/resources/mailshell.xul b/mailnews/ui/messenger/resources/mailshell.xul
index 831738ed9c4..8e63624876f 100644
--- a/mailnews/ui/messenger/resources/mailshell.xul
+++ b/mailnews/ui/messenger/resources/mailshell.xul
@@ -98,6 +98,17 @@ function OpenURL(url)
    }
 }
 
+function NewMessage()
+{
+	dump("\n\nnewMsg from XUL\n\n\n");
+	var appCore = new ComposeAppCore();
+	if (appCore != null) {
+		dump("Initializing ComposeAppCore and creating a new Message\n");
+		appCore.Init("ComposeAppCore");
+		appCore.NewMessage("resource:/res/samples/compose.xul");
+	}
+}
+
 </html:script>
 
   <menubar>