Commit | Line | Data |
eec8ca8a |
1 | |
2 | package Moose::Meta::Role::Method::Conflicted; |
3 | |
4 | use strict; |
5 | use warnings; |
6 | |
7 | use base qw(Moose::Meta::Role::Method::Required); |
8 | |
9 | our $VERSION = '0.79'; |
10 | $VERSION = eval $VERSION; |
11 | our $AUTHORITY = 'cpan:STEVAN'; |
12 | |
13 | __PACKAGE__->meta->add_attribute('roles' => (reader => 'roles')); |
14 | |
97403951 |
15 | sub is_conflict { 1 } |
16 | |
eec8ca8a |
17 | 1; |
18 | |
19 | __END__ |
20 | |
21 | =pod |
22 | |
23 | =head1 NAME |
24 | |
25 | Moose::Meta::Role::Method::Conflicted - A Moose metaclass for conflicted methods in Roles |
26 | |
27 | =head1 DESCRIPTION |
28 | |
29 | =head1 INHERITANCE |
30 | |
31 | C<Moose::Meta::Role::Method::Conflicted> is a subclass of |
32 | L<Moose::Meta::Role::Method::Required>. |
33 | |
97403951 |
34 | =head1 METHODS |
35 | |
36 | =over 4 |
37 | |
38 | =item B<< $method->is_conflict >> |
39 | |
40 | Returns whether the method requirement is due to a conflict. By default for |
41 | this class, it's true. |
42 | |
43 | =back |
44 | |
eec8ca8a |
45 | =head1 BUGS |
46 | |
47 | All complex software has bugs lurking in it, and this module is no |
48 | exception. If you find a bug please either email me, or add the bug |
49 | to cpan-RT. |
50 | |
51 | =head1 AUTHOR |
52 | |
53 | Stevan Little E<lt>stevan@iinteractive.comE<gt> |
54 | |
55 | =head1 COPYRIGHT AND LICENSE |
56 | |
57 | Copyright 2006-2009 by Infinity Interactive, Inc. |
58 | |
59 | L<http://www.iinteractive.com> |
60 | |
61 | This library is free software; you can redistribute it and/or modify |
62 | it under the same terms as Perl itself. |
63 | |
64 | =cut |