version 1.21, 2021/11/30 17:35:10
|
version 1.23, 2024/12/31 19:28:29
|
Line 44 sub handler {
|
Line 44 sub handler {
|
return OK if $r->header_only; |
return OK if $r->header_only; |
|
|
my (%activities,$activity,$origurl,$origsymb); |
my (%activities,$activity,$origurl,$origsymb); |
map { $activities{$_} = 1; } ('boards','chat','com','blogs','about','groups','port','printout','docs','grades','passwd','search'); |
map { $activities{$_} = 1; } ('boards','chat','com','blogs','about','groups','port','printout','docs','grades','passwd','search','index','wishlist','annotate'); |
|
|
# 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','symb']); |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['activity','url','symb']); |
Line 54 sub handler {
|
Line 54 sub handler {
|
|
|
if (($activity eq 'docs') || ($activity eq 'printout') || |
if (($activity eq 'docs') || ($activity eq 'printout') || |
($activity eq 'grades') || ($activity eq 'passwd') || |
($activity eq 'grades') || ($activity eq 'passwd') || |
($activity eq 'search')) { |
($activity eq 'search') || ($activity eq 'wishlist') || |
|
($activity eq 'annotate') || ($activity eq 'index')) { |
$title = 'Blocking Status Information'; |
$title = 'Blocking Status Information'; |
if ($activity eq 'docs') { |
if ($activity eq 'docs') { |
$origurl = $env{'form.url'}; |
$origurl = $env{'form.url'}; |
Line 164 sub blockpage {
|
Line 165 sub blockpage {
|
passwd => 'Changing of passwords', |
passwd => 'Changing of passwords', |
grades => 'Course Gradebook', |
grades => 'Course Gradebook', |
search => 'Content Search', |
search => 'Content Search', |
|
index => 'Content Index', |
|
wishlist => 'Stored Links', |
|
annotate => 'Annotations', |
); |
); |
|
|
if ($activity eq 'groups' || $activity eq 'boards') { |
if ($activity eq 'groups' || $activity eq 'boards') { |
Line 198 sub blockpage {
|
Line 202 sub blockpage {
|
,$showstart, $showend); |
,$showstart, $showend); |
} elsif (($activity eq 'printout') || ($activity eq 'passwd') || |
} elsif (($activity eq 'printout') || ($activity eq 'passwd') || |
($activity eq 'grades') || ($activity eq 'search') || |
($activity eq 'grades') || ($activity eq 'search') || |
($activity eq 'about')) { |
($activity eq 'about') || ($activity eq 'wishlist') || |
|
($activity eq 'annotate') || ($activity eq 'index')) { |
if ($by_ip) { |
if ($by_ip) { |
$output = mt( $description |
$output = mt( $description |
. ' unavailable from your current IP address: [_1] ' |
. ' unavailable from your current IP address: [_1] ' |
Line 252 sub blockpage {
|
Line 257 sub blockpage {
|
if ($by_ip) { |
if ($by_ip) { |
my $showdom = &Apache::lonnet::domain($blockdom); |
my $showdom = &Apache::lonnet::domain($blockdom); |
if ($showdom eq '') { |
if ($showdom eq '') { |
$showdom = $blockdom |
$showdom = $blockdom; |
} |
} |
$output .= '<br />'. |
$output .= '<br />'. |
&mt('This restriction was set by an administrator in the [_1] LON-CAPA domain.' |
&mt('This restriction was set by an administrator in the [_1] LON-CAPA domain.' |