summaryrefslogtreecommitdiffstats
path: root/t
diff options
context:
space:
mode:
Diffstat (limited to 't')
-rw-r--r--t/001-basic.t3
1 files changed, 2 insertions, 1 deletions
diff --git a/t/001-basic.t b/t/001-basic.t
index 483ac75..a448abf 100644
--- a/t/001-basic.t
+++ b/t/001-basic.t
@@ -1,7 +1,7 @@
#!/usr/bin/env perl
use strict;
use warnings;
-use Test::More tests => 8;
+use Test::More tests => 9;
package Foo;
@@ -22,6 +22,7 @@ isa_ok($foo, 'Foo');
is($foo->{_class}, 'Foo', 'Foo gets the correct class');
isa_ok($foo_moose, 'Foo::Moose');
isa_ok($foo_moose, 'Foo');
+isa_ok($foo_moose, 'Moose::Object');
is($foo_moose->{_class}, 'Foo::Moose', 'Foo::Moose gets the correct class');
my $meta = Foo::Moose->meta;
ok($meta->has_method('new'), 'Foo::Moose has its own constructor');