loncom/homework/bridgetask.pm - diff

Return to bridgetask.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.265, 2015/10/05 02:35:40	version 1.266, 2016/05/30 02:45:32
Line 711 sub start_Task {	Line 711 sub start_Task {
$target eq 'tex') {	$target eq 'tex') {
if ($env{'form.markaccess'}) {	if ($env{'form.markaccess'}) {
my @interval=&Apache::lonnet::EXT("resource.0.interval");	my @interval=&Apache::lonnet::EXT("resource.0.interval");
&Apache::lonnet::set_first_access($interval[1],$interval[0]);	my ($timelimit) = ($interval[0] =~ /^(\d+)/);
	&Apache::lonnet::set_first_access($interval[1],$timelimit);
}	}
}	}

Line 1443 DONEBUTTON	Line 1444 DONEBUTTON
if ($canstore) {	if ($canstore) {
&Apache::structuretags::finalize_storage();	&Apache::structuretags::finalize_storage();
my @interval = &Apache::lonnet::EXT("resource.0.interval");	my @interval = &Apache::lonnet::EXT("resource.0.interval");
if ($interval[0] =~ /^\d+$/ && $interval[1] eq 'resource') {	if ($interval[0] =~ /^\d+/ && $interval[1] eq 'resource') {
my $key=$courseid."\0".$symb;	my $key=$courseid."\0".$symb;
my %times=&Apache::lonnet::get('firstaccesstimes',	my %times=&Apache::lonnet::get('firstaccesstimes',
[$key],$domain,$name);	[$key],$domain,$name);