Permalink
Browse files

Aggregate report strings together for better growl display

when there are lots of things to be notified.
  • Loading branch information...
1 parent 8214d0b commit 7a5f30921a3e5886fefaa631af5ffd284adaaba4 @gugod gugod committed Jan 11, 2009
Showing with 8 additions and 2 deletions.
  1. +8 −2 lib/Test/Continuous.pm
View
@@ -108,14 +108,20 @@ sub _analyze_tap_archive {
my $parser = TAP::Parser->new({
stream => TAP::Parser::Iterator::Stream->new( $fh )
});
+
+ my @warning = ("$test: ");
+ my @comment = ("$test: ");
while (my $result = $parser->next) {
if ($result->is_comment) {
- Test::Continuous::Notifier->send_notify("$test: " . $result->as_string . "\n");
+ push @comment, $result->as_string;
}
elsif ($result->is_unknown) {
- Test::Continuous::Notifier->send_notify("$test: " . $result->as_string . "\n", "warning");
+ push @warning, $result->as_string;
}
}
+
+ Test::Continuous::Notifier->send_notify(join("\n", @warning), "warning");
+ Test::Continuous::Notifier->send_notify(join("\n", @comment));
}
rmtree($dir);

0 comments on commit 7a5f309

Please sign in to comment.