--- loncom/interface/lonpreferences.pm 2009/02/19 11:27:52 1.142
+++ loncom/interface/lonpreferences.pm 2009/02/23 22:42:33 1.145
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Preferences
#
-# $Id: lonpreferences.pm,v 1.142 2009/02/19 11:27:52 zhu Exp $
+# $Id: lonpreferences.pm,v 1.145 2009/02/23 22:42:33 schualex Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1215,8 +1215,10 @@ sub passwordchanger {
Apache::lonhtmlcommon::add_breadcrumb(
{ href => '/adm/preferences?action=changepass',
text => 'Change Password'});
- $r->print(Apache::loncommon::start_page('Change Password'));
- $r->print(Apache::lonhtmlcommon::breadcrumbs('Change Password'));
+ unless ($caller eq 'reset_by_email') {
+ $r->print(Apache::loncommon::start_page('Change Password'));
+ $r->print(Apache::lonhtmlcommon::breadcrumbs('Change Password'));
+ }
if ((!defined($caller)) || ($caller eq 'preferences')) {
$user = $env{'user.name'};
$domain = $env{'user.domain'};
@@ -1552,14 +1554,19 @@ ENDERROR
# Inform the user the password has (not?) been changed
my $message;
if ($result =~ /^ok$/) {
- $message = &mt('The password for [_1] was successfully changed',$user);
- print_main_menu($r, $message);
+ $message = &mt('The password for [_1] was successfully changed.',$user);
+ if ($caller eq 'reset_by_email') {
+ $r->print($message.'
');
+ } else {
+ &print_main_menu($r, $message);
+ }
# $r->print("
".&mt('The password for [_1] was successfully changed',$user)."
");
} else {
# error error: run in circles, scream and shout
- $message = &mt("The password for [_1] was not changed",$user)
- .&mt('Please make sure your old password was entered correctly.');
- print_main_menu($r, $message);
+ $message = &mt("The password for [_1] was not changed.",$user).' '.&mt('Please make sure your old password was entered correctly.');
+ unless ($caller eq 'reset_by_email') {
+ &print_main_menu($r, $message);
+ }
# $r->print("".&mt("The password for [_1] was not changed",$user)."
".
# &mt('Please make sure your old password was entered correctly.'));
return 1;
@@ -1731,17 +1738,17 @@ sub coursedisplaychanger {
}
my %pagenames = &Apache::lonlocal::texthash(
firstres => 'First resource',
- whatsnew => "What's New page",
+ whatsnew => "What's New Page",
);
my $whatsnew_off=&mt('Display the [_1]first resource[_2] in the course.','','');
- my $whatsnew_on=&mt("Display the [_1]What's New page[_2] - a summary of items in the course which require attention.",'','');
+ my $whatsnew_on=&mt("Display the [_1]What's New Page[_2] - a summary of items in the course which require attention.",'','');
$r->print('
'
.&mt('Set the default page to be displayed when you select a course role')
.' '
.&mt('(Currently: [_1])',$pagenames{$currvalue})
.'
'
- .&mt("The global user preference you set for your courses can be overridden in an individual course by setting a course specific setting via the [_1]What's New page[_2] in the course.",'','')
+ .&mt("The global user preference you set for your courses can be overridden in an individual course by setting a course specific setting via the [_1]What's New Page[_2] in the course.",'','')
.'
'
);
$r->print(< 'you will be taken to the start of the course.',
'apwb' => 'a page will be displayed that lists items in the course that may require action from you.',
'gtts' => 'Go to the start of the course',
- 'dasp' => "Display the What's New page listing course action items",
+ 'dasp' => "Display the What's New Page listing course action items",
);
my $newdisp = $env{'form.newdisp'};
$message = ''.$lt{'defs'}.': '.$lt{'when'}.', ';