Remove useless load test and renumber other tests so this dir looks like other test...
[gitmo/Moose.git] / t / 070_native_traits / 020_remove_attribute.t
diff --git a/t/070_native_traits/020_remove_attribute.t b/t/070_native_traits/020_remove_attribute.t
deleted file mode 100644 (file)
index 5e9305d..0000000
+++ /dev/null
@@ -1,51 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-
-use Test::More;
-use Test::Exception;
-
-{
-    package MyHomePage;
-    use Moose;
-
-    has 'counter' => (
-        traits  => ['Counter'],
-        is      => 'ro',
-        isa     => 'Int',
-        default => 0,
-        handles => {
-            inc_counter   => 'inc',
-            dec_counter   => 'dec',
-            reset_counter => 'reset',
-        }
-    );
-}
-
-my $page = MyHomePage->new();
-isa_ok( $page, 'MyHomePage' );
-
-can_ok( $page, $_ ) for qw[
-    counter
-    dec_counter
-    inc_counter
-    reset_counter
-];
-
-lives_ok {
-    $page->meta->remove_attribute('counter');
-}
-'... removed the counter attribute okay';
-
-ok( !$page->meta->has_attribute('counter'),
-    '... no longer has the attribute' );
-
-ok( !$page->can($_), "... our class no longer has the $_ method" ) for qw[
-    counter
-    dec_counter
-    inc_counter
-    reset_counter
-];
-
-done_testing;