loncom/homework/grades.pm - diff

Return to grades.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.724, 2014/08/25 20:23:01	version 1.725, 2014/08/25 22:12:58
Line 2553 sub get_last_submission {	Line 2553 sub get_last_submission {
}	}
my ($partid,$foo) = split(/submission$/,$key);	my ($partid,$foo) = split(/submission$/,$key);
my $draft = $lasthash{$partid.'awarddetail'} eq 'DRAFT' ? 1 : 0;	my $draft = $lasthash{$partid.'awarddetail'} eq 'DRAFT' ? 1 : 0;
#push(@string, join(':', $key, $hide, $draft.$lasthash{$key}));
push(@string, join(':', $key, $hide, $draft, (	push(@string, join(':', $key, $hide, $draft, (
ref($lasthash{$key}) eq 'ARRAY' ?	ref($lasthash{$key}) eq 'ARRAY' ?
join(',', @{$lasthash{$key}}) : $lasthash{$key}) ));	join(',', @{$lasthash{$key}}) : $lasthash{$key}) ));