From 5340a59c84b4c0bd3b360e97c5a82e1b8fd34fd0 Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Thu, 7 Jun 2007 02:43:02 +0000
Subject: Cut off trac mails

git-svn-id: svn+ssh://asteria.noreply.org/svn/weaselutils/trunk@283 bc3d92e2-beff-0310-a7cd-cc87d7ac0ede
---
 parse-trac | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/parse-trac b/parse-trac
index 11ea881..f25282c 100755
--- a/parse-trac
+++ b/parse-trac
@@ -98,7 +98,13 @@ 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 "\n", @body;
+my $MAXBODYLINES = 5;
+if (scalar @body > $MAXBODYLINES+1) {      # if it's one more let it through, [...] takes a line too
+	$body = join "\n", @body[0 .. $MAXBODYLINES-1];
+	$body .= "[...]\n";
+} else {
+	$body = join "\n", @body;
+};
 
 my $notice = $is_a_reply ?
 	"[$tracproject] #$ticketid was updated" :
-- 
cgit v1.2.3