File Coverage

lib/Google/Chart/Type/Pie.pm
Criterion Covered Total %
statement 12 14 85.7
branch 0 2 0.0
condition n/a
subroutine 4 5 80.0
pod 1 1 100.0
total 17 22 77.2


line stmt bran cond sub pod time code
1             # $Id$
2              
3             package Google::Chart::Type::Pie;
4 1     1   5 use Moose;
  1         3  
  1         9  
5 1     1   7375 use Moose::Util::TypeConstraints;
  1         2  
  1         13  
6              
7             with 'Google::Chart::Type::Simple';
8              
9             has 'pie_type' => (
10             is => 'rw',
11             isa => enum([ qw(2d 3d) ]),
12             required => 1,
13             default => '2d'
14             );
15              
16             __PACKAGE__->meta->make_immutable;
17              
18 1     1   2263 no Moose;
  1         2  
  1         6  
19 1     1   246 no Moose::Util::TypeConstraints;
  1         2  
  1         6  
20              
21             sub parameter_value {
22 0     0 1   my $self = shift;
23              
24 0 0         return $self->pie_type eq '3d' ? 'p3' : 'p';
25             }
26              
27             1;
28              
29             __END__
30              
31             =head1 NAME
32              
33             Google::Chart::Type::Pie - Google::Chart Pie Chart Type
34              
35             =head1 SYNOPSIS
36              
37             Google::Chart->new(
38             type => 'Pie'
39             );
40              
41             Google::Chart->new(
42             type => {
43             module => 'Pie',
44             args => {
45             pie_type => '3d'
46             }
47             }
48             );
49              
50             =head1 METHODS
51              
52             =head2 parameter_value
53              
54             =cut