File Coverage

blib/lib/Curio/Role/CHI.pm

Criterion	Covered	Total	%
statement	20	20	100.0
branch			n/a
condition			n/a
subroutine	6	6	100.0
pod			n/a
total	26	26	100.0

package Curio::Role::CHI;
our $VERSION = '0.01';

use CHI;
use Types::Standard qw( InstanceOf );

use Moo::Role;
use strictures 2;
use namespace::clean;

with 'Curio::Role';
with 'MooX::BuildArgs';

after initialize => sub{
    my ($class) = @_;

    my $factory = $class->factory();

    $factory->does_caching( 1 );
    $factory->cache_per_process( 1 );

    return;
};

has chi => (
    is  => 'lazy',
    isa => InstanceOf[ 'CHI::Driver' ],
);

sub _build_chi {
    my ($self) = @_;

    my $chi = CHI->new(
        %{ $self->build_args() },
    );

    $self->clear_build_args();

    return $chi;
}

1;
__END__