version 1.35, 2008/11/20 15:19:22
|
version 1.37, 2009/03/16 17:07:38
|
Line 26
|
Line 26
|
# http://www.lon-capa.org/ |
# http://www.lon-capa.org/ |
# |
# |
|
|
|
=head1 NAME |
|
|
|
Apache::lonlogout |
|
|
|
=head1 SYNOPSIS |
|
|
|
|
|
This is part of the LearningOnline Network with CAPA project |
|
described at http://www.lon-capa.org. |
|
|
|
|
|
=cut |
|
|
package Apache::lonlogout; |
package Apache::lonlogout; |
|
|
use strict; |
use strict; |
Line 85 sub handler {
|
Line 98 sub handler {
|
my $relogmessage=''; |
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'}.'" />'; |
$start_page=&Apache::loncommon::start_page('Switching Server ...', |
$start_page=&Apache::loncommon::start_page('Switching Server ...', |
$switch); |
$switch); |
} else { |
} else { |
Line 154 sub flush_course_logs {
|
Line 167 sub flush_course_logs {
|
__END__ |
__END__ |
|
|
|
|
=head1 NAME |
|
|
|
Apache::lonlogout |
|
|
|
=head1 SYNOPSIS |
|
|
|
|
|
This is part of the LearningOnline Network with CAPA project |
|
described at http://www.lon-capa.org. |
|
|
|
=head1 HANDLER SUBROUTINE |
|
|
|
|
|
=cut |
|
|
|
|
|
|
|
|
|