Sub::Install is not used anywhere; was added for no apparent reason

[gitmo/MooseX-Types.git] / t / 12_wrapper-definition.t

diff --git a/t/12_wrapper-definition.t b/t/12_wrapper-definition.t
index f2d0f77..1b7c189 100644 (file)
--- a/t/12_wrapper-definition.t
+++ b/t/12_wrapper-definition.t
@@ -17,8 +17,6 @@ my @tests = (
     [ 'Str',         'Str',                      12, "12", [], "foo", [777] ],
 );
 
-plan tests => (@tests * 9);
-
 # new array ref so we can safely shift from it
 for my $data (map { [@$_] } @tests) {
     my $type = shift @$data;
@@ -31,7 +29,7 @@ for my $data (map { [@$_] } @tests) {
     }
 
     # coercion handler export
-    {   
+    {
         my ($coerce, $coercion_result, $cannot_coerce) = map { shift @$data } 1 .. 3;
         ok my $code = __PACKAGE__->can("to_$type"), "to_$type() coercion was exported";
         is_deeply scalar $code->($coerce), $coercion_result, "to_$type() coercion works";
@@ -49,4 +47,4 @@ for my $data (map { [@$_] } @tests) {
     }
 }
 
-
+done_testing;