version 1.89, 2013/04/30 03:03:34
|
version 1.91, 2014/05/05 17:40:54
|
Line 580 sub format_prior_answer {
|
Line 580 sub format_prior_answer {
|
my $output; |
my $output; |
|
|
foreach my $name (@{ $foil_order }) { |
foreach my $name (@{ $foil_order }) { |
my $item=shift(@items); |
my $item = &HTML::Entities::encode(shift(@items),'<>&"'); |
|
if ($item eq '') { |
|
$item = ' '; |
|
} |
$output .= '<tr><td>'.$item.'</td></tr>'; |
$output .= '<tr><td>'.$item.'</td></tr>'; |
} |
} |
return if (!defined($output)); |
return if (!defined($output)); |