version 1.348, 2019/08/11 16:19:52
|
version 1.355, 2021/09/07 20:37:33
|
Line 667 sub file_selector {
|
Line 667 sub file_selector {
|
if ($constraints) { |
if ($constraints) { |
$result .= $constraints.'<br />'; |
$result .= $constraints.'<br />'; |
} |
} |
if ($which eq 'uploadonly' || $which eq 'both') { |
if ($which eq 'uploadonly' || $which eq 'both') { |
my $free_space = $maxfilesize * 1048576; |
my $free_space = $maxfilesize * 1048576; |
$result .= &mt('Submit a file: (only one file per submission)'). |
$result .= &mt('Submit a file: (only one file per submission)'). |
' <br /><input type="file" size="50" name="HWFILE'.$jspart.'_'.$id. |
' <br /><input type="file" size="50" name="HWFILE'.$jspart.'_'.$id. |
'" id="HWFILE'.$jspart.'_'.$id.'" class="LC_flUpload LC_hwkfile" />'. |
'" id="HWFILE'.$jspart.'_'.$id.'" class="LC_flUpload LC_hwkfile" />'. |
'<input type="hidden" id="LC_free_space_'.$jspart.'_'.$id.'"'. |
'<input type="hidden" id="LC_free_space_'.$jspart.'_'.$id.'"'. |
' value="'.$free_space.'" /><br />'; |
' value="'.$free_space.'" /><br />'; |
} |
} |
if ( $which eq 'both') { |
if ( $which eq 'both') { |
$result.='<br />'.'<strong>'.&mt('OR:').'</strong><br />'; |
$result.='<br />'.'<strong>'.&mt('OR:').'</strong><br />'; |
} |
} |
Line 695 sub file_selector {
|
Line 695 sub file_selector {
|
&mt('Select Portfolio Files: (one or more files per submission)').'</a><br />'. |
&mt('Select Portfolio Files: (one or more files per submission)').'</a><br />'. |
'<input type="text" size="50" name="HWPORT'.$jspart.'_'.$id.'" value="" />'. |
'<input type="text" size="50" name="HWPORT'.$jspart.'_'.$id.'" value="" />'. |
'<br />'; |
'<br />'; |
|
|
} |
} |
$result.=&Apache::lonhtmlcommon::row_closure(1); |
$result.=&Apache::lonhtmlcommon::row_closure(1); |
return $result; |
return $result; |
Line 1048 sub decideoutput {
|
Line 1047 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 1162 sub decideoutput {
|
Line 1162 sub decideoutput {
|
if ($target ne 'tex') { |
if ($target ne 'tex') { |
$message .= &Apache::loncommon::help_open_topic('Some_Items_Were_Not_Submitted'); |
$message .= &Apache::loncommon::help_open_topic('Some_Items_Were_Not_Submitted'); |
} |
} |
$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 'WRONG_NUMBOXESCHECKED') { |
} elsif ($award eq 'WRONG_NUMBOXESCHECKED') { |
$message = &mt('Number of boxes checked outside permissible range (either too few or too many).'); |
$message = &mt('Number of boxes checked outside permissible range (either too few or too many).'); |
Line 1211 sub decideoutput {
|
Line 1215 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."); |
$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 1222 sub decideoutput {
|
Line 1230 sub decideoutput {
|
} elsif ($award eq 'UNIT_INVALID_STUDENT') { |
} elsif ($award eq 'UNIT_INVALID_STUDENT') { |
$message = &mt('Unable to interpret units. Computer reads units as "[_1]".',&markup_unit($awardmsg,$target)); |
$message = &mt('Unable to interpret units. Computer reads units as "[_1]".',&markup_unit($awardmsg,$target)); |
if ($target ne 'tex') {$message.=&Apache::loncommon::help_open_topic('Physical_Units');} |
if ($target ne 'tex') {$message.=&Apache::loncommon::help_open_topic('Physical_Units');} |
$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_FAIL' || $award eq 'UNIT_IRRECONCIBLE') { |
} elsif ($award eq 'UNIT_FAIL' || $award eq 'UNIT_IRRECONCIBLE') { |
$message = &mt('Incompatible units. No conversion found between "[_1]" and the required units.',&markup_unit($awardmsg,$target)); |
$message = &mt('Incompatible units. No conversion found between "[_1]" and the required units.',&markup_unit($awardmsg,$target)); |
if ($target ne 'tex') {$message.=&Apache::loncommon::help_open_topic('Physical_Units');} |
if ($target ne 'tex') {$message.=&Apache::loncommon::help_open_topic('Physical_Units');} |
$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_NOTNEEDED') { |
} elsif ($award eq 'UNIT_NOTNEEDED') { |
$message = &mt('Only a number required. Computer reads units of "[_1]".',&markup_unit($awardmsg,$target)); |
$message = &mt('Only a number required. Computer reads units of "[_1]".',&markup_unit($awardmsg,$target)); |
$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 'NO_UNIT') { |
} elsif ($award eq 'NO_UNIT') { |
$message = &mt("Units required").'.'; |
$message = &mt("Units required").'.'; |
if ($target ne 'tex') {$message.=&Apache::loncommon::help_open_topic('Physical_Units')}; |
if ($target ne 'tex') {$message.=&Apache::loncommon::help_open_topic('Physical_Units')}; |
$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 'COMMA_FAIL') { |
} elsif ($award eq 'COMMA_FAIL') { |
$message = &mt("Proper comma separation is required").'.'; |
$message = &mt("Proper comma separation is required").'.'; |
Line 1906 sub previous_tries {
|
Line 1930 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; |
} |
} |
|
|