--- loncom/homework/bridgetask.pm 2020/09/01 17:48:33 1.264.6.2 +++ loncom/homework/bridgetask.pm 2024/07/02 00:33:18 1.264.8.2 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: bridgetask.pm,v 1.264.6.2 2020/09/01 17:48:33 raeburn Exp $ +# $Id: bridgetask.pm,v 1.264.8.2 2024/07/02 00:33:18 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -682,8 +682,7 @@ sub start_Task { $target eq 'tex') { if ($env{'form.markaccess'}) { my @interval=&Apache::lonnet::EXT("resource.0.interval"); - my ($timelimit) = ($interval[0] =~ /^(\d+)/); - &Apache::lonnet::set_first_access($interval[1],$timelimit); + &Apache::lonnet::set_first_access($interval[1],$interval[0]); } } @@ -1409,7 +1408,7 @@ DONEBUTTON if ($canstore) { &Apache::structuretags::finalize_storage(); 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 %times=&Apache::lonnet::get('firstaccesstimes', [$key],$domain,$name); @@ -3287,9 +3286,9 @@ sub proctor_validation_screen {
$lt{'prus'} | |
$lt{'pasw'} | |
$lt{'prdo'} | |
$lt{'prus'} | |
$lt{'pasw'} | |
$lt{'prdo'} |