[LON-CAPA-cvs] cvs: loncom /homework inputtags.pm
raeburn
raeburn at source.lon-capa.org
Sun Sep 5 12:27:16 EDT 2021
raeburn Sun Sep 5 16:27:16 2021 EDT
Modified files:
/loncom/homework inputtags.pm
Log:
- Bug 273 "Show Problem Status" in effect = no. Orange background used for
feedback for following: MISSING_ANSWER, UNIT_INVALID_STUDENT, UNIT_FAIL,
UNIT_IRRECONCIBLE, UNIT_NOTNEEDED, NO_UNIT (previously was only SIG_FAIL).
Index: loncom/homework/inputtags.pm
diff -u loncom/homework/inputtags.pm:1.353 loncom/homework/inputtags.pm:1.354
--- loncom/homework/inputtags.pm:1.353 Sun Sep 5 05:55:50 2021
+++ loncom/homework/inputtags.pm Sun Sep 5 16:27:16 2021
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# input definitons
#
-# $Id: inputtags.pm,v 1.353 2021/09/05 05:55:50 raeburn Exp $
+# $Id: inputtags.pm,v 1.354 2021/09/05 16:27:16 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1162,7 +1162,11 @@
if ($target ne 'tex') {
$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;
} elsif ($award eq 'WRONG_NUMBOXESCHECKED') {
$message = &mt('Number of boxes checked outside permissible range (either too few or too many).');
@@ -1226,21 +1230,37 @@
} elsif ($award eq 'UNIT_INVALID_STUDENT') {
$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');}
- $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;
} 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));
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;
} elsif ($award eq 'UNIT_NOTNEEDED') {
$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;
} elsif ($award eq 'NO_UNIT') {
$message = &mt("Units required").'.';
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;
} elsif ($award eq 'COMMA_FAIL') {
$message = &mt("Proper comma separation is required").'.';
More information about the LON-CAPA-cvs
mailing list