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

@@ -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);