File Coverage

blib/lib/Dpkg/Control/Tests.pm
Criterion Covered Total %
statement 24 24 100.0
branch n/a
condition 1 3 33.3
subroutine 8 8 100.0
pod 2 2 100.0
total 35 37 94.5


line stmt bran cond sub pod time code
1             # Copyright © 2016 Guillem Jover
2             #
3             # This program is free software; you can redistribute it and/or modify
4             # it under the terms of the GNU General Public License as published by
5             # the Free Software Foundation; either version 2 of the License, or
6             # (at your option) any later version.
7             #
8             # This program is distributed in the hope that it will be useful,
9             # but WITHOUT ANY WARRANTY; without even the implied warranty of
10             # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11             # GNU General Public License for more details.
12             #
13             # You should have received a copy of the GNU General Public License
14             # along with this program. If not, see .
15              
16             package Dpkg::Control::Tests;
17              
18 1     1   894 use strict;
  1         3  
  1         29  
19 1     1   6 use warnings;
  1         2  
  1         39  
20              
21             our $VERSION = '1.00';
22              
23 1     1   428 use Dpkg::Control;
  1         3  
  1         86  
24 1     1   459 use Dpkg::Control::Tests::Entry;
  1         2  
  1         46  
25 1     1   429 use Dpkg::Index;
  1         2  
  1         32  
26              
27 1     1   7 use parent qw(Dpkg::Index);
  1         3  
  1         3  
28              
29             =encoding utf8
30              
31             =head1 NAME
32              
33             Dpkg::Control::Tests - parse files like debian/tests/control
34              
35             =head1 DESCRIPTION
36              
37             It provides a class to access data of files that follow the same
38             syntax as F.
39              
40             =head1 METHODS
41              
42             All the methods of Dpkg::Index are available. Those listed below are either
43             new or overridden with a different behavior.
44              
45             =over 4
46              
47             =item $c = Dpkg::Control::Tests->new(%opts)
48              
49             Create a new Dpkg::Control::Tests object, which inherits from Dpkg::Index.
50              
51             =cut
52              
53             sub new {
54 3     3 1 1079 my ($this, %opts) = @_;
55 3   33     18 my $class = ref($this) || $this;
56 3         20 my $self = Dpkg::Index->new(type => CTRL_TESTS, %opts);
57              
58 3         10 return bless $self, $class;
59             }
60              
61             =item $item = $tests->new_item()
62              
63             Creates a new item.
64              
65             =cut
66              
67             sub new_item {
68 12     12 1 56 my $self = shift;
69              
70 12         44 return Dpkg::Control::Tests::Entry->new();
71             }
72              
73             =back
74              
75             =head1 CHANGES
76              
77             =head2 Version 1.00 (dpkg 1.18.8)
78              
79             Mark the module as public.
80              
81             =cut
82              
83             1;