loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.1009, 2011/06/05 12:59:47	version 1.1010, 2011/06/06 21:25:59
Line 3459 sub get_previous_attempt {	Line 3459 sub get_previous_attempt {
my $data=$parts[-1];	my $data=$parts[-1];
next if ($data eq 'foilorder');	next if ($data eq 'foilorder');
pop(@parts);	pop(@parts);
	$prevattempts.='<th>'.&mt('Part ').join('.',@parts).'<br />'.$data.' </th>';
if ($data eq 'type') {	if ($data eq 'type') {
unless ($showsurv) {	unless ($showsurv) {
my $id = join(',',@parts);	my $id = join(',',@parts);
Line 3467 sub get_previous_attempt {	Line 3468 sub get_previous_attempt {
$lasthidden{$ign.'.'.$id} = 1;	$lasthidden{$ign.'.'.$id} = 1;
}	}
}	}
delete($lasthash{$key});	}
} else {
$prevattempts.='<th>'.&mt('Part ').join('.',@parts).'<br />'.$data.' </th>';
}
} else {	} else {
if ($#parts == 0) {	if ($#parts == 0) {
$prevattempts.='<th>'.$parts[0].'</th>';	$prevattempts.='<th>'.$parts[0].'</th>';