rename to new name scheme for native traits

[gitmo/Moose.git] / t / 070_attribute_traits / 209_trait_code.t

diff --git a/t/070_attribute_traits/209_trait_code.t b/t/070_attribute_traits/209_trait_code.t
deleted file mode 100644 (file)
index 832f48b..0000000
--- a/t/070_attribute_traits/209_trait_code.t
+++ /dev/null
@@ -1,24 +0,0 @@
-use strict;
-use warnings;
-
-use Test::More tests => 2;
-
-{
-    package Thingy;
-    use Moose;
-
-    has callback => (
-        traits => ['Code'],
-        is     => 'ro',
-        isa    => 'CodeRef',
-        required => 1,
-        handles => { 'invoke_callback' => 'execute' },
-    );
-}
-
-my $i = 0;
-my $thingy = Thingy->new(callback => sub { ++$i });
-
-is($i, 0);
-$thingy->invoke_callback;
-is($i, 1);