test that extends always gets you Moose::Object as a base class

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');