File Coverage

blib/lib/CatalystX/RequestModel/Utils/InvalidJSONForValue.pm
Criterion Covered Total %
statement 3 8 37.5
branch n/a
condition n/a
subroutine 1 3 33.3
pod 0 2 0.0
total 4 13 30.7


line stmt bran cond sub pod time code
1             package CatalystX::RequestModel::Utils::InvalidJSONForValue;
2            
3 6     6   43 use Moose;
  6         16  
  6         51  
4             with 'CatalystX::Utils::DoesHttpException';
5            
6             has 'param' => (is=>'ro', required=>1);
7             has 'value' => (is=>'ro', required=>1);
8             has 'parsing_error' => (is=>'ro', required=>1);
9              
10 0     0 0   sub status_code { 400 }
11 0     0 0   sub error { "JSON decode error for parameter '@{[ $_[0]->param]}', value '@{[ $_[0]->value ]}': @{[ $_[0]->parsing_error]}" }
  0            
  0            
  0            
12              
13             __PACKAGE__->meta->make_immutable;