File Coverage

blib/lib/Net/Trac/TicketPropChange.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   4 use strict;
  1         2  
  1         25  
2 1     1   5 use warnings;
  1         2  
  1         27  
3              
4             package Net::Trac::TicketPropChange;
5 1     1   5 use Any::Moose;
  1         2  
  1         4  
6              
7             =head1 NAME
8              
9             Net::Trac::TicketPropChange - A single property change in a Trac ticket history entry
10              
11             =head1 DESCRIPTION
12              
13             A very simple class to represent a single property change in a history entry.
14              
15             =head1 ACCESSORS
16              
17             =head2 property
18              
19             =head2 old_value
20              
21             =head2 new_value
22              
23             =cut
24              
25             has property => ( isa => 'Str', is => 'rw' );
26             has old_value => ( isa => 'Str', is => 'rw' );
27             has new_value => ( isa => 'Str', is => 'rw' );
28              
29             =head1 LICENSE
30            
31             Copyright 2008-2009 Best Practical Solutions.
32            
33             This package is licensed under the same terms as Perl 5.8.8.
34            
35             =cut
36              
37             __PACKAGE__->meta->make_immutable;
38 1     1   410 no Any::Moose;
  1         2  
  1         3  
39              
40             1;