loncom/interface/lonblockingmenu.pm - diff

Return to lonblockingmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

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};