File Coverage

mock/Config/Tiny.pm

Criterion	Covered	Total	%
statement	17	17	100.0
branch			n/a
condition			n/a
subroutine	6	6	100.0
pod	2	2	100.0
total	25	25	100.0

package Config::Tiny;

use 5.008;

use strict;
use warnings;

use Carp;

our $VERSION = '0.000_194';

our $CONFIG ||= {};

sub new {
    my ( $class ) = @_;
    # Because our configuration file may or may not exist under testing
    # conditions, new() also needs to return $CONFIG, so that we get the
    # desired result no matter which path we take through the code.
    return bless { %{ $CONFIG } }, __PACKAGE__;
}

sub read {
    my ( $class, $file ) = @_;
    return $class->new();
}


1;

__END__