On Thu, Apr 30, 2009 at 11:43 AM, Ovid <[email protected]> wrote:
>
> ----- Original Message ----
>
>> From: Chris Prather <[email protected]>
>
>> Make sure you're on Moose 0.75 and above. Here is the test file for
>> the new code, it's anemic, but this part of the code wasn't very well
>> tested before either.
>>
>> http://cpansearch.perl.org/src/DROLSKY/Moose-0.76/t/030_roles/038_new_meta_role.t
>
> I'm on version 0.76. Looks like I had initially done stuff right. No idea
> why it didn't work. Working on "includes" right now, so I'm a bit distracted.
I just forked your code on CPAN and re-wrote the test to look like:
{
use MooseX::Role::Strict ();
package My::Role::Example;
use MooseX::Meta::Role::Strict;
use Moose::Role -metaclass => 'MooseX::Meta::Role::Strict';
sub munge { 'munge role' }
}
and that causes all tests to pass. I need the use MooseX::Role::Strict
so that MooseX::Meta::Role::Application::ToClass::Strict is parsed and
loaded, any reason other than not wanting a ton of nested directories
to do it that way rather than as a separate file?
I'll commit this so you can see the patch, also I caught a missing end
quote (') on $VERSION ... which is a separate patch on github.
-Chris
