loncom/auth/lonroles.pm - diff

Return to lonroles.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.94, 2004/07/04 05:53:35	version 1.94.2.2, 2004/10/11 18:27:49
Line 60 $bodytag	Line 60 $bodytag
$swinfo	$swinfo
</script>	</script>
<h1>$msg</h1>	<h1>$msg</h1>
	<a href="$url">Continue</a>
</body>	</body>
</html>	</html>
ENDREDIR	ENDREDIR
Line 452 ENDHEADER	Line 453 ENDHEADER
$Apache::lonnet::hostname{$home}.	$Apache::lonnet::hostname{$home}.
'/adm/login?domain='.$ENV{'user.domain'}.	'/adm/login?domain='.$ENV{'user.domain'}.
'&username='.$ENV{'user.name'}.	'&username='.$ENV{'user.name'}.
'&firsturl=/priv/'.$trest);	'&firsturl=/priv/'.$trest.'/');
}	}
#next if ($home eq 'no_host');	#next if ($home eq 'no_host');
$home = $Apache::lonnet::hostname{$home};	$home = $Apache::lonnet::hostname{$home};
Line 476 ENDHEADER	Line 477 ENDHEADER
$Apache::lonnet::hostname{$home}.	$Apache::lonnet::hostname{$home}.
'/adm/login?domain='.$ENV{'user.domain'}.	'/adm/login?domain='.$ENV{'user.domain'}.
'&username='.$ENV{'user.name'}.	'&username='.$ENV{'user.name'}.
'&firsturl=/priv/'.$ENV{'user.name'});	'&firsturl=/priv/'.$ENV{'user.name'}.'/');
}	}
#next if ($home eq 'no_host');	#next if ($home eq 'no_host');
$home = $Apache::lonnet::hostname{$home};	$home = $Apache::lonnet::hostname{$home};