File Coverage

blib/lib/JavaScript/Code/Function/Result/Element.pm
Criterion Covered Total %
statement 9 13 69.2
branch n/a
condition 0 2 0.0
subroutine 3 4 75.0
pod 1 1 100.0
total 13 20 65.0


line stmt bran cond sub pod time code
1             package JavaScript::Code::Function::Result::Element;
2            
3 2     2   9 use strict;
  2         3  
  2         60  
4 2     2   7 use vars qw[ $VERSION ];
  2         4  
  2         62  
5 2         337 use base qw[
6             JavaScript::Code::Element
7 2     2   8 ];
  2         4  
8            
9             __PACKAGE__->mk_accessors(qw[ value ]);
10            
11             $VERSION = '0.08';
12            
13             =head1 NAME
14            
15             JavaScript::Code::Function::Result::Element - A JavaScript Function Result Element
16            
17             =head1 METHODS
18            
19             =head2 $self->output( )
20            
21             =cut
22            
23             sub output {
24 0     0 1   my $self = shift;
25 0   0       my $scope = shift || 1;
26 0           my $indenting = $self->get_indenting($scope);
27            
28 0           return $indenting . $self->value . ";\n";
29             }
30            
31             =head1 SEE ALSO
32            
33             L
34            
35             =head1 AUTHOR
36            
37             Sascha Kiefer, C
38            
39             =head1 LICENSE
40            
41             This library is free software, you can redistribute it and/or modify it under
42             the same terms as Perl itself.
43            
44             =cut
45            
46             1;