File Coverage

lib/MetaPOD/Format/JSON/namespace/v1.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 18 18 100.0


line stmt bran cond sub pod time code
1              
2 6     6   4917 use strict;
  6         12  
  6         226  
3 6     6   37 use warnings;
  6         12  
  6         295  
4              
5             package MetaPOD::Format::JSON::namespace::v1;
6             BEGIN {
7 6     6   206 $MetaPOD::Format::JSON::namespace::v1::AUTHORITY = 'cpan:KENTNL';
8             }
9             {
10             $MetaPOD::Format::JSON::namespace::v1::VERSION = '0.3.0';
11             }
12              
13             # ABSTRACT: Implementation of JSON/namespace format component
14              
15              
16 6     6   926 use Moo::Role;
  6         43862  
  6         102  
17              
18              
19             sub add_namespace {
20 12     12 1 27 my ( $self, $namespace, $result ) = @_;
21 12         74 return $result->set_namespace($namespace);
22             }
23              
24             1;
25              
26             __END__