Diff for /loncom/homework/rankresponse.pm between versions 1.44 and 1.45

version 1.44, 2005/01/31 22:00:40 version 1.45, 2005/03/15 16:55:22
Line 177  sub displayanswers { Line 177  sub displayanswers {
   
 sub check_response_order {  sub check_response_order {
     my (%responsehash)=@_;      my (%responsehash)=@_;
     my @order=sort(values(%responsehash));      my @order=sort( {$a <=> $b} values(%responsehash));
     my $lastvalue=0;      my $lastvalue=0;
     my $expected=1;      my $expected=1;
     my $malformed=0;      my $malformed=0;

Removed from v.1.44  
changed lines
  Added in v.1.45


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