File Coverage

blib/lib/Cinnamon/Config/Loader.pm
Criterion Covered Total %
statement 14 18 77.7
branch 2 4 50.0
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 20 27 74.0


line stmt bran cond sub pod time code
1             package Cinnamon::Config::Loader;
2 3     3   17 use strict;
  3         6  
  3         70  
3 3     3   14 use warnings;
  3         7  
  3         67  
4              
5 3     3   878 use Cinnamon::Logger;
  3         15  
  3         443  
6              
7             sub load {
8 9     9 0 31 my ($class, %args) = @_;
9 9         27 my $config = $args{config};
10              
11 9         2403 do $config;
12              
13 9 50       37 if ($@) {
14 0         0 log error => $@;
15 0         0 exit 1;
16             }
17              
18 9 50       46 if ($!) {
19 0           log error => $!;
20 0           exit 1;
21             }
22             }
23              
24             !!1;