version 1.13, 2016/01/27 00:24:09
|
version 1.14.2.1, 2020/09/03 14:06:06
|
Line 44 sub handler {
|
Line 44 sub handler {
|
return OK if $r->header_only; |
return OK if $r->header_only; |
|
|
my (%activities,$activity,$origurl); |
my (%activities,$activity,$origurl); |
map { $activities{$_} = 1; } ('boards','chat','msgdisplay','blogs','groups','port','printout','docs','passwd'); |
map { $activities{$_} = 1; } ('boards','chat','com','blogs','groups','port','printout','docs','passwd'); |
|
|
# determine what kind of blocking we want details for |
# determine what kind of blocking we want details for |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['activity','url']); |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['activity','url']); |
Line 52 sub handler {
|
Line 52 sub handler {
|
|
|
my $title = 'Communication Blocking Status Information'; |
my $title = 'Communication Blocking Status Information'; |
|
|
if (($activity eq 'docs') || ($activity eq 'printout')) { |
if (($activity eq 'docs') || ($activity eq 'printout') || |
|
($activity eq 'passwd')) { |
$title = 'Blocking Status Information'; |
$title = 'Blocking Status Information'; |
$origurl = $env{'form.url'}; |
if ($activity eq 'docs') { |
|
$origurl = $env{'form.url'}; |
|
} |
} |
} |
$r->print(&Apache::loncommon::start_page($title,undef, |
$r->print(&Apache::loncommon::start_page($title,undef, |
{'only_body' => 1})); |
{'only_body' => 1})); |
Line 113 sub blockpage {
|
Line 116 sub blockpage {
|
my %descs = ( |
my %descs = ( |
boards => 'Discussion posts in this course', |
boards => 'Discussion posts in this course', |
chat => 'Chat Room', |
chat => 'Chat Room', |
msgdisplay => 'This message', |
com => 'This message', |
blogs => 'Blogs', |
blogs => 'Blogs', |
groups => 'Groups in this course', |
groups => 'Groups in this course', |
printout => 'Printout generation', |
printout => 'Printout generation', |