[Rt-commit] r11049 - rt/branches/3.8-TESTING/html/User

[ruz at bestpractical.com]

Author: ruz
Date: Wed Mar 12 07:21:34 2008
New Revision: 11049

Modified:
   rt/branches/3.8-TESTING/html/User/Prefs.html

Log:
* deal with reseting AuthToken

Modified: rt/branches/3.8-TESTING/html/User/Prefs.html
==============================================================================
--- rt/branches/3.8-TESTING/html/User/Prefs.html	(original)
+++ rt/branches/3.8-TESTING/html/User/Prefs.html	Wed Mar 12 07:21:34 2008
@@ -240,14 +240,12 @@
     push (@results, at fieldresults);
 
 
-# {{{ Deal with special fields: Privileged, Enabled, and Password
+# Deal with special fields: Privileged, Enabled, and Password
 if  ( ($SetPrivileged) and ( $Privileged != $UserObj->Privileged) ) {
 my  ($code, $msg) = $UserObj->SetPrivileged($Privileged);
      push @results, loc('Privileged status: [_1]', loc_fuzzy($msg));
 }
 
-
-
 #TODO: make this report errors properly
 if ((defined $Pass1) and ($Pass1 ne '') and ($Pass1 eq $Pass2) and (!$UserObj->IsPassword($Pass1))) {
     my ($code, $msg);
@@ -257,7 +255,10 @@
     push @results, loc("Passwords do not match. Your password has not been changed");
 }
 
-# }}}
+    if ( $ARGS{'ResetAuthToken'} ) {
+        my ($status, $msg) = $UserObj->GenerateAuthToken;
+        push @results, $msg;
+    }
 }