loncom/auth/switchserver.pm - diff

Return to switchserver.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.11, 2007/01/12 15:44:27	version 1.12, 2007/03/01 23:14:12
Line 89 sub handler {	Line 89 sub handler {
"Switch Server to $env{'form.otherserver'} with role $env{'form.role'} $ENV{'REMOTE_ADDR'}");	"Switch Server to $env{'form.otherserver'} with role $env{'form.role'} $ENV{'REMOTE_ADDR'}");

&Apache::loncommon::content_type($r,'text/html');	&Apache::loncommon::content_type($r,'text/html');

	#expire the cookie
	my $c = new CGI::Cookie(-name => 'lonID',
	-value => '',
	-expires => '-10y',);
	$r->header_out('Set-cookie' => $c);
$r->send_http_header;	$r->send_http_header;
return OK if $r->header_only;	return OK if $r->header_only;
# -------------------------------------------------------- Menu script and info	# -------------------------------------------------------- Menu script and info