File Coverage

blib/lib/OpenSearch/Parameters/Index/Delete.pm
Criterion Covered Total %
statement 18 19 94.7
branch n/a
condition n/a
subroutine 6 7 85.7
pod 0 1 0.0
total 24 27 88.8


line stmt bran cond sub pod time code
1             package OpenSearch::Parameters::Index::Delete;
2 4     4   2931 use strict;
  4         11  
  4         163  
3 4     4   23 use warnings;
  4         10  
  4         280  
4 4     4   30 use feature qw(state);
  4         10  
  4         541  
5 4     4   31 use Types::Standard qw(Str Bool);
  4         11  
  4         39  
6 4     4   7872 use Types::Common::String qw(NonEmptyStr);
  4         10  
  4         39  
7 4     4   4470 use Moo::Role;
  4         10  
  4         42  
8              
9             with 'OpenSearch::Parameters';
10              
11             has 'index' => (
12             is => 'rw',
13             isa => NonEmptyStr,
14             required => 1,
15             );
16              
17             has 'allow_no_indices' => (
18             is => 'rw',
19             isa => Bool,
20             );
21              
22             has 'expand_wildcards' => (
23             is => 'rw',
24             isa => Str,
25             );
26              
27             has 'ignore_unavailable' => (
28             is => 'rw',
29             isa => Bool,
30             );
31              
32             has 'cluster_manager_timeout' => (
33             is => 'rw',
34             isa => Str,
35             );
36              
37             has 'timeout' => (
38             is => 'rw',
39             isa => Str,
40             );
41              
42             around [qw/index allow_no_indices expand_wildcards ignore_unavailable cluster_manager_timeout timeout/] => sub {
43             my $orig = shift;
44             my $self = shift;
45              
46             if (@_) {
47             $self->$orig(@_);
48             return ($self);
49             }
50             return ( $self->$orig );
51             };
52              
53             sub api_spec {
54 0     0 0   state $s = +{
55             index => {
56             encode_func => 'as_is',
57             type => 'path',
58             },
59             allow_no_indices => {
60             encode_func => 'encode_bool',
61             type => 'url',
62             },
63             expand_wildcards => {
64             encode_func => 'as_is',
65             type => 'url',
66             },
67             ignore_unavailable => {
68             encode_func => 'encode_bool',
69             type => 'url',
70             },
71             cluster_manager_timeout => {
72             encode_func => 'as_is',
73             type => 'url',
74             },
75             timeout => {
76             encode_func => 'as_is',
77             type => 'url',
78             }
79             };
80             }
81              
82             1;