File Coverage

lib/Template/Plugin/Iterator.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 21 21 100.0


line stmt bran cond sub pod time code
1             #============================================================= -*-Perl-*-
2             #
3             # Template::Plugin::Iterator
4             #
5             # DESCRIPTION
6             #
7             # Plugin to create a Template::Iterator from a list of items and optional
8             # configuration parameters.
9             #
10             # AUTHOR
11             # Andy Wardley
12             #
13             # COPYRIGHT
14             # Copyright (C) 2000-2007 Andy Wardley. All Rights Reserved.
15             #
16             # This module is free software; you can redistribute it and/or
17             # modify it under the same terms as Perl itself.
18             #
19             #============================================================================
20              
21             package Template::Plugin::Iterator;
22              
23 1     1   6 use strict;
  1         2  
  1         42  
24 1     1   7 use warnings;
  1         2  
  1         38  
25 1     1   5 use base 'Template::Plugin';
  1         2  
  1         463  
26 1     1   8 use Template::Iterator;
  1         1  
  1         84  
27              
28             our $VERSION = 2.68;
29              
30             #------------------------------------------------------------------------
31             # new($context, \@data, \%args)
32             #------------------------------------------------------------------------
33              
34             sub new {
35 1     1 1 2 my $class = shift;
36 1         3 my $context = shift;
37 1         6 Template::Iterator->new(@_);
38             }
39              
40             1;
41              
42             __END__