summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPeter Palfrader <peter@palfrader.org>2007-05-23 22:07:50 +0000
committerweasel <weasel@bc3d92e2-beff-0310-a7cd-cc87d7ac0ede>2007-05-23 22:07:50 +0000
commite9507688759a87bfba42c93ef5c09217486dded1 (patch)
tree5d365db403062a2252ffa3388edbd58369e54a02
parent437c7c3a1da83457da9b7fd6ab885e00302922b1 (diff)
fix signature
git-svn-id: svn+ssh://asteria.noreply.org/svn/weaselutils/trunk@278 bc3d92e2-beff-0310-a7cd-cc87d7ac0ede
-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" :