Diff for /loncom/homework/rankresponse.pm between versions 1.17 and 1.17.2.1

version 1.17, 2003/07/21 19:42:17 version 1.17.2.1, 2003/09/23 01:52:57
Line 241  sub displayfoils { Line 241  sub displayfoils {
     my $status=$Apache::inputtags::status[-1];      my $status=$Apache::inputtags::status[-1];
     my @whichopt=(1..($#whichfoils+1));      my @whichopt=(1..($#whichfoils+1));
     my @correctorder=&get_correct_order($tol,@whichfoils);      my @correctorder=&get_correct_order($tol,@whichfoils);
     if (($solved =~ /^correct/) || ($status eq  'SHOW_ANSWER')) {      if ( &Apache::response::show_answer() ) {
  foreach my $name (@whichfoils) {   foreach my $name (@whichfoils) {
     my $text=$Apache::response::foilgroup{$name.'.text'};      my $text=$Apache::response::foilgroup{$name.'.text'};
     my $value=shift(@correctorder);      my $value=shift(@correctorder);

Removed from v.1.17  
changed lines
  Added in v.1.17.2.1


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