loncom/auth/lonroles.pm - diff

Return to lonroles.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.91, 2004/05/09 00:45:00	version 1.92, 2004/05/21 19:16:35
Line 47 sub redirect_user {	Line 47 sub redirect_user {
$r->send_http_header;	$r->send_http_header;
my $swinfo=&Apache::lonmenu::rawconfig();	my $swinfo=&Apache::lonmenu::rawconfig();
my $bodytag=&Apache::loncommon::bodytag('Switching Role');	my $bodytag=&Apache::loncommon::bodytag('Switching Role');
$r->print (<<ENDREDIR);	# Note to style police:
	# This must only replace the spaces, nothing else, or it bombs elsewhere.
	$url=~s/ /\%20/g;
	$r->print (<<ENDREDIR);
<head><title>$title</title>	<head><title>$title</title>
<meta HTTP-EQUIV="Refresh" CONTENT="1; url=$url">	<meta HTTP-EQUIV="Refresh" CONTENT="1; url=$url">
</head>	</head>