Convert all tests to done_testing.

[gitmo/Moose.git] / t / 070_native_traits / 202_trait_array.t

diff --git a/t/070_native_traits/202_trait_array.t b/t/070_native_traits/202_trait_array.t
index 4d6b755..fc8500f 100644 (file)
--- a/t/070_native_traits/202_trait_array.t
+++ b/t/070_native_traits/202_trait_array.t
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 68;
+use Test::More;
 use Test::Exception;
 use Test::Moose 'does_ok';
 
@@ -27,17 +27,17 @@ my $sort;
             'get_option_at'         => 'get',
             'set_option_at'         => 'set',
             'num_options'           => 'count',
-            'has_no_options'        => 'empty',
+            'has_no_options'        => 'is_empty',
             'clear_options'         => 'clear',
             'splice_options'        => 'splice',
             'sort_options_in_place' => 'sort_in_place',
             'option_accessor'       => 'accessor',
             'add_options_with_speed' =>
-                [ 'push' => [ 'funrolls', 'funbuns' ] ],
+                [ 'push' => 'funrolls', 'funbuns' ],
             'prepend_prerequisites_along_with' =>
-                [ 'unshift' => [ 'first', 'second' ] ],
+                [ 'unshift' => 'first', 'second' ],
             'descending_options' =>
-                [ 'sort_in_place' => [ $sort = sub { $_[1] <=> $_[0] } ] ],
+                [ 'sort_in_place' => ($sort = sub { $_[1] <=> $_[0] }) ],
         }
     );
 }
@@ -255,20 +255,20 @@ is_deeply(
         'get_option_at'         => 'get',
         'set_option_at'         => 'set',
         'num_options'           => 'count',
-        'has_no_options'        => 'empty',
+        'has_no_options'        => 'is_empty',
         'clear_options'         => 'clear',
         'splice_options'        => 'splice',
         'sort_options_in_place' => 'sort_in_place',
         'option_accessor'       => 'accessor',
-        'add_options_with_speed' =>
-            [ 'push' => [ 'funrolls', 'funbuns' ] ],
+        'add_options_with_speed' => [ 'push' => 'funrolls', 'funbuns' ],
         'prepend_prerequisites_along_with' =>
-            [ 'unshift' => [ 'first', 'second' ] ],
-        'descending_options' =>
-            [ 'sort_in_place' => [$sort] ],
+            [ 'unshift' => 'first', 'second' ],
+        'descending_options' => [ 'sort_in_place' => $sort ],
     },
     '... got the right handles mapping'
 );
 
 is( $options->type_constraint->type_parameter, 'Str',
     '... got the right container type' );
+
+done_testing;