File Coverage

blib/lib/Mojo/UserAgent/Role/PromiseClass.pm
Criterion Covered Total %
statement 3 3 100.0
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 4 4 100.0


line stmt bran cond sub pod time code
1             package Mojo::UserAgent::Role::PromiseClass 0.007;
2              
3             # ABSTRACT: Choose the promise class used by Mojo::UserAgent
4              
5 1     1   1402 use Mojo::Base -role;
  1         3  
  1         8  
6              
7             with 'Mojo::Base::Role::PromiseClass';
8              
9             around start_p => sub {
10             my ($start_p, $ua) = (shift, shift);
11             bless $ua->$start_p(@_), $ua->promise_class;
12             };
13              
14             1;
15              
16             __END__