version 1.333.2.7, 2019/08/11 17:16:25
|
version 1.333.2.9.2.3, 2021/09/11 16:48:57
|
Line 1037 sub decideoutput {
|
Line 1037 sub decideoutput {
|
'not_charged_try' => 'LC_answer_not_charged_try', |
'not_charged_try' => 'LC_answer_not_charged_try', |
'no_grade' => 'LC_answer_no_grade', |
'no_grade' => 'LC_answer_no_grade', |
'no_message' => 'LC_no_message', |
'no_message' => 'LC_no_message', |
|
'no_charge_warn' => 'LC_answer_warning', |
); |
); |
|
|
my $part = $Apache::inputtags::part; |
my $part = $Apache::inputtags::part; |
Line 1200 sub decideoutput {
|
Line 1201 sub decideoutput {
|
} elsif ($award eq 'SIG_FAIL') { |
} elsif ($award eq 'SIG_FAIL') { |
my ($used,$min,$max)=split(':',$awardmsg); |
my ($used,$min,$max)=split(':',$awardmsg); |
my $word = ($used < $min) ? 'more' : 'fewer'; |
my $word = ($used < $min) ? 'more' : 'fewer'; |
$message = &mt("Submission not graded. Use $word digits.",$used); |
$message = &mt("Submission not graded. Use $word significant figures.",$used); |
$css_class=$possible_class{'not_charged_try'}; |
if (&Apache::lonhomework::show_some_problem_status()) { |
|
$css_class=$possible_class{'no_charge_warn'}; |
|
} else { |
|
$css_class=$possible_class{'not_charged_try'}; |
|
} |
$button=1; |
$button=1; |
} elsif ($award eq 'UNIT_INVALID_INSTRUCTOR') { |
} elsif ($award eq 'UNIT_INVALID_INSTRUCTOR') { |
$message = &mt('Error in instructor specifed unit. This error has been reported to the instructor.', $awardmsg); |
$message = &mt('Error in instructor specifed unit. This error has been reported to the instructor.', $awardmsg); |
Line 1324 sub decideoutput {
|
Line 1329 sub decideoutput {
|
my $first_access=&Apache::lonnet::get_first_access($interval[1]); |
my $first_access=&Apache::lonnet::get_first_access($interval[1]); |
if (defined($first_access)) { |
if (defined($first_access)) { |
my $due_date= &Apache::lonnet::EXT("resource.$part.duedate"); |
my $due_date= &Apache::lonnet::EXT("resource.$part.duedate"); |
unless (($due_date) && ($due_date < $first_access + $interval[0])) { |
my ($timelimit) = ($interval[0] =~ /^(\d+)/); |
|
unless (($due_date) && ($due_date < $first_access + $timelimit)) { |
$message = &mt("Answer Submitted: Your final submission will be graded when the time limit is reached."); |
$message = &mt("Answer Submitted: Your final submission will be graded when the time limit is reached."); |
} |
} |
} |
} |
Line 1874 sub previous_tries {
|
Line 1880 sub previous_tries {
|
my $prefix = $env{'form.request.prefix'}; |
my $prefix = $env{'form.request.prefix'}; |
$prefix =~ tr{.}{_}; |
$prefix =~ tr{.}{_}; |
my $function_name = 'LONCAPA_previous_tries_'.$prefix; |
my $function_name = 'LONCAPA_previous_tries_'.$prefix; |
if (($env{'request.state'} eq 'construct') || ($id =~ /[._]|[^\w\s\-]/)) { |
if (($env{'request.state'} eq 'construct') || ($id =~ /\W/)) { |
$function_name .= $Apache::lonxml::curdepth; |
$function_name .= $Apache::lonxml::curdepth; |
} else { |
} else { |
$function_name .= &js_escape($id); |
$function_name .= $id; |
} |
} |
$function_name .= '_'.$Apache::lonxml::counter; |
$function_name .= '_'.$Apache::lonxml::counter; |
my $result = &Apache::loncommon::modal_adhoc_window($function_name,420,410,$output,&mt($tries_text))."<br />"; |
my $possmathjax = 1; |
|
my $result = &Apache::loncommon::modal_adhoc_window($function_name,420,410,$output, |
|
&mt($tries_text),$possmathjax)."<br />"; |
return $result; |
return $result; |
} |
} |
|
|