File Coverage

blib/lib/GBPVR/CDBI/Channel.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package GBPVR::CDBI::Channel;
2              
3 1     1   2216 use warnings;
  1         2  
  1         38  
4 1     1   6 use strict;
  1         2  
  1         50  
5              
6             our $VERSION = '0.02';
7              
8 1     1   6 use base 'GBPVR::CDBI';
  1         2  
  1         156  
9              
10             __PACKAGE__->table('channel');
11             __PACKAGE__->columns(Primary => qw/oid/ );
12             __PACKAGE__->columns(All => qw/ oid name channelID channel_number favourite / );
13              
14             sub favorite {
15             my $self = shift;
16             return $self->favourite( @_ );
17             }
18              
19             1;
20             __END__