Rename a test directry name to be clear
[gitmo/Mouse.git] / t / 900_bug / 007_RT56523.t
diff --git a/t/900_bug/007_RT56523.t b/t/900_bug/007_RT56523.t
deleted file mode 100644 (file)
index cda8ed4..0000000
+++ /dev/null
@@ -1,37 +0,0 @@
-#!/usr/bin/perl
-use strict;
-use Test::More;
-#warn $Mouse::VERSION;
-{
-    package Foo;
-
-    use Mouse;
-
-    has thing => (
-        reader        => 'thing',
-        writer        => 'set_thing',
-        builder       => '_build_thing',
-        lazy          => 1,
-    );
-
-    sub _build_thing {
-        42;
-    }
-}
-
-# Get them set
-{
-    my $obj = Foo->new;
-    is $obj->thing, 42;
-    $obj->set_thing( 23 );
-    is $obj->thing, 23;
-}
-
-# Set then get
-{
-    my $obj = Foo->new;
-    $obj->set_thing(23);
-    is $obj->thing, 23;
-}
-
-done_testing();