version 1.1347, 2020/09/28 00:10:28
|
version 1.1348, 2020/10/01 10:16:33
|
Line 5316 sub get_blocks {
|
Line 5316 sub get_blocks {
|
my $now = time; |
my $now = time; |
my %commblocks = &Apache::lonnet::get_comm_blocks($cdom,$cnum); |
my %commblocks = &Apache::lonnet::get_comm_blocks($cdom,$cnum); |
if ($activity eq 'docs') { |
if ($activity eq 'docs') { |
my ($blocked,$nosymbcache); |
my ($blocked,$nosymbcache,$noenccheck); |
if (($caller eq 'blockedaccess') || ($caller eq 'blockingstatus')) { |
if (($caller eq 'blockedaccess') || ($caller eq 'blockingstatus')) { |
$blocked = 1; |
$blocked = 1; |
$nosymbcache = 1; |
$nosymbcache = 1; |
|
$noenccheck = 1; |
} |
} |
@blockers = &Apache::lonnet::has_comm_blocking('bre',$symb,$url,$nosymbcache,$blocked,\%commblocks); |
@blockers = &Apache::lonnet::has_comm_blocking('bre',$symb,$url,$nosymbcache,$noenccheck,$blocked,\%commblocks); |
foreach my $block (@blockers) { |
foreach my $block (@blockers) { |
if ($block =~ /^firstaccess____(.+)$/) { |
if ($block =~ /^firstaccess____(.+)$/) { |
my $item = $1; |
my $item = $1; |