--- loncom/interface/resetpw.pm 2009/10/09 00:26:40 1.22
+++ loncom/interface/resetpw.pm 2010/11/09 16:40:21 1.25
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Allow access to password changing via a token sent to user's e-mail.
#
-# $Id: resetpw.pm,v 1.22 2009/10/09 00:26:40 raeburn Exp $
+# $Id: resetpw.pm,v 1.25 2010/11/09 16:40:21 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -78,9 +78,7 @@ sub handler {
my $udom = $env{'form.udom'};
my $token = $env{'form.token'};
my $start_page =
- &Apache::loncommon::start_page('Reset password','',
- {
- 'no_inline_link' => 1,});
+ &Apache::loncommon::start_page('Reset password');
$r->print($start_page);
$r->print('
'.&mt('Reset forgotten LON-CAPA password').'
');
my $output;
@@ -153,7 +151,7 @@ sub get_uname {
uemail => 'E-mail address in LON-CAPA',
proc => 'Proceed');
- my $msg = &mt('If you use the same account for other campus services besides LON-CAPA, (e.g., e-mail, course registration, etc.), a separate centrally managed mechanism likely exists to reset a password. However, if your account is used for just LON-CAPA access you will probably be able to reset a password from this page.');
+ my $msg = &mt('If you use the same account for other campus services besides LON-CAPA, (e.g., e-mail, course registration, etc.), a separate centrally managed mechanism likely exists to reset a password. However, if your account is used for just LON-CAPA access you will probably be able to reset a password from this page.');
$msg .= '
'.&mt('Three conditions must be met:')
.'- '.&mt('An e-mail address must have previously been associated with your LON-CAPA username.').'
'
.'- '.&mt('You must be able to access e-mail sent to that address.').'
'
@@ -218,6 +216,7 @@ sub send_mail {
my $requestmail = "To: $email\n".
"From: $contact_name <$contact_email>\n".
"Subject: ".&mt('Your LON-CAPA account')."\n".
+ "Content-type: text/plain\;charset=UTF-8\n".
"\n\n".$mailmsg."\n\n".
&mt('[_1] LON-CAPA support team',$domdesc)."\n".
"$contact_email\n";