version 1.19, 2016/10/16 21:49:51
|
version 1.20, 2016/10/22 01:49:10
|
Line 678 sub get_timed_items {
|
Line 678 sub get_timed_items {
|
my $resourcedata=&Apache::lonparmset::readdata($cnum,$cdom); |
my $resourcedata=&Apache::lonparmset::readdata($cnum,$cdom); |
if (ref($resourcedata) eq 'HASH') { |
if (ref($resourcedata) eq 'HASH') { |
foreach my $key (keys(%{$resourcedata})) { |
foreach my $key (keys(%{$resourcedata})) { |
if ($key =~ /^\Q$cid\E(.+)\.0\.interval$/) { |
if ($key =~ /^\Q$cid\E(.*)\.0\.interval$/) { |
my $middle = $1; |
my $middle = $1; |
if ($middle eq '') { |
if ($middle eq '') { |
$intervals{'course'}{'all'} = $resourcedata->{$key}; |
$intervals{'course'}{'all'} = $resourcedata->{$key}; |