version 1.1, 2000/06/07 19:31:05
|
version 1.2, 2000/10/05 15:31:42
|
Line 11 use strict;
|
Line 11 use strict;
|
use Apache::Constants qw(:common); |
use Apache::Constants qw(:common); |
use Apache::File; |
use Apache::File; |
use Apache::lonnet; |
use Apache::lonnet; |
|
use Apache::lonmenu; |
use CGI::Cookie(); |
use CGI::Cookie(); |
|
|
sub handler { |
sub handler { |
Line 45 sub handler {
|
Line 46 sub handler {
|
$r->content_type('text/html'); |
$r->content_type('text/html'); |
$r->send_http_header; |
$r->send_http_header; |
return OK if $r->header_only; |
return OK if $r->header_only; |
|
# -------------------------------------------------------- Menu script and info |
|
|
|
my $windowinfo=&Apache::lonmenu::close(); |
|
|
|
# --------------------------------------------------------------- Screen Output |
$r->print(<<ENDDOCUMENT); |
$r->print(<<ENDDOCUMENT); |
<html> |
<html> |
<head><title>The LearningOnline Network with CAPA Logout</title></head> |
<head><title>The LearningOnline Network with CAPA Logout</title></head> |
<body bgcolor="#FFFFFF"><h1>Goodbye!</h1></body> |
<body bgcolor="#FFFFFF"> |
|
$windowinfo |
|
<h1>Goodbye!</h1></body> |
</html> |
</html> |
ENDDOCUMENT |
ENDDOCUMENT |
return OK; |
return OK; |