File Coverage

blib/lib/MooseX/TrackDirty/Attributes/Trait/Role/Composite.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             #
2             # This file is part of MooseX-TrackDirty-Attributes
3             #
4             # This software is Copyright (c) 2011 by Chris Weyl.
5             #
6             # This is free software, licensed under:
7             #
8             # The GNU Lesser General Public License, Version 2.1, February 1999
9             #
10             package MooseX::TrackDirty::Attributes::Trait::Role::Composite;
11             {
12             $MooseX::TrackDirty::Attributes::Trait::Role::Composite::VERSION = '1.900'; # TRIAL
13             }
14              
15             # ABSTRACT: Apply our application::to* traits to any composition of our role and any other
16              
17 3     3   5975 use Moose::Role;
  3         5  
  3         17  
18 3     3   10599 use namespace::autoclean;
  3         4  
  3         27  
19              
20 3     3   195 use MooseX::TrackDirty::Attributes::Util ':all';
  3         4  
  3         23  
21              
22             # debugging...
23             #use Smart::Comments;
24              
25              
26             around apply_params => sub {
27             my ($orig, $self) = (shift, shift);
28              
29             return Moose::Util::MetaRole::apply_metaroles(
30             for => $self->$orig(@_),
31             role_metaroles => {
32             role => [ trait_for 'Role' ],
33             application_to_class => [ ToClass ],
34             application_to_role => [ ToRole ],
35             application_to_instance => [ ToInstance ],
36             },
37             );
38             };
39              
40              
41             !!42;
42              
43             __END__
44             =pod
45              
46             =encoding utf-8
47              
48             =head1 NAME
49              
50             MooseX::TrackDirty::Attributes::Trait::Role::Composite - Apply our application::to* traits to any composition of our role and any other
51              
52             =head1 VERSION
53              
54             This document describes 1.900 of MooseX::TrackDirty::Attributes::Trait::Role::Composite - released February 15, 2012 as part of MooseX-TrackDirty-Attributes.
55              
56             =head1 METHODS
57              
58             =head2 apply_params
59              
60             =head1 SEE ALSO
61              
62             Please see those modules/websites for more information related to this module.
63              
64             =over 4
65              
66             =item *
67              
68             L<MooseX::TrackDirty::Attributes|MooseX::TrackDirty::Attributes>
69              
70             =back
71              
72             =head1 SOURCE
73              
74             The development version is on github at L<http://github.com/RsrchBoy/moosex-trackdirty-attributes>
75             and may be cloned from L<git://github.com/RsrchBoy/moosex-trackdirty-attributes.git>
76              
77             =head1 BUGS
78              
79             Please report any bugs or feature requests on the bugtracker website
80             https://github.com/RsrchBoy/moosex-trackdirty-attributes/issues
81              
82             When submitting a bug or request, please include a test-file or a
83             patch to an existing test-file that illustrates the bug or desired
84             feature.
85              
86             =head1 AUTHOR
87              
88             Chris Weyl <cweyl@alumni.drew.edu>
89              
90             =head1 COPYRIGHT AND LICENSE
91              
92             This software is Copyright (c) 2011 by Chris Weyl.
93              
94             This is free software, licensed under:
95              
96             The GNU Lesser General Public License, Version 2.1, February 1999
97              
98             =cut
99