File Coverage

blib/lib/FBP/TreeCtrl.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package FBP::TreeCtrl;
2              
3 4     4   24 use Mouse;
  4         8  
  4         26  
4              
5             our $VERSION = '0.41';
6              
7             extends 'FBP::Control';
8             with 'FBP::TreeCtrlBase';
9              
10             has style => (
11             is => 'ro',
12             isa => 'Str',
13             );
14              
15             has OnTreeGetInfo => (
16             is => 'ro',
17             isa => 'Str',
18             );
19              
20             has OnTreeSetInfo => (
21             is => 'ro',
22             isa => 'Str',
23             );
24              
25             has OnTreeItemGetTooltip => (
26             is => 'ro',
27             isa => 'Str',
28             );
29              
30             has OnTreeStateImageClick => (
31             is => 'ro',
32             isa => 'Str',
33             );
34              
35 4     4   1593 no Mouse;
  4         9  
  4         26  
36             __PACKAGE__->meta->make_immutable;
37              
38             1;