summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lib/Crawl/Bot/Plugin/Commit.pm10
1 files changed, 10 insertions, 0 deletions
diff --git a/lib/Crawl/Bot/Plugin/Commit.pm b/lib/Crawl/Bot/Plugin/Commit.pm
index 320dcb0..71d75ce 100644
--- a/lib/Crawl/Bot/Plugin/Commit.pm
+++ b/lib/Crawl/Bot/Plugin/Commit.pm
@@ -16,6 +16,12 @@ has announce_commits => (
default => 1,
);
+has announce_limit => (
+ is => 'rw',
+ isa => 'Int',
+ default => 10,
+);
+
has colour_announce => (
is => 'rw',
isa => 'Bool',
@@ -160,7 +166,11 @@ sub tick {
$self->say_all("Cherry-picked $cherry_picks commit$pl into $branch")
if $cherry_picks > 0;
+ my $count = 0;
for my $rev (@revs) {
+ if (++$count > $self->announce_limit) {
+ $self->say_all("... and " . (scalar @revs - $count + 1) . " more commits");
+ }
my $commit = $commits{$rev};
my $br = $branch eq "master" ? "" : "[$branch] ";