extra test from FAIL_modify_lazy_handlers

[gitmo/Moo.git] / t / lib / ClassicObject.pm

diff --git a/t/lib/ClassicObject.pm b/t/lib/ClassicObject.pm
new file mode 100644 (file)
index 0000000..1df3a04
--- /dev/null
+++ b/t/lib/ClassicObject.pm
@@ -0,0 +1,10 @@
+package ClassicObject;
+
+sub new {
+    my ($class, %args) = @_;
+    bless \%args, 'ClassicObject';
+}
+
+sub connect { 'a' }
+
+1;