--- 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;
}