Fixed HTML output format bugs

This commit is contained in:
Jamie Cameron
2007-04-29 19:33:07 +00:00
parent 08c5e95956
commit a415a19aba

View File

@@ -424,9 +424,11 @@ else {
push(@data, $row);
$row = undef;
}
elsif ($line =~ /^\s*<(td|th)[^>]*>([^<]*)<\/(td|th)>/) {
elsif ($line =~ /^\s*<(td|th)[^>]*>(.*)<\/(td|th)>/) {
# Value in a row
push(@$row, &entities_to_ascii("$2"));
local $v = $2;
$v =~ s/<br>/\n/g;
push(@$row, &entities_to_ascii($v));
}
}
$rv = { 'titles' => shift(@data),