File Coverage

blib/lib/oCLI/Plugin.pm

Criterion	Covered	Total	%
statement	3	21	14.2
branch			n/a
condition			n/a
subroutine	1	5	20.0
pod	0	4	0.0
total	4	30	13.3

package oCLI::Plugin;
use Moo;

has plugins => (
    is      => 'rw',
    default => sub { return [] },
);

sub add {
    my ( $self, $plugin ) = @_;

    push @{$self->plugins}, $plugin;
}

sub hook_after_context {
    my ( $self, $c ) = @_;

    foreach my $plugin ( @{$self->plugins} ) {
        $plugin->after_context($c);
    }
    return;
}

sub hook_before_code {
    my ( $self, $c, $command ) = @_;

    foreach my $plugin ( @{$self->plugins} ) {
        $plugin->before_code($c, $command);
    }
    return;
}

sub hook_after_code {
    my ( $self, $c ) = @_;

    foreach my $plugin ( @{$self->plugins} ) {
        $plugin->after_code($c);
    }
    return;
}


1;