Alright, test skips in the absense of Moose now.

diff --git a/t/310_immutable_destroy.t b/t/310_immutable_destroy.t
index cac6108..4e3e38f 100644 (file)
--- a/t/310_immutable_destroy.t
+++ b/t/310_immutable_destroy.t
@@ -3,15 +3,13 @@ use warnings;
 use Test::More tests => 1;
 use Class::MOP;
 
-BEGIN { 
-       if (not Class::MOP::load_class('Moose::Object')) {
+SKIP: {
+       if (not eval { require Moose; 1 }) {
                skip 'test requires moose', 1;
                exit 0;
        }
-}
-
 
-{
+       eval <<FOOBAR;
     package FooBar;
     use Moose;
 
@@ -20,8 +18,9 @@ BEGIN {
     sub DESTROY { shift->name }
 
     __PACKAGE__->meta->make_immutable;
-}
+FOOBAR
 
-my $f = FooBar->new( name => 'SUSAN' );
+       my $f = FooBar->new( name => 'SUSAN' );
 
-is( $f->DESTROY, 'SUSAN', 'Did moose overload DESTROY?' );
+       is( $f->DESTROY, 'SUSAN', 'Did moose overload DESTROY?' );
+}