diff options
author | ivan <ivan> | 2002-08-12 06:17:09 +0000 |
---|---|---|
committer | ivan <ivan> | 2002-08-12 06:17:09 +0000 |
commit | 3ef62a0570055da710328937e7f65dbb2c027c62 (patch) | |
tree | d549158b172fd499b4f81a2981b62aabbde4f99b /rt/webrt/User | |
parent | 030438c9cb1c12ccb79130979ef0922097b4311a (diff) |
import rt 2.0.14
Diffstat (limited to 'rt/webrt/User')
-rwxr-xr-x | rt/webrt/User/Prefs.html | 53 |
1 files changed, 53 insertions, 0 deletions
diff --git a/rt/webrt/User/Prefs.html b/rt/webrt/User/Prefs.html new file mode 100755 index 000000000..d769977f9 --- /dev/null +++ b/rt/webrt/User/Prefs.html @@ -0,0 +1,53 @@ +<& /Elements/Header, Title=>"Preferences" &> +<& /Elements/Tabs &> + +<& /Elements/ListActions, actions => \@results &> +<form method=post> + +% unless ($RT::WebExternalAuth) { +<& /Elements/TitleBoxStart, title => 'Change password' &> +New password: <input type=password name="NewPass1" size=16> +Confirm: <input type=password name="NewPass2" size=16> +<& /Elements/TitleBoxEnd &> +<BR> +% } +<& /Elements/TitleBoxStart, title => 'Signature' &> +<INPUT TYPE=HIDDEN NAME="SignatureMagic" VALUE=1> +<TEXTAREA COLS=72 ROWS=4 WRAP=HARD NAME="Signature"><% $session{'CurrentUser'}->UserObj->Signature %></TEXTAREA> +<br> +<BR> +<& /Elements/TitleBoxEnd &> +<& /Elements/Submit &> + </form> + + +<%INIT> +my @results; + +if ($NewPass1) { + if ($NewPass1 ne $NewPass2) { + push (@results, "Passwords did not match."); + } + else { + my ($val, $msg)=$session{'CurrentUser'}->UserObj->SetPassword($NewPass1); + push (@results, "Password: ".$msg); + } +} +if ($Signature || $SignatureMagic) { + $Signature =~ s/(\r\n|\r)/\n/g; + if ($Signature ne $session{'CurrentUser'}->UserObj->Signature) { + my ($val, $msg)=$session{'CurrentUser'}->UserObj->SetSignature($Signature); + push (@results, "Signature: ".$msg); + } +} +#A hack to make sure that session gets rewritten. + +$session{'i'}++; +</%INIT> + +<%ARGS> +$Signature => undef +$SignatureMagic => undef +$NewPass1 => undef +$NewPass2 => undef +</%ARGS> |