Fix a match.

Strip '* '.


SVN revision: 15546
This commit is contained in:
sebastid 2005-06-27 13:45:33 +00:00 committed by sebastid
parent 70163428b5
commit 60f0c319b2
1 changed files with 3 additions and 2 deletions

View File

@ -35,9 +35,10 @@ while(<>) {
$is_title = 1; $is_title = 1;
} }
} }
} elsif (/$\\* .*/) { } elsif (/^\* .*/) {
if ($in_body ) { if ($in_body ) {
$total_item_count++; $total_item_count++;
$_ =~ s/^\* //;
push(@{$todo_hash{$title}}, $item); push(@{$todo_hash{$title}}, $item);
$item = {}; $item = {};
$item->{'asignee'} = "Unknown"; $item->{'asignee'} = "Unknown";
@ -65,7 +66,7 @@ for $title ( keys %todo_hash ) {
print "<h2>" . $title . "</h2>\n"; print "<h2>" . $title . "</h2>\n";
print "<table> \n"; print "<table>\n";
print " <tr><td>Asignee</td><td>Task</td></tr>\n"; print " <tr><td>Asignee</td><td>Task</td></tr>\n";
for $item ( @{$todo_hash{$title}} ) { for $item ( @{$todo_hash{$title}} ) {
my $asignee = $item->{'asignee'}; my $asignee = $item->{'asignee'};