loncom/homework/bridgetask.pm - diff

Return to bridgetask.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.264.6.2, 2020/09/01 17:48:33	version 1.264.8.1, 2020/09/01 17:07:59
Line 682 sub start_Task {	Line 682 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");
my ($timelimit) = ($interval[0] =~ /^(\d+)/);	&Apache::lonnet::set_first_access($interval[1],$interval[0]);
&Apache::lonnet::set_first_access($interval[1],$timelimit);
}	}
}	}

Line 1409 DONEBUTTON	Line 1408 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);