Monotone-Parent: 999155b1f40eb1bd1f5c2c2a0f8ab66619a4d3ac

Monotone-Revision: 6a0bee3b1450b1747db470edb8f2c937065902e5

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2006-10-19T14:41:32
Monotone-Branch: ca.inverse.sogo
This commit is contained in:
Wolfgang Sourdeau
2006-10-19 14:41:32 +00:00
parent 6cff2389d8
commit 3d7ab63529
2 changed files with 12 additions and 7 deletions

View File

@@ -855,3 +855,11 @@ function addContact(tag, fullContactName, contactId, contactName, contactEmail)
return false;
}
function onChangeCalendar(list) {
var form = document.forms.editform;
var urlElems = form.getAttribute("action").split("/");
urlElems[urlElems.length-4]
= list.childNodesWithTag("option")[list.value].innerHTML;
form.setAttribute("action", urlElems.join("/"));
}