--- loncom/interface/lonpreferences.pm 2008/12/23 19:22:13 1.132 +++ loncom/interface/lonpreferences.pm 2009/01/15 18:31:11 1.134 @@ -1,7 +1,7 @@ # The LearningOnline Network # Preferences # -# $Id: lonpreferences.pm,v 1.132 2008/12/23 19:22:13 raeburn Exp $ +# $Id: lonpreferences.pm,v 1.134 2009/01/15 18:31:11 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -515,27 +515,30 @@ sub screennamechanger { ('environment',['screenname','nickname']); my $screenname=$userenv{'screenname'}; my $nickname=$userenv{'nickname'}; - my %lt = &Apache::lonlocal::texthash( - text_screenname => 'New screenname (shown if you post anonymously):', - text_nickname => 'New nickname (shown if you post non-anonymously):', - text_submit => 'Change', - ); Apache::lonhtmlcommon::add_breadcrumb( { href => '/adm/preferences?action=changescreenname', text => 'Change Screen Name'}); $r->print(Apache::loncommon::start_page('Change Screen Name')); $r->print(Apache::lonhtmlcommon::breadcrumbs('Change Screen Name')); - $r->print(< - -
$lt{'text_screenname'} - -
$lt{'text_nickname'} - -
- - -ENDSCREEN + $r->print('

' + .&mt('Change the name that is displayed in your posts.') + .'

' + ); + $r->print('
' + .'' + .&Apache::lonhtmlcommon::start_pick_box() + .&Apache::lonhtmlcommon::row_title(&mt('New screenname (shown if you post anonymously)')) + .'' + .&Apache::lonhtmlcommon::row_closure() + .&Apache::lonhtmlcommon::row_title(&mt('New nickname (shown if you post non-anonymously)')) + .'' + .&Apache::lonhtmlcommon::row_closure() + .&Apache::lonhtmlcommon::row_title() + .'' + .&Apache::lonhtmlcommon::row_closure(1) + .&Apache::lonhtmlcommon::end_pick_box() + .'
' + ); } sub verify_and_change_screenname { @@ -1729,14 +1732,21 @@ sub coursedisplaychanger { $whatsnewselect = ''; } } - my %pagenames = ( + 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] in the course.','first resource'); - my $whatsnew_on=&mt('Display the "[_1]" page - a summary of items in the course which require attention.',"What's New"); + 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.",'',''); - $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]" page in the course',"What's New").'

'); + $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.",'','') + .'

' + ); $r->print(<