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   15 use strict;
  3         6  
  3         96  
3 3     3   15 use warnings;
  3         5  
  3         70  
4              
5 3     3   15 use Cinnamon::Logger;
  3         5  
  3         464  
6              
7             sub load {
8 14     14 0 35 my ($class, %args) = @_;
9 14         24 my $config = $args{config};
10              
11 14         5014 do $config;
12              
13 14 50       391 if ($@) {
14 0         0 log error => $@;
15 0         0 exit 1;
16             }
17              
18 14 50       80 if ($!) {
19 0           log error => $!;
20 0           exit 1;
21             }
22             }
23              
24             !!1;