From dc41b95e0dd17222446a46ae1e8545fa85b9f6bd Mon Sep 17 00:00:00 2001
From: Wolfgang Sourdeau <wsourdeau@inverse.ca>
Date: Fri, 22 Jan 2010 21:34:39 +0000
Subject: [PATCH] Monotone-Parent: 845e78bebd63c5b3c1727b437500cbe012c2f5d5
 Monotone-Revision: c8e16863bcabf9adf6b224c4a9922c0ace67917f

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2010-01-22T21:34:39
Monotone-Branch: ca.inverse.sogo
---
 ChangeLog                         |  3 +++
 UI/WebServerResources/MailerUI.js | 14 +++++++++++---
 2 files changed, 14 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index f35aa52e6..b968d3114 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2010-01-22  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
+	* UI/WebServerResources/MailerUI.js (composeNewMessage): fixed
+	potential js error in IE when no mailbox is selected.
+
 	* Tools/SOGoToolRestore.m (+initialize): we need to invoke
 	[iCalEntityObject+SOGo initializeSOGoExtensions], otherwise the
 	extraction of quick records will cause a crash because some global
diff --git a/UI/WebServerResources/MailerUI.js b/UI/WebServerResources/MailerUI.js
index cbb7959e1..278651808 100644
--- a/UI/WebServerResources/MailerUI.js
+++ b/UI/WebServerResources/MailerUI.js
@@ -575,9 +575,17 @@ function onComposeMessage() {
 }
 
 function composeNewMessage() {
-    var account = Mailer.currentMailbox.split("/")[1];
-    var url = ApplicationBaseURL + "/" + encodeURI(account) + "/compose";
-    openMailComposeWindow(url);
+    var account;
+    if (Mailer.currentMailbox)
+        account = Mailer.currentMailbox.split("/")[1];
+    else if (mailAccounts.length)
+        account = mailAccounts[0][0];
+    else
+        account = null;
+    if (account) {
+        var url = ApplicationBaseURL + "/" + encodeURI(account) + "/compose";
+        openMailComposeWindow(url);
+    }
 }
 
 function openMailbox(mailbox, reload, idx, updateStatus) {