#!/usr/bin/perl
+# This is automatically generated by author/import-moose-test.pl.
+# DO NOT EDIT THIS FILE. ANY CHANGES WILL BE LOST!!!
+use t::lib::MooseCompat;
use strict;
use warnings;
-use Test::More tests => 40;
+use Test::More;
+$TODO = q{Mouse is not yet completed};
use Test::Exception;
-use lib 't/lib';
-use Test::Mouse;
-
-use MooseCompat;
-
=pod
NOTE:
my $foo_role = FooRole->meta;
isa_ok($foo_role, 'Mouse::Meta::Role');
-#isa_ok($foo_role, 'Class::MOP::Module');
+isa_ok($foo_role, 'Mouse::Meta::Module');
is($foo_role->name, 'FooRole', '... got the right name of FooRole');
is($foo_role->version, '0.01', '... got the right version of FooRole');
# methods ...
-
ok($foo_role->has_method('foo'), '... FooRole has the foo method');
is($foo_role->get_method('foo')->body, \&FooRole::foo, '... FooRole got the foo method');
'bar attribute is rw');
is($bar_attr->{isa}, 'Foo',
'bar attribute isa Foo');
-{
- local $TODO = 'definition_context is not yet implemented';
- is(ref($bar_attr->{definition_context}), 'HASH',
- 'bar\'s definition context is a hash');
- is($bar_attr->{definition_context}->{package}, 'FooRole',
- 'bar was defined in FooRole');
-}
+is(ref($bar_attr->{definition_context}), 'HASH',
+ 'bar\'s definition context is a hash');
+is($bar_attr->{definition_context}->{package}, 'FooRole',
+ 'bar was defined in FooRole');
ok($foo_role->has_attribute('baz'), '... FooRole does have the baz attribute');
my $baz_attr = $foo_role->get_attribute('baz');
is($baz_attr->{is}, 'ro',
'baz attribute is ro');
-
-{
- local $TODO = 'definition_context is not yet implemented';
- is(ref($baz_attr->{definition_context}), 'HASH',
- 'bar\'s definition context is a hash');
- is($baz_attr->{definition_context}->{package}, 'FooRole',
- 'baz was defined in FooRole');
-}
+is(ref($baz_attr->{definition_context}), 'HASH',
+ 'bar\'s definition context is a hash');
+is($baz_attr->{definition_context}->{package}, 'FooRole',
+ 'baz was defined in FooRole');
# method modifiers
[ 'bling', 'fling' ],
'... got the right list of override method modifiers');
+done_testing;