File Coverage

blib/lib/OpenSearch/Parameters/Security/PatchUsers.pm
Criterion Covered Total %
statement 15 16 93.7
branch n/a
condition n/a
subroutine 5 6 83.3
pod 0 1 0.0
total 20 23 86.9


line stmt bran cond sub pod time code
1             package OpenSearch::Parameters::Security::PatchUsers;
2 4     4   2582 use strict;
  4         13  
  4         192  
3 4     4   24 use warnings;
  4         19  
  4         232  
4 4     4   25 use feature qw(state);
  4         8  
  4         515  
5 4     4   29 use Types::Standard qw(Str ArrayRef HashRef);
  4         9  
  4         56  
6 4     4   8385 use Moo::Role;
  4         10  
  4         36  
7              
8             with 'OpenSearch::Parameters';
9              
10             has 'ops' => (
11             is => 'rw',
12             isa => ArrayRef [HashRef],
13             required => 1
14             );
15              
16             around [qw/ops/] => sub {
17             my $orig = shift;
18             my $self = shift;
19              
20             if (@_) {
21             $self->$orig(@_);
22             return ($self);
23             }
24             return ( $self->$orig );
25             };
26              
27             sub api_spec {
28 0     0 0   state $s = +{
29             ops => {
30             encode_func => 'as_is',
31             type => 'body',
32             forced_body => 1,
33             },
34             };
35             }
36              
37             1;