loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.484, 2017/12/18 23:20:48	version 1.485, 2017/12/22 02:00:46
Line 2714 sub countdown_timer {	Line 2714 sub countdown_timer {
my $now = time;	my $now = time;
if ($env{'request.filename'} =~ /\.task$/) {	if ($env{'request.filename'} =~ /\.task$/) {
$type = 'Task';	$type = 'Task';
	} elsif ($env{'request.symb'} =~ /ext\.tool$/) {
	$type = 'tool';
} else {	} else {
$type = 'problem';	$type = 'problem';
}	}
my ($status,$accessmsg,$slot_name,$slot) =	my ($status,$accessmsg,$slot_name,$slot);
&Apache::lonhomework::check_slot_access('0',$type);	if ($type eq 'tool') {
	($status,$accessmsg,$slot_name,$slot) =
	&Apache::lonhomework::check_slot_access('0',$type,$env{'request.symb'},['0']);
	} else {
	($status,$accessmsg,$slot_name,$slot) =
	&Apache::lonhomework::check_slot_access('0',$type);
	}
if ($slot_name ne '') {	if ($slot_name ne '') {
if (ref($slot) eq 'HASH') {	if (ref($slot) eq 'HASH') {
if (($slot->{'starttime'} < $now) &&	if (($slot->{'starttime'} < $now) &&