diff options
author | Peter Palfrader <peter@palfrader.org> | 2007-05-23 22:07:50 +0000 |
---|---|---|
committer | weasel <weasel@bc3d92e2-beff-0310-a7cd-cc87d7ac0ede> | 2007-05-23 22:07:50 +0000 |
commit | e9507688759a87bfba42c93ef5c09217486dded1 (patch) | |
tree | 5d365db403062a2252ffa3388edbd58369e54a02 /parse-trac | |
parent | 437c7c3a1da83457da9b7fd6ab885e00302922b1 (diff) |
fix signature
git-svn-id: svn+ssh://asteria.noreply.org/svn/weaselutils/trunk@278 bc3d92e2-beff-0310-a7cd-cc87d7ac0ede
Diffstat (limited to 'parse-trac')
-rwxr-xr-x | parse-trac | 7 |
1 files changed, 6 insertions, 1 deletions
@@ -86,6 +86,11 @@ while (defined($line = shift @mail)) { }; last if $line =~ /^-----------------/ } +my @body; +while (defined($line = shift @mail)) { + last if $line =~ /^--/ + push @body, $line; +} die ("$PROGRAM_NAME - $project: No reporter found.\n") unless defined $reporter; die ("$PROGRAM_NAME - $project: No tracproject found.\n") unless defined $tracproject; @@ -93,7 +98,7 @@ die ("$PROGRAM_NAME - $project: No url found.\n") unless defined $url; die ("$PROGRAM_NAME - $project: No ticketid found.\n") unless defined $ticketid; die ("$PROGRAM_NAME - $project: No first_line found.\n") unless defined $first_line; -$body = join '', @mail; +$body = join "\n", @body; my $notice = (defined $is_a_reply) ? "[$tracproject] #$ticketid was updated" : |