version 1.687, 2022/10/29 14:47:00
|
version 1.688, 2022/10/29 18:13:28
|
Line 205 sub validate_supppath {
|
Line 205 sub validate_supppath {
|
$backto .= '&'.$items[$i]; |
$backto .= '&'.$items[$i]; |
my $is_hidden; |
my $is_hidden; |
unless ($got_supp) { |
unless ($got_supp) { |
my ($supplemental) = &Apache::lonnet::get_supplemental($coursenum,$coursedom); |
my ($supplemental) = &Apache::loncommon::get_supplemental($coursenum,$coursedom); |
if (ref($supplemental) eq 'HASH') { |
if (ref($supplemental) eq 'HASH') { |
if (ref($supplemental->{'hidden'}) eq 'HASH') { |
if (ref($supplemental->{'hidden'}) eq 'HASH') { |
%supphidden = %{$supplemental->{'hidden'}}; |
%supphidden = %{$supplemental->{'hidden'}}; |
Line 3562 sub editor {
|
Line 3562 sub editor {
|
} |
} |
|
|
if ((!$allowed) && ($folder =~ /^supplemental_\d+$/)) { |
if ((!$allowed) && ($folder =~ /^supplemental_\d+$/)) { |
my ($supplemental) = &Apache::lonnet::get_supplemental($coursenum,$coursedom); |
my ($supplemental) = &Apache::loncommon::get_supplemental($coursenum,$coursedom); |
if (ref($supplemental) eq 'HASH') { |
if (ref($supplemental) eq 'HASH') { |
if ((ref($supplemental->{'hidden'}) eq 'HASH') && |
if ((ref($supplemental->{'hidden'}) eq 'HASH') && |
(ref($supplemental->{'ids'}) eq 'HASH')) { |
(ref($supplemental->{'ids'}) eq 'HASH')) { |
Line 5802 sub handler {
|
Line 5802 sub handler {
|
if ($supplementalflag) { |
if ($supplementalflag) { |
($foldername,$hiddenfolder) = ($pathitems[-1] =~ /^([^:]*)::(|1):::$/); |
($foldername,$hiddenfolder) = ($pathitems[-1] =~ /^([^:]*)::(|1):::$/); |
$foldername = &HTML::Entities::decode(&unescape($foldername)); |
$foldername = &HTML::Entities::decode(&unescape($foldername)); |
my ($supplemental) = &Apache::lonnet::get_supplemental($coursenum,$coursedom); |
my ($supplemental) = &Apache::loncommon::get_supplemental($coursenum,$coursedom); |
if (ref($supplemental) eq 'HASH') { |
if (ref($supplemental) eq 'HASH') { |
my ($suppmap,$suppmapnum); |
my ($suppmap,$suppmapnum); |
if ($folder eq 'supplemental') { |
if ($folder eq 'supplemental') { |