File Coverage

lib/MooseX/DIC/ServiceFactoryFactory.pm

Criterion	Covered	Total	%
statement	15	16	93.7
branch			n/a
condition			n/a
subroutine	5	6	83.3
pod	0	1	0.0
total	20	23	86.9

package MooseX::DIC::ServiceFactoryFactory;

require Exporter;
@ISA       = qw/Exporter/;
@EXPORT_OK = qw/build_factory/;

use aliased 'MooseX::DIC::ContainerException';
use Module::Load;
use Try::Tiny;

sub build_factory {
    my ( $factory_type, $container ) = @_;

    my $service_factory;
	try {
        load "MooseX::DIC::ServiceFactory::$factory_type";

        $service_factory = "MooseX::DIC::ServiceFactory::$factory_type"
            ->new( container => $container );

    } catch {
		ContainerException->throw(
			message => "Could not build the service factory $factory_type: $_" );
	};

    return $service_factory;
}

1;