|
version 1.23.2.2.2.1, 2012/02/08 15:19:46
|
version 1.23.2.2.2.2, 2012/02/14 00:34:48
|
|
Line 209 sub get_uname {
|
Line 209 sub get_uname {
|
| $value{'useremail'} = $useremail; |
$value{'useremail'} = $useremail; |
| } |
} |
| my $msg = '<br />'.&mt('To be able to reset a forgotten password:') |
my $msg = '<br />'.&mt('To be able to reset a forgotten password:') |
| .'<ul><li>'.&mt('An e-mail address must have previously been associated with your [_1] username.','Learn Physics').'</li>' |
.'<ul><li>'.&mt('An e-mail address must have previously been associated with your [_1] username.','Mechanics Online').'</li>' |
| .'<li>'.&mt('You must be able to access e-mail sent to the e-mail address associated with your [_1] account.','Learn Physics').'</li></ul><br />' |
.'<li>'.&mt('You must be able to access e-mail sent to the e-mail address associated with your [_1] account.','Mechanics Online').'</li></ul><br />' |
| .&mt('In most cases the [_1] username is the same as your e-mail address, in which case you will enter the same information twice.','Learn Physics').'<br /><br />'; |
.&mt('In most cases the [_1] username is the same as your e-mail address, in which case you will enter the same information twice.','Mechanics Online').'<br /><br />'; |
| $msg .= '<form name="forgotpw" method="post" action="/adm/resetpw">'. |
$msg .= '<form name="forgotpw" method="post" action="/adm/resetpw">'. |
| &Apache::lonhtmlcommon::start_pick_box(). |
&Apache::lonhtmlcommon::start_pick_box(). |
| &Apache::lonhtmlcommon::row_title('Learn Physics '.$lt{'unam'}). |
&Apache::lonhtmlcommon::row_title('Mechanics Online '.$lt{'unam'}). |
| '<input type="text" name="uname" size="30" value="'.$value{'uname'}.'" />'. |
'<input type="text" name="uname" size="30" value="'.$value{'uname'}.'" />'. |
| '<input type="hidden" name="udom" value="'.$defdom.'" />'. |
'<input type="hidden" name="udom" value="'.$defdom.'" />'. |
| &Apache::lonhtmlcommon::row_closure(1). |
&Apache::lonhtmlcommon::row_closure(1). |
|
Line 380 sub reset_passwd {
|
Line 380 sub reset_passwd {
|
| } else { |
} else { |
| $r->print(&mt('The token included in an e-mail sent to you [_1] has been verified, so you may now proceed to reset the password for your LON-CAPA account.',$reqtime).'<br />'. |
$r->print(&mt('The token included in an e-mail sent to you [_1] has been verified, so you may now proceed to reset the password for your LON-CAPA account.',$reqtime).'<br />'. |
| '<p>'.&mt('Please enter the username and domain of the LON-CAPA account, and the associated e-mail address, for which you are setting a password.').'<br />'. |
'<p>'.&mt('Please enter the username and domain of the LON-CAPA account, and the associated e-mail address, for which you are setting a password.').'<br />'. |
| &mt('In most cases the [_1] username is the same as your e-mail address, in which case you will enter the same information twice.','Learn Physics').'</p>'. |
&mt('In most cases the [_1] username is the same as your e-mail address, in which case you will enter the same information twice.','Mechanics Online').'</p>'. |
| '<p>'.&mt('The new password must contain at least 7 characters.').' '. |
'<p>'.&mt('The new password must contain at least 7 characters.').' '. |
| &mt('Your new password will be sent to the LON-CAPA server in an encrypted form.').'<br /></p>'); |
&mt('Your new password will be sent to the LON-CAPA server in an encrypted form.').'<br /></p>'); |
| &Apache::lonpreferences::passwordchanger($r,'','reset_by_email',$token); |
&Apache::lonpreferences::passwordchanger($r,'','reset_by_email',$token); |
![[BACK]](/icons/back.gif){kind=icon}
Return to resetpw.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface