File Coverage

blib/lib/TM/Easy/Topic.pm
Criterion Covered Total %
statement 0 6 0.0
branch n/a
condition n/a
subroutine 0 1 0.0
pod 0 1 0.0
total 0 8 0.0


line stmt bran cond sub pod time code
1             package TM::Easy::Topic;
2              
3             sub new {
4 0     0 0   my $class = shift;
5 0           my $tid = shift;
6 0           my $tm = shift;
7 0           my %self;
8 0           tie %self, 'TM::Tied::Topic', $tid, $tm;
9 0           return bless \%self, $class;
10             }
11              
12             1;