X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F050_metaclasses%2F004_moose_for_meta.t;h=bd415eed28c5d44308817107e1a2ff069b4a82da;hb=94e4f66a14c5d8d9d926227da300e92edf0039fe;hp=d355dbc7e38586d94ddab9f7e22cc9e16bcb02ad;hpb=7ff5653479c2bfc0794635f7fbade9bfe7bb2381;p=gitmo%2FMoose.git

diff --git a/t/050_metaclasses/004_moose_for_meta.t b/t/050_metaclasses/004_moose_for_meta.t
index d355dbc..bd415ee 100644
--- a/t/050_metaclasses/004_moose_for_meta.t
+++ b/t/050_metaclasses/004_moose_for_meta.t
@@ -3,11 +3,10 @@
 use strict;
 use warnings;
 
-use Test::More tests => 16;
+use Test::More;
 use Test::Exception;
 
 
-
 =pod
 
 This test demonstrates the ability to extend
@@ -18,9 +17,9 @@ Moose meta-level classes using Moose itself.
 {
     package My::Meta::Class;
     use Moose;
-    
+
     extends 'Moose::Meta::Class';
-    
+
     around 'create_anon_class' => sub {
         my $next = shift;
         my ($self, %options) = @_;
@@ -36,23 +35,23 @@ isa_ok($anon, 'Moose::Meta::Class');
 isa_ok($anon, 'Class::MOP::Class');
 
 is_deeply(
-    [ $anon->superclasses ], 
-    [ 'Moose::Object' ], 
+    [ $anon->superclasses ],
+    [ 'Moose::Object' ],
     '... got the default superclasses');
 
 {
     package My::Meta::Attribute::DefaultReadOnly;
     use Moose;
-    
+
     extends 'Moose::Meta::Attribute';
-    
+
     around 'new' => sub {
         my $next = shift;
         my ($self, $name, %options) = @_;
-        $options{is} = 'ro' 
+        $options{is} = 'ro'
             unless exists $options{is};
         $next->($self, $name, %options);
-    };    
+    };
 }
 
 {
@@ -77,3 +76,4 @@ is_deeply(
     ok($attr->has_accessor, '... the attribute does have an accessor (as expected)');
 }
 
+done_testing;