File Coverage

blib/lib/WebService/Hydra/Exception/RevokeLoginSessionsFailed.pm
Criterion Covered Total %
statement 16 16 100.0
branch n/a
condition 2 4 50.0
subroutine 5 5 100.0
pod 0 1 0.0
total 23 26 88.4


line stmt bran cond sub pod time code
1             package WebService::Hydra::Exception::RevokeLoginSessionsFailed;
2 5     5   162487 use strict;
  5         14  
  5         244  
3 5     5   27 use warnings;
  5         37  
  5         260  
4 5     5   535 use Object::Pad;
  5         7876  
  5         31  
5              
6             our $VERSION = '0.005'; ## VERSION
7              
8 1     1   526 class WebService::Hydra::Exception::RevokeLoginSessionsFailed :isa(WebService::Hydra::Exception) {
  1         13  
  1         105  
9              
10             sub BUILDARGS {
11 2     2 0 337 my ($class, %args) = @_;
12              
13 2   50     9 $args{message} //= 'Failed to revoke login sessions';
14 2   50     5 $args{category} //= 'client';
15              
16 2         23 return %args;
17             }
18             }
19              
20             1;