blib/lib/FBP/Tool.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::Tool; | ||||||
2 | |||||||
3 | 4 | 4 | 22 | use Mouse; | |||
4 | 10 | ||||||
4 | 24 | ||||||
4 | |||||||
5 | our $VERSION = '0.41'; | ||||||
6 | |||||||
7 | extends 'FBP::Object'; | ||||||
8 | |||||||
9 | has id => ( | ||||||
10 | is => 'ro', | ||||||
11 | isa => 'Str', | ||||||
12 | ); | ||||||
13 | |||||||
14 | has name => ( | ||||||
15 | is => 'ro', | ||||||
16 | isa => 'Str', | ||||||
17 | ); | ||||||
18 | |||||||
19 | has label => ( | ||||||
20 | is => 'ro', | ||||||
21 | isa => 'Str', | ||||||
22 | ); | ||||||
23 | |||||||
24 | has bitmap => ( | ||||||
25 | is => 'ro', | ||||||
26 | isa => 'Str', | ||||||
27 | ); | ||||||
28 | |||||||
29 | has kind => ( | ||||||
30 | is => 'ro', | ||||||
31 | isa => 'Str', | ||||||
32 | ); | ||||||
33 | |||||||
34 | has tooltip => ( | ||||||
35 | is => 'ro', | ||||||
36 | isa => 'Str', | ||||||
37 | ); | ||||||
38 | |||||||
39 | has statusbar => ( | ||||||
40 | is => 'ro', | ||||||
41 | isa => 'Str', | ||||||
42 | ); | ||||||
43 | |||||||
44 | has OnToolClicked => ( | ||||||
45 | is => 'ro', | ||||||
46 | isa => 'Str', | ||||||
47 | ); | ||||||
48 | |||||||
49 | has OnMenuSelection => ( | ||||||
50 | is => 'ro', | ||||||
51 | isa => 'Str', | ||||||
52 | ); | ||||||
53 | |||||||
54 | has OnToolRClicked => ( | ||||||
55 | is => 'ro', | ||||||
56 | isa => 'Str', | ||||||
57 | ); | ||||||
58 | |||||||
59 | has OnToolEnter => ( | ||||||
60 | is => 'ro', | ||||||
61 | isa => 'Str', | ||||||
62 | ); | ||||||
63 | |||||||
64 | has OnUpdateUI => ( | ||||||
65 | is => 'ro', | ||||||
66 | isa => 'Str', | ||||||
67 | ); | ||||||
68 | |||||||
69 | 4 | 4 | 1886 | no Mouse; | |||
4 | 9 | ||||||
4 | 56 | ||||||
70 | __PACKAGE__->meta->make_immutable; | ||||||
71 | |||||||
72 | 1; |