version 1.164, 2021/07/19 15:48:25
|
version 1.165, 2021/08/06 01:27:04
|
Line 950 sub traceroute {
|
Line 950 sub traceroute {
|
@deeplink = &Apache::lonnet::EXT('resource.0.deeplink',$symb,'','','','',$cid,\@recurseup); |
@deeplink = &Apache::lonnet::EXT('resource.0.deeplink',$symb,'','','','',$cid,\@recurseup); |
} |
} |
unless (@deeplink < 2) { |
unless (@deeplink < 2) { |
my ($listed,$scope,$access) = split(/,/,$deeplink[0]); |
|
$hash{'deeplinkonly_'.$rid}=join(':',@deeplink); |
$hash{'deeplinkonly_'.$rid}=join(':',@deeplink); |
} |
} |
|
|
Line 1617 sub build_tmp_hashes {
|
Line 1616 sub build_tmp_hashes {
|
$deeplink = $hash{'deeplinkonly_'.$loginrid}; |
$deeplink = $hash{'deeplinkonly_'.$loginrid}; |
} |
} |
if ($deeplink) { |
if ($deeplink) { |
my ($listed,$scope,$access) = split(/,/,$deeplink); |
my ($state,$others,$listed,$scope,$protect) = split(/,/,$deeplink); |
my $exclude = 1; |
if ($others eq 'hide') { |
if ($exclude) { |
|
my @recfolders; |
my @recfolders; |
if ($scope eq 'rec') { |
if ($scope eq 'rec') { |
foreach my $key (keys(%hash)) { |
foreach my $key (keys(%hash)) { |