--- loncom/homework/inputtags.pm 2006/07/19 19:54:30 1.202 +++ loncom/homework/inputtags.pm 2006/07/20 21:48:07 1.204 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # input definitons # -# $Id: inputtags.pm,v 1.202 2006/07/19 19:54:30 www Exp $ +# $Id: inputtags.pm,v 1.204 2006/07/20 21:48:07 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -283,10 +283,7 @@ sub start_textline { $Apache::lonxml::evaluate--; my $partid=$Apache::inputtags::part; my $id=$Apache::inputtags::response[-1]; - if ($Apache::inputtags::status[-1] eq 'CAN_ANSWER' - || lc($Apache::lonhomework::problemstatus) eq 'no' - || ($Apache::inputtags::status[-1] eq 'CANNOT_ANSWER' - && $Apache::lonhomework::history{"resource.$partid.solved"} !~ /^correct/ )) { + if (!&Apache::response::show_answer()) { my $size = &Apache::lonxml::get_param('size',$parstack,$safeeval); my $maxlength; if ($size eq '') { $size=20; } else { @@ -553,10 +550,7 @@ sub decideoutput { ('yes' eq lc(&Apache::lonnet::EXT("resource.$part.handgrade"))); my $computer = ($handgrade)? '' - : " ". - (($Apache::lonhomework::type eq 'exam')? - " ".&mt("Your answer now shown above."): - " ".&mt("Computer's answer now shown above.")); + : " ".&mt("Computer's answer now shown above."); &Apache::lonxml::debug("handgrade has :$handgrade:"); if ($previous) { $previousmsg=&mt('You have entered that answer before'); }