DEATH TO ALL zionist ELLIPSES

[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 25afb92..3272c7a 100644 (file)
--- a/t/070_native_traits/202_trait_array.t
+++ b/t/070_native_traits/202_trait_array.t
@@ -59,72 +59,72 @@ can_ok( $stuff, $_ ) for qw[
     option_accessor
 ];
 
-is_deeply( $stuff->options, [ 10, 12 ], '... got options' );
+is_deeply( $stuff->options, [ 10, 12 ], 'got options' );
 
-ok( !$stuff->has_no_options, '... we have options' );
-is( $stuff->num_options, 2, '... got 2 options' );
+ok( !$stuff->has_no_options, 'we have options' );
+is( $stuff->num_options, 2, 'got 2 options' );
 
-is( $stuff->remove_last_option,  12, '... removed the last option' );
-is( $stuff->remove_first_option, 10, '... removed the last option' );
+is( $stuff->remove_last_option,  12, 'removed the last option' );
+is( $stuff->remove_first_option, 10, 'removed the last option' );
 
-is_deeply( $stuff->options, [], '... no options anymore' );
+is_deeply( $stuff->options, [], 'no options anymore' );
 
-ok( $stuff->has_no_options, '... no options' );
-is( $stuff->num_options, 0, '... got no options' );
+ok( $stuff->has_no_options, 'no options' );
+is( $stuff->num_options, 0, 'got no options' );
 
 lives_ok {
     $stuff->add_options( 1, 2, 3 );
 }
-'... set the option okay';
+'set the option okay';
 
-is_deeply( $stuff->options, [ 1, 2, 3 ], '... got options now' );
+is_deeply( $stuff->options, [ 1, 2, 3 ], 'got options now' );
 
-ok( !$stuff->has_no_options, '... has options' );
-is( $stuff->num_options, 3, '... got 3 options' );
+ok( !$stuff->has_no_options, 'has options' );
+is( $stuff->num_options, 3, 'got 3 options' );
 
-is( $stuff->get_option_at(0), 1, '... get option at index 0' );
-is( $stuff->get_option_at(1), 2, '... get option at index 1' );
-is( $stuff->get_option_at(2), 3, '... get option at index 2' );
+is( $stuff->get_option_at(0), 1, 'get option at index 0' );
+is( $stuff->get_option_at(1), 2, 'get option at index 1' );
+is( $stuff->get_option_at(2), 3, 'get option at index 2' );
 
 lives_ok {
     $stuff->set_option_at( 1, 100 );
 }
-'... set the option okay';
+'set the option okay';
 
-is( $stuff->get_option_at(1), 100, '... get option at index 1' );
+is( $stuff->get_option_at(1), 100, 'get option at index 1' );
 
 lives_ok {
     $stuff->add_options( 10, 15 );
 }
-'... set the option okay';
+'set the option okay';
 
 is_deeply( $stuff->options, [ 1, 100, 3, 10, 15 ],
-    '... got more options now' );
+    'got more options now' );
 
-is( $stuff->num_options, 5, '... got 5 options' );
+is( $stuff->num_options, 5, 'got 5 options' );
 
-is( $stuff->remove_last_option, 15, '... removed the last option' );
+is( $stuff->remove_last_option, 15, 'removed the last option' );
 
-is( $stuff->num_options, 4, '... got 4 options' );
-is_deeply( $stuff->options, [ 1, 100, 3, 10 ], '... got diff options now' );
+is( $stuff->num_options, 4, 'got 4 options' );
+is_deeply( $stuff->options, [ 1, 100, 3, 10 ], 'got diff options now' );
 
 lives_ok {
     $stuff->insert_options( 10, 20 );
 }
-'... set the option okay';
+'set the option okay';
 
-is( $stuff->num_options, 6, '... got 6 options' );
+is( $stuff->num_options, 6, 'got 6 options' );
 is_deeply( $stuff->options, [ 10, 20, 1, 100, 3, 10 ],
-    '... got diff options now' );
+    'got diff options now' );
 
-is( $stuff->get_option_at(0), 10,  '... get option at index 0' );
-is( $stuff->get_option_at(1), 20,  '... get option at index 1' );
-is( $stuff->get_option_at(3), 100, '... get option at index 3' );
+is( $stuff->get_option_at(0), 10,  'get option at index 0' );
+is( $stuff->get_option_at(1), 20,  'get option at index 1' );
+is( $stuff->get_option_at(3), 100, 'get option at index 3' );
 
-is( $stuff->remove_first_option, 10, '... getting the first option' );
+is( $stuff->remove_first_option, 10, 'getting the first option' );
 
-is( $stuff->num_options,      5,  '... got 5 options' );
-is( $stuff->get_option_at(0), 20, '... get option at index 0' );
+is( $stuff->num_options,      5,  'got 5 options' );
+is( $stuff->get_option_at(0), 20, 'get option at index 0' );
 
 $stuff->clear_options;
 is_deeply( $stuff->options, [], "... clear options" );
@@ -143,7 +143,7 @@ $stuff->add_options( 5, 1, 2, 3 );
 lives_ok {
     $stuff->descending_options();
 }
-'... curried sort in place lives ok';
+'curried sort in place lives ok';
 
 is_deeply( $stuff->options, [ 5, 3, 2, 1 ], "... sort currying" );
 
@@ -156,12 +156,12 @@ $stuff->clear_options;
 lives_ok {
     $stuff->add_options('tree');
 }
-'... set the options okay';
+'set the options okay';
 
 lives_ok {
     $stuff->add_options_with_speed( 'compatible', 'safe' );
 }
-'... add options with speed okay';
+'add options with speed okay';
 
 is_deeply(
     $stuff->options, [qw/tree funrolls funbuns compatible safe/],
@@ -171,7 +171,7 @@ is_deeply(
 lives_ok {
     $stuff->prepend_prerequisites_along_with();
 }
-'... add prerequisite options okay';
+'add prerequisite options okay';
 
 $stuff->clear_options;
 $stuff->add_options( 1, 2 );
@@ -179,7 +179,7 @@ $stuff->add_options( 1, 2 );
 lives_ok {
     $stuff->splice_options( 1, 0, 'foo' );
 }
-'... splice_options works';
+'splice_options works';
 
 is_deeply(
     $stuff->options, [ 1, 'foo', 2 ],
@@ -193,52 +193,52 @@ is( $stuff->option_accessor(1), 'foo++' );
 
 #dies_ok {
 #    $stuff->insert_options(undef);
-#} '... could not add an undef where a string is expected';
+#} 'could not add an undef where a string is expected';
 #
 #dies_ok {
 #    $stuff->set_option(5, {});
-#} '... could not add a hash ref where a string is expected';
+#} 'could not add a hash ref where a string is expected';
 
 dies_ok {
     Stuff->new( options => [ undef, 10, undef, 20 ] );
 }
-'... bad constructor params';
+'bad constructor params';
 
 dies_ok {
     my $stuff = Stuff->new();
     $stuff->add_options(undef);
 }
-'... rejects push of an invalid type';
+'rejects push of an invalid type';
 
 dies_ok {
     my $stuff = Stuff->new();
     $stuff->insert_options(undef);
 }
-'... rejects unshift of an invalid type';
+'rejects unshift of an invalid type';
 
 dies_ok {
     my $stuff = Stuff->new();
     $stuff->set_option_at( 0, undef );
 }
-'... rejects set of an invalid type';
+'rejects set of an invalid type';
 
 dies_ok {
     my $stuff = Stuff->new();
     $stuff->sort_in_place_options(undef);
 }
-'... sort rejects arg of invalid type';
+'sort rejects arg of invalid type';
 
 dies_ok {
     my $stuff = Stuff->new();
     $stuff->option_accessor();
 }
-'... accessor rejects 0 args';
+'accessor rejects 0 args';
 
 dies_ok {
     my $stuff = Stuff->new();
     $stuff->option_accessor( 1, 2, 3 );
 }
-'... accessor rejects 3 args';
+'accessor rejects 3 args';
 
 ## test the meta
 
@@ -265,8 +265,8 @@ is_deeply(
             [ 'unshift' => 'first', 'second' ],
         'descending_options' => [ 'sort_in_place' => $sort ],
     },
-    '... got the right handles mapping'
+    'got the right handles mapping'
 );
 
 is( $options->type_constraint->type_parameter, 'Str',
-    '... got the right container type' );
+    'got the right container type' );