File Coverage

blib/lib/FBP/Object.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::Object;
2              
3             =pod
4              
5             =head1 NAME
6              
7             FBP::Object - Base class for all wxFormBuilder objects
8              
9             =head1 METHODS
10              
11             =cut
12              
13 4     4   2175 use Mouse;
  4         8  
  4         23  
14              
15             our $VERSION = '0.41';
16              
17             # =pod
18             #
19             # =head2 raw
20             #
21             # The full wxFormBuilder XML data structure will contain a far larger breadth
22             # of properties than are actually supported in the L object model.
23             #
24             # In other cases, the object model may normalise a property that some specific
25             # consumer will wish to access in the original form.
26             #
27             # The C method provides access to a C containing the keys and values
28             # of the C tags in the original XML document.
29             #
30             # =cut
31             #
32             # has raw => (
33             # is => 'ro',
34             # isa => 'Any',
35             # );
36              
37             =pod
38              
39             =head2 permission
40              
41             The C flag, present on the vast majority of wxFormBuilder objects,
42             influences the code structure used to create and store any resulting Perl
43             GUI objects.
44              
45             This property is normally used to control attribute privacy under C++, but is
46             repurposed for usage in Perl code generators such as L.
47              
48             =cut
49              
50             has permission => (
51             is => 'ro',
52             isa => 'Str',
53             required => 1,
54             default => 'none',
55             );
56              
57 4     4   1385 no Mouse;
  4         9  
  4         21  
58             __PACKAGE__->meta->make_immutable;
59              
60             1;
61              
62             =pod
63              
64             =head1 SUPPORT
65              
66             Bugs should be reported via the CPAN bug tracker at
67              
68             L
69              
70             For other issues, or commercial enhancement or support, contact the author.
71              
72             =head1 AUTHOR
73              
74             Adam Kennedy Eadamk@cpan.orgE
75              
76             =head1 COPYRIGHT
77              
78             Copyright 2009 - 2012 Adam Kennedy.
79              
80             This program is free software; you can redistribute
81             it and/or modify it under the same terms as Perl itself.
82              
83             The full text of the license can be found in the
84             LICENSE file included with this module.
85              
86             =cut