From 58aeee0393c0c65afb61d1190fdbe0fb5f604fab Mon Sep 17 00:00:00 2001
From: Wolfgang Sourdeau <wsourdeau@inverse.ca>
Date: Tue, 6 Nov 2007 17:13:19 +0000
Subject: [PATCH] Monotone-Parent: d25dc292baa2e15a7f6d397c032c8cb30ccdafb2
 Monotone-Revision: 8c2a059d02106d28fe1332f9ecd1d7d5b75cfaeb

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2007-11-06T17:13:19
Monotone-Branch: ca.inverse.sogo
---
 UI/WebServerResources/UIxPreferences.js | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/UI/WebServerResources/UIxPreferences.js b/UI/WebServerResources/UIxPreferences.js
index 8549871bc..4a08999d7 100644
--- a/UI/WebServerResources/UIxPreferences.js
+++ b/UI/WebServerResources/UIxPreferences.js
@@ -3,3 +3,21 @@ function savePreferences(sender) {
 
    return false;
 }
+
+function initPreferences() {
+  var identitiesBtn = $("manageIdentitiesBtn");
+  Event.observe(identitiesBtn, "click",
+		popupIdentitiesWindow.bindAsEventListener(identitiesBtn));
+}
+
+function popupIdentitiesWindow(event) {
+  var urlstr = UserFolderURL + "identities";
+  var w = window.open(urlstr, "identities",
+		      "width=430,height=250,resizable=0,scrollbars=0,location=0");
+  w.opener = window;
+  w.focus();
+
+  preventDefault(event);
+}
+
+addEvent(window, 'load', initPreferences);