--- loncom/interface/lonpreferences.pm 2008/12/23 19:22:13 1.132 +++ loncom/interface/lonpreferences.pm 2009/01/14 15:46:19 1.133 @@ -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.133 2009/01/14 15:46:19 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 {