Rename a test directry name to be clear

[gitmo/Mouse.git] / t / 900_bug / 008_RT56837.t

diff --git a/t/900_bug/008_RT56837.t b/t/900_bug/008_RT56837.t
deleted file mode 100644 (file)
index ece5fb1..0000000
--- a/t/900_bug/008_RT56837.t
+++ /dev/null
@@ -1,28 +0,0 @@
-#!perl
-# This test is contributed by Sanko Robinson.
-# https://rt.cpan.org/Public/Bug/Display.html?id=56837
-# "Role application to instance with init_arg'd attributes"
-use strict;
-use Test::More tests => 2;
-
-{
-    package Admin;
-    use Mouse::Role;
-    sub shutdown {1}
-}
-{
-    package User;
-    use Mouse;
-    has 'name' =>
-        (isa => 'Str', is => 'ro', init_arg => 'Name', required => 1);
-}
-
-package main;
-my $tim = User->new(Name => 'Tim');
-
-Admin->meta->apply($tim);
-
-ok($tim->can('shutdown'),
-    'The role was successfully composed at the object level');
-is($tim->name, 'Tim',
-    '... attribute with init_arg was re-initialized correctly');