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; |