remove useless use_ok tests
[gitmo/Moose.git] / t / 070_attribute_helpers / 020_remove_attribute.t
index 08f4662..dcd3df8 100644 (file)
@@ -3,23 +3,20 @@
 use strict;
 use warnings;
 
-use Test::More tests => 12;
+use Test::More tests => 11;
 use Test::Exception;
 
-BEGIN {
-    use_ok('Moose::AttributeHelpers');
-}
-
 {
     package MyHomePage;
     use Moose;
+    use Moose::AttributeHelpers;
 
     has 'counter' => (
-        traits    => [ 'Counter' ],
-        is        => 'ro',
-        isa       => 'Int',
-        default   => sub { 0 },
-        handles   => {
+        traits  => ['Counter'],
+        is      => 'ro',
+        isa     => 'Int',
+        default => 0,
+        handles => {
             inc_counter   => 'inc',
             dec_counter   => 'dec',
             reset_counter => 'reset',
@@ -28,9 +25,9 @@ BEGIN {
 }
 
 my $page = MyHomePage->new();
-isa_ok($page, 'MyHomePage');
+isa_ok( $page, 'MyHomePage' );
 
-can_ok($page, $_) for qw[
+can_ok( $page, $_ ) for qw[
     counter
     dec_counter
     inc_counter
@@ -38,17 +35,16 @@ can_ok($page, $_) for qw[
 ];
 
 lives_ok {
-    $page->meta->remove_attribute('counter')
-} '... removed the counter attribute okay';
+    $page->meta->remove_attribute('counter');
+}
+'... removed the counter attribute okay';
 
-ok(!$page->meta->has_attribute('counter'), '... no longer has the attribute');
+ok( !$page->meta->has_attribute('counter'),
+    '... no longer has the attribute' );
 
-ok(!$page->can($_), "... our class no longer has the $_ method") for qw[
+ok( !$page->can($_), "... our class no longer has the $_ method" ) for qw[
     counter
     dec_counter
     inc_counter
     reset_counter
 ];
-
-
-