File Coverage

lib/CatalystX/Eta/Controller/AutoBase.pm

Criterion	Covered	Total	%
statement	11	11	100.0
branch	1	2	50.0
condition	1	3	33.3
subroutine	2	2	100.0
pod			n/a
total	15	18	83.3

package CatalystX::Eta::Controller::AutoBase;

use Moose::Role;

requires 'base';

around base => \&AutoBase_around_base;

sub AutoBase_around_base {
    my $orig = shift;
    my $self = shift;

    my ($c) = @_;
    $self->$orig(@_);

    my $config = $self->config;

    $c->stash->{collection} = $c->model( $self->config->{result} );

    if ( exists $config->{result_cond} || exists $config->{result_attr} ) {

        $c->stash->{collection} = $c->stash->{collection}->search( $config->{result_cond}, $config->{result_attr} );

    }
}

1;