[LON-CAPA-cvs] cvs: loncom /homework inputtags.pm /interface loncommon.pm

[raeburn]

raeburn		Wed Nov 20 22:53:38 2019 EDT

  Modified files:              
    /loncom/interface	loncommon.pm 
    /loncom/homework	inputtags.pm 
  Log:
  - Bug 6750
   When "Show Problem Status" in effect = no, and submission outside
   permitted range, orange background for: Submission not graded ... feedback
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.1333 loncom/interface/loncommon.pm:1.1334
--- loncom/interface/loncommon.pm:1.1333	Sun Aug 25 02:42:56 2019
+++ loncom/interface/loncommon.pm	Wed Nov 20 22:53:32 2019
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.1333 2019/08/25 02:42:56 raeburn Exp $
+# $Id: loncommon.pm,v 1.1334 2019/11/20 22:53:32 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -7258,7 +7258,8 @@
   padding: 6px;
 }
 
-.LC_answer_unknown {
+.LC_answer_unknown,
+.LC_answer_warning {
   background: orange;
   color: black;
   padding: 6px;
Index: loncom/homework/inputtags.pm
diff -u loncom/homework/inputtags.pm:1.349 loncom/homework/inputtags.pm:1.350
--- loncom/homework/inputtags.pm:1.349	Sun Aug 11 17:11:00 2019
+++ loncom/homework/inputtags.pm	Wed Nov 20 22:53:37 2019
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # input  definitons
 #
-# $Id: inputtags.pm,v 1.349 2019/08/11 17:11:00 raeburn Exp $
+# $Id: inputtags.pm,v 1.350 2019/11/20 22:53:37 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1047,6 +1047,7 @@
 	  'not_charged_try' => 'LC_answer_not_charged_try',
 	  'no_grade'        => 'LC_answer_no_grade',
 	  'no_message'      => 'LC_no_message',
+          'no_charge_warn'  => 'LC_answer_warning',
 	  );
 
     my $part = $Apache::inputtags::part;
@@ -1212,6 +1213,9 @@
 	my $word = ($used < $min) ? 'more' : 'fewer';
 	$message = &mt("Submission not graded. Use $word digits.",$used);
 	$css_class=$possible_class{'not_charged_try'};
+        if (&Apache::lonhomework::show_some_problem_status()) {
+            $css_class=$possible_class{'no_charge_warn'};
+        }
 	$button=1;
     } elsif ($award eq 'UNIT_INVALID_INSTRUCTOR') {
 	$message = &mt('Error in instructor specifed unit. This error has been reported to the instructor.', $awardmsg);