loncom/auth/lonauth.pm - diff

Return to lonauth.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.119, 2011/09/29 13:43:22	version 1.121, 2012/04/11 11:40:07
Line 195 sub reroute {	Line 195 sub reroute {

sub handler {	sub handler {
my $r = shift;	my $r = shift;
	my $londocroot = $r->dir_config('lonDocRoot');
my $form;	my $form;
# Are we re-routing?	# Are we re-routing?
if (-e '/home/httpd/html/lon-status/reroute.txt') {	if (-e "$londocroot/lon-status/reroute.txt") {
&reroute($r);	&reroute($r);
return OK;	return OK;
}	}
Line 226 sub handler {	Line 227 sub handler {
}	}
$r->print(	$r->print(
$start_page	$start_page
.'<h1>'.&mt('You are already logged in!').'</h1>'	.'<p class="LC_warning>"'.&mt('You are already logged in!').'</p>'
.'<p>'.&mt('Please either [_1]continue the current session[_2] or [_3]log out[_4].'	.'<p>'.&mt('Please either [_1]continue the current session[_2] or [_3]log out[_4].'
,'<a href="'.$dest.'">','</a>','<a href="/adm/logout">','</a>')	,'<a href="'.$dest.'">','</a>','<a href="/adm/logout">','</a>')
.'</p>'	.'</p>'