From f1753ca22ba232a7509f3b59979b8ad960d8197a Mon Sep 17 00:00:00 2001
From: doy <doy@tozt.net>
Date: Mon, 20 Apr 2009 02:52:17 -0500
Subject: one more test

---
 t/001-basic.t | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 't')

diff --git a/t/001-basic.t b/t/001-basic.t
index 1cd45e3..e905531 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 => 7;
+use Test::More tests => 8;
 
 package Foo;
 
@@ -21,6 +21,7 @@ my $foo_moose = Foo::Moose->new;
 isa_ok $foo, 'Foo';
 is $foo->{_class}, 'Foo', 'Foo gets the correct class';
 isa_ok $foo_moose, 'Foo::Moose';
+isa_ok $foo_moose, 'Foo';
 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';
-- 
cgit v1.2.3-54-g00ecf