Diff for /loncom/homework/caparesponse/caparesponse.pm between versions 1.171 and 1.173

version 1.171, 2005/06/26 22:30:05 version 1.173, 2005/07/11 18:24:12
Line 389  sub end_numericalresponse { Line 389  sub end_numericalresponse {
  my ($ad,$msg)=&Apache::inputtags::finalizeawards($awards,   my ($ad,$msg)=&Apache::inputtags::finalizeawards($awards,
  $msgs);   $msgs);
   
  my $msg=&mt('Computer\'s answer is incorrect ("[_1]"). It is likely that the tolerance range ("[_2]" to "[_3]") or significant figures ("[_4]" to "[_5]") needs to be adjusted',$response,$low,$high,$siglow,$sighigh);   my $error;
    if ($siglow ne '' && $sighigh ne '') {
       $error=&mt('Computer\'s answer is incorrect ("[_1]"). It is likely that the tolerance range ("[_2]" to "[_3]") or significant figures ("[_4]" to "[_5]") need to be adjusted.',$response,$low,$high,$siglow,$sighigh);
    } else {
       $error=&mt('Computer\'s answer is incorrect ("[_1]"). It is likely that the tolerance range ("[_2]" to "[_3]") needs to be adjusted.',$response,$low,$high);
    }
  if ($ad ne 'EXACT_ANS' && $ad ne 'APPROX_ANS') {   if ($ad ne 'EXACT_ANS' && $ad ne 'APPROX_ANS') {
     &Apache::lonxml::error($msg);      &Apache::lonxml::error($error);
  } else {   } else {
     &Apache::lonxml::warning($msg);      &Apache::lonxml::warning($error);
  }   }
     }      }
  }   }

Removed from v.1.171  
changed lines
  Added in v.1.173


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>