HCoop: Change virtual mailbox password
<% if $"email" <> "" then
val email = $"email"
val old = $"old"
val new = $"new"
val new2 = $"new2"
if not (Pass.validEmail email) then
%>
That is not a valid virtual mailbox address!
<%
elseif new <> new2 then
%>
Your new passwords do not match.
<%
elseif not (Pass.change (email, old, new)) then
%>
Error changing password. Did you enter the right e-mail address and current password?
<%
else
%>
Password changed!
<%
end
end %>