function isEmail(s) {
			if (s == " ")
				return false;
			s = s.replace(/£À/ig, "@ ");
			if (s.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1)
				return true;
			else
				return false;
		}
		function add_email_list(){
			document.email_list.acttype.value="add";
			var email=document.email_list.mail.value;
			if(isEmail(email)){
				document.email_list.submit();
			}
		}
		function cancel_email_list(){
			document.email_list.acttype.value="cancel";
			var email=document.email_list.mail.value;
			if(isEmail(email)){
				document.email_list.submit();
			}
		}