loncom/cgi/takeoffline.pl - diff

Return to takeoffline.pl CVS log

Up to [LON-CAPA] / loncom / cgi

version 1.6.12.1, 2015/03/11 03:33:22	version 1.8, 2015/01/21 15:12:03
Line 57 sub main {	Line 57 sub main {

if ($ENV{'QUERY_STRING'} =~ /^phase\=two\&?(.*)$/) {	if ($ENV{'QUERY_STRING'} =~ /^phase\=two\&?(.*)$/) {
my $reroute = $1;	my $reroute = $1;
print &Apache::loncommon::start_page('Take Offline','',	print &Apache::loncommon::start_page('Take Offline');
{'no_inline_link' => 1,});
&phasetwo($reroute);	&phasetwo($reroute);
} else {	} else {
my $js = <<ENDJS;	my $js = <<ENDJS;
Line 74 function setphase(form) {	Line 73 function setphase(form) {
// ]]>	// ]]>
</script>	</script>
ENDJS	ENDJS
print &Apache::loncommon::start_page('Take Offline',$js,	print &Apache::loncommon::start_page('Take Offline',$js);
{'no_inline_link' => 1,});
&phaseone();	&phaseone();
}	}
print &Apache::loncommon::end_page();	print &Apache::loncommon::end_page();
Line 229 sub reroute {	Line 227 sub reroute {
</body>	</body>
</html>	</html>
ENDNEWINDEX	ENDNEWINDEX
close(OUT);	close(OUT);
return $otherhostname;	return $otherhostname;
}	}
}	}
return;	return;