X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F200_examples%2F006_example_Protomoose.t;h=09a82aa46b2a82bb324327c45dfb1539df1ea432;hb=43131ee20ae3d0f9f941ff9c1826cd721449cb3a;hp=8b3d3cf10fce140f3051ea1c77406147b7fde225;hpb=d03bd989b97597428b460d7f9a021e2931893fa0;p=gitmo%2FMoose.git

diff --git a/t/200_examples/006_example_Protomoose.t b/t/200_examples/006_example_Protomoose.t
index 8b3d3cf..09a82aa 100644
--- a/t/200_examples/006_example_Protomoose.t
+++ b/t/200_examples/006_example_Protomoose.t
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 28;
+use Test::More;
 
 =pod
 
@@ -166,9 +166,9 @@ Well cause merlyn asked if it could :)
             ? $_[0]
             : $_[0]->meta->prototype_instance;
         my (undef, %params) = @_;
-    	my $self = $prototype->meta->clone_object($prototype, %params);
-    	$self->BUILDALL(\%params);
-    	return $self;
+        my $self = $prototype->meta->clone_object($prototype, %params);
+        $self->BUILDALL(\%params);
+        return $self;
     }
 }
 
@@ -280,4 +280,4 @@ is($foo->bar, 300, '... still got the original value stored in the instance (inh
 is(Foo->bar, 100, '... still got the original value stored in the prototype (through the Foo class)');
 is(Bar->bar, 100, '... still got the original value stored in the prototype (through the Bar class)');
 
-
+done_testing;