loncom/auth/lonauth.pm - diff

Return to lonauth.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.94, 2008/07/13 00:51:31	version 1.95, 2008/10/01 11:11:08
Line 122 sub failed {	Line 122 sub failed {
{'no_inline_link' => 1,});	{'no_inline_link' => 1,});
my $end_page = &Apache::loncommon::end_page();	my $end_page = &Apache::loncommon::end_page();
&Apache::loncommon::content_type($r,'text/html');	&Apache::loncommon::content_type($r,'text/html');
	sleep 1; # brute force counteraction: slow down attackers, which try to hack user authentication with automated scripts
$r->send_http_header;	$r->send_http_header;
$r->print(	$r->print(
$start_page	$start_page
.'<h1>'.&mt('Sorry ...').'</h1>'	.'<h1>'.&mt('Sorry ...').'</h1>'
.'<p><b>'.&mt($message).'</b></p>'	.'<p class="LC_warning">'.&mt($message).'</p>'
.'<p>'.&mt('Please [_1]log in again[_2].'	.'<p>'.&mt('Please [_1]log in again[_2].'
,"<a href=\"/adm/login?username=$form->{'uname'}&domain=$form->{'udom'}\">",'</a>')	,"<a href=\"/adm/login?username=$form->{'uname'}&domain=$form->{'udom'}\">",'</a>')
.'</p>'	.'</p>'