summaryrefslogtreecommitdiff
path: root/parse-trac
diff options
context:
space:
mode:
Diffstat (limited to 'parse-trac')
-rwxr-xr-xparse-trac7
1 files changed, 6 insertions, 1 deletions
diff --git a/parse-trac b/parse-trac
index f5b1ac2..8ef28d4 100755
--- a/parse-trac
+++ b/parse-trac
@@ -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" :