File Coverage

blib/lib/FBP/SearchCtrl.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::SearchCtrl;
2              
3 4     4   20 use Mouse;
  4         7  
  4         23  
4              
5             our $VERSION = '0.41';
6              
7             extends 'FBP::Control';
8              
9             has value => (
10             is => 'ro',
11             isa => 'Str',
12             required => 1,
13             default => '',
14             );
15              
16             has style => (
17             is => 'ro',
18             isa => 'Str',
19             );
20              
21             has search_button => (
22             is => 'ro',
23             isa => 'Bool',
24             required => 1,
25             default => 0,
26             );
27              
28             has cancel_button => (
29             is => 'ro',
30             isa => 'Bool',
31             required => 1,
32             default => 0,
33             );
34              
35             has OnText => (
36             is => 'ro',
37             isa => 'Str',
38             );
39              
40             has OnTextEnter => (
41             is => 'ro',
42             isa => 'Str',
43             );
44              
45             has OnSearchButton => (
46             is => 'ro',
47             isa => 'Str',
48             );
49              
50             has OnCancelButton => (
51             is => 'ro',
52             isa => 'Str',
53             );
54              
55 4     4   1706 no Mouse;
  4         6  
  4         38  
56             __PACKAGE__->meta->make_immutable;
57              
58             1;