I don't understand perl strings. This reverts commit b2f6be9686c39bd276a07931db77573ff5f83d1a. Signed-off-by: Shea Levy <shea@shealevy.com>
23 lines
424 B
Perl
23 lines
424 B
Perl
package Hydra::Helper::PluginHooks;
|
|
|
|
use strict;
|
|
use Exporter;
|
|
|
|
our @ISA = qw(Exporter);
|
|
our @EXPORT = qw(
|
|
notifyBuildFinished);
|
|
|
|
sub notifyBuildFinished {
|
|
my ($plugins, $build, $dependents) = @_;
|
|
foreach my $plugin (@{$plugins}) {
|
|
eval {
|
|
$plugin->buildFinished($build, $dependents);
|
|
};
|
|
if ($@) {
|
|
print STDERR "$plugin->buildFinished: $@\n";
|
|
}
|
|
}
|
|
}
|
|
|
|
1;
|