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   349 use strict; use warnings;
  1     1   2  
  1         22  
  1         4  
  1         1  
  1         38  
2              
3             package Net::OAuth2Server::TokenExchange;
4              
5             our $VERSION = '0.002';
6              
7 1     1   350 use Net::OAuth2Server::Request::Token::TokenExchange ();
  1         2  
  1         35  
8              
9             package Net::OAuth2Server::Response::Role::TokenExchange;
10              
11             our $VERSION = '0.002';
12              
13 1     1   492 use Role::Tiny;
  1         3355  
  1         6  
14 1     1   556 use Class::Method::Modifiers 'fresh';
  1         1247  
  1         94  
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__