diff options
-rwxr-xr-x | parse-trac | 8 |
1 files changed, 7 insertions, 1 deletions
@@ -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" : |