File Coverage

blib/lib/Net/OAuth2Server/TokenExchange.pm
Criterion Covered Total %
statement 15 16 93.7
branch n/a
condition n/a
subroutine 5 6 83.3
pod n/a
total 20 22 90.9


line stmt bran cond sub pod time code
1 1     1   370 use strict; use warnings;
  1     1   2  
  1         23  
  1         3  
  1         2  
  1         39  
2              
3             package Net::OAuth2Server::TokenExchange;
4              
5             our $VERSION = '0.003';
6              
7 1     1   353 use Net::OAuth2Server::Request::Token::TokenExchange ();
  1         3  
  1         36  
8              
9             package Net::OAuth2Server::Response::Role::TokenExchange;
10              
11             our $VERSION = '0.003';
12              
13 1     1   439 use Role::Tiny;
  1         3546  
  1         5  
14 1     1   532 use Class::Method::Modifiers 'fresh';
  1         1316  
  1         97  
15              
16 0     0     sub fresh__add_issued_token_type { shift->add( issued_token_type => @_ ) }
17             fresh add_issued_token_type => \&fresh__add_issued_token_type;
18             undef *fresh__add_issued_token_type;
19              
20             1;
21              
22             __END__