--- loncom/interface/createaccount.pm 2012/10/29 16:59:03 1.53 +++ loncom/interface/createaccount.pm 2013/02/05 15:45:18 1.55 @@ -3,7 +3,7 @@ # institutional log-in ID (institutional authentication required - localauth # or kerberos) or an e-mail address. # -# $Id: createaccount.pm,v 1.53 2012/10/29 16:59:03 raeburn Exp $ +# $Id: createaccount.pm,v 1.55 2013/02/05 15:45:18 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -805,7 +805,7 @@ sub create_account { # Error messages my $error = ''.&mt('Error:').' '; my $end = '

'; - my $rtnlink = ''. + my $rtnlink = ''. &mt('Return to previous page').''. &Apache::loncommon::end_page(); if ($retrieved eq 'ok') { @@ -1019,7 +1019,7 @@ sub username_activation { my $output; my $error = ''.&mt('Error:').' '; my $end = '

'; - my $rtnlink = ''. + my $rtnlink = ''. &mt('Return to previous page').''. &Apache::loncommon::end_page(); my %domdefaults = &Apache::lonnet::get_domain_defaults($domain); @@ -1168,7 +1168,7 @@ sub linkto_email_help { } $msg .= '
'.&mt('You may wish to contact the [_1]LON-CAPA helpdesk[_2] for [_3].','','',$domdesc).'
'; } else { - $msg .= '
'.&mt('You may wish to send an e-mail to the server administrator: [_1] for [_2].',$Apache::lonnet::perlvar{'AdminEmail'},$domdesc).'
'; + $msg .= '
'.&mt('You may wish to send an e-mail to the server administrator: [_1] for [_2].',$Apache::lonnet::perlvar{'AdmEMail'},$domdesc).'
'; } return $msg; }