← Back to branch summary

~ubuntu-branches/ubuntu/raring/libmoose-perl/raring-proposed

« back to all changes in this revision

Viewing changes to lib/Moose/Meta/Role/Application/ToRole.pm

  • Committer: Package Import Robot
  • Author(s): Alessandro Ghedini
  • Date: 2012-02-05 17:18:51 UTC
  • mfrom: (1.1.59)
  • Revision ID: package-import@ubuntu.com-20120205171851-cxiawm4ii9oyz9jv
Tags: 2.0402-1
* New upstream release
* Bump upstream copyright year
* Bump debhelper compat level to 9

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/Moose/Meta/Role/Application/ToRole.pm
3
3
  $Moose::Meta::Role::Application::ToRole::AUTHORITY = 'cpan:STEVAN';
4
4
}
5
5
{
6
 
  $Moose::Meta::Role::Application::ToRole::VERSION = '2.0401';
 
6
  $Moose::Meta::Role::Application::ToRole::VERSION = '2.0402';
7
7
}
8
8
 
9
9
use strict;
29
29
    foreach my $excluded_role_name ($role1->get_excluded_roles_list) {
30
30
        if ( $role2->does_role($excluded_role_name) ) {
31
31
            require Moose;
32
 
            Moose->throw_error("The class " . $role2->name . " does the excluded role '$excluded_role_name'");
 
32
            Moose->throw_error("The role " . $role2->name . " does the excluded role '$excluded_role_name'");
33
33
        }
34
34
        $role2->add_excluded_roles($excluded_role_name);
35
35
    }
198
198
 
199
199
=head1 VERSION
200
200
 
201
 
version 2.0401
 
201
version 2.0402
202
202
 
203
203
=head1 DESCRIPTION
204
204
 
238
238
 
239
239
=head1 COPYRIGHT AND LICENSE
240
240
 
241
 
This software is copyright (c) 2011 by Infinity Interactive, Inc..
 
241
This software is copyright (c) 2012 by Infinity Interactive, Inc..
242
242
 
243
243
This is free software; you can redistribute it and/or modify it under
244
244
the same terms as the Perl 5 programming language system itself.