--- loncom/homework/inputtags.pm	2019/08/11 17:11:00	1.349
+++ loncom/homework/inputtags.pm	2019/11/20 22:53:37	1.350
@@ -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 @@ sub decideoutput {
 	  '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 @@ sub decideoutput {
 	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);