version 1.1, 2009/07/07 19:50:47
|
version 1.2, 2009/07/09 12:53:28
|
Line 44 sub handler {
|
Line 44 sub handler {
|
'Communication Blocking Status Information', |
'Communication Blocking Status Information', |
undef, {'only_body' => 1, })); |
undef, {'only_body' => 1, })); |
|
|
my $table = 'Status table goes here'; |
my ($blocked, $blocktext) = &Apache::loncommon::blocking_status_print('boards'); |
$r->print($table); |
$r->print($blocktext); |
|
|
$r->print(Apache::loncommon::end_page()); |
$r->print(Apache::loncommon::end_page()); |
return OK; |
return OK; |