--- loncom/homework/inputtags.pm 2000/12/05 22:07:26 1.12
+++ loncom/homework/inputtags.pm 2000/12/08 20:53:45 1.13
@@ -139,6 +139,9 @@ sub decideoutput {
if ($award eq 'EXACT_ANS' || $award eq 'APPROX_ANS' ) {
$message = "Correct computer gets %s";
$button=0;
+ } elsif ($award eq 'NO_RESPONSE') {
+ $message = '';
+ $button=1;
} elsif ($award eq 'WANTED_NUMERIC') {
$message = "This question expects a numeric answer";
$button=1;
@@ -228,9 +231,12 @@ sub gradestatus {
my $tries = $Apache::lonhomework::history{"resource.tries.$id"};
my $maxtries = $Apache::lonhomework::history{"resource.maxtries.$id"};
if ( $tries eq '' ) { $tries = '0'; }
- if ( $maxtries eq '' ) { $maxtries = '99'; }
+ if ( $maxtries eq '' ) { $maxtries = '2'; }
+ my $trystr='';
+ if ( $showbutton ) {
+ $trystr = "
Tries $tries/$maxtries";
+ }
if ( $tries >= $maxtries ) { $showbutton = 0; }
- my $trystr = "Tries $tries/$maxtries";
if ( $showbutton ) {
$button = '
';
}