File Coverage

blib/lib/Cfn/Resource/AWS/Redshift/ClusterSubnetGroup.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1 1     1   597 use Moose::Util::TypeConstraints;
  1         5  
  1         11  
2              
3             coerce 'Cfn::Resource::Properties::AWS::Redshift::ClusterSubnetGroup',
4             from 'HashRef',
5             via { Cfn::Resource::Properties::AWS::Redshift::ClusterSubnetGroup->new( %$_ ) };
6              
7             package Cfn::Resource::AWS::Redshift::ClusterSubnetGroup {
8 1     1   2416 use Moose;
  1         3  
  1         8  
9             extends 'Cfn::Resource';
10             has Properties => (isa => 'Cfn::Resource::Properties::AWS::Redshift::ClusterSubnetGroup', is => 'rw', coerce => 1, required => 1);
11             }
12              
13             package Cfn::Resource::Properties::AWS::Redshift::ClusterSubnetGroup {
14 1     1   7491 use Moose;
  1         2  
  1         6  
15 1     1   6730 use MooseX::StrictConstructor;
  1         4  
  1         9  
16             extends 'Cfn::Resource::Properties';
17             has Description => (isa => 'Cfn::Value', is => 'rw', coerce => 1, required => 1);
18             has SubnetIds => (isa => 'Cfn::Value::Array|Cfn::Value::Function', is => 'rw', coerce => 1, required => 1);
19             }
20              
21             1;
22