|
version 1.107, 2003/07/28 18:29:05
|
version 1.107.2.1, 2003/09/23 01:52:57
|
|
Line 169 sub end_numericalresponse {
|
Line 169 sub end_numericalresponse {
|
| $safeeval); |
$safeeval); |
| my $award = $Apache::lonhomework::history{"resource.$Apache::inputtags::part.solved"}; |
my $award = $Apache::lonhomework::history{"resource.$Apache::inputtags::part.solved"}; |
| my $status = $Apache::inputtags::status['-1']; |
my $status = $Apache::inputtags::status['-1']; |
| if ( ($award =~ /^correct/ |
if ( &Apache::response::show_answer() ) { |
| && lc($Apache::lonhomework::problemstatus) ne 'no') |
|
| || $status eq "SHOW_ANSWER" |
|
| || $ENV{'form.texaward'} eq 'SHOW_ANSWER') { |
|
| my (@formats)=&Apache::lonxml::get_param_var('format',$parstack, |
my (@formats)=&Apache::lonxml::get_param_var('format',$parstack, |
| $safeeval); |
$safeeval); |
| my $unit=&Apache::lonxml::get_param_var('unit',$parstack, |
my $unit=&Apache::lonxml::get_param_var('unit',$parstack, |
![[BACK]](/icons/back.gif){kind=icon}
Return to caparesponse.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework / caparesponse