loncom/auth/lonlogout.pm - diff

Return to lonlogout.pm CVS log

Up to [LON-CAPA] / loncom / auth

Diff for /loncom/auth/lonlogout.pm between versions 1.6 and 1.7

version 1.6, 2003/01/29 15:22:06	version 1.7, 2003/03/02 04:08:41
Line 79 sub handler {	Line 79 sub handler {
# ---------------------------------------------------------------- Get handover	# ---------------------------------------------------------------- Get handover
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['handover']);	&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['handover']);
my $switch='';	my $switch='';
	my $bodytag='';
	my $relogmessage='';
if ($ENV{'form.handover'}) {	if ($ENV{'form.handover'}) {
$switch='<meta HTTP-EQUIV="Refresh" CONTENT="0.5; url='.	$switch='<meta HTTP-EQUIV="Refresh" CONTENT="0.5; url='.
$ENV{'form.handover'}.'">';	$ENV{'form.handover'}.'">';
}	$bodytag=&Apache::loncommon::bodytag('Switching Server ...');
	} else {
	$bodytag=&Apache::loncommon::bodytag('Logged Out');
	$relogmessage=(<<ENDRELOG);
	<h1>Goodbye!</h1>
	Please either <a href="javascript:self.close();">close this window</a> or
	<a href="/adm/login">login again</a>.
	ENDRELOG
	}
# --------------------------------------------------------------- Screen Output	# --------------------------------------------------------------- Screen Output
$r->print(<<ENDDOCUMENT);	$r->print(<<ENDDOCUMENT);
<html>	<html>
<head><title>The LearningOnline Network with CAPA Logout</title>	<head><title>The LearningOnline Network with CAPA Logout</title>
$switch	$switch
</head>	</head>
<body bgcolor="#FFFFFF">	$bodytag
$windowinfo	$windowinfo
<h1>Goodbye!</h1></body>	$relogmessage
	</body>
</html>	</html>
ENDDOCUMENT	ENDDOCUMENT
&Apache::lonnet::flushcourselogs();	&Apache::lonnet::flushcourselogs();

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.6
changed lines
	Added in v.1.7