support Mouse->import({into_level => 1}).

[gitmo/Mouse.git] / t / lib / BaseClass.pm

diff --git a/t/lib/BaseClass.pm b/t/lib/BaseClass.pm
new file mode 100644 (file)
index 0000000..644bed1
--- /dev/null
+++ b/t/lib/BaseClass.pm
@@ -0,0 +1,10 @@
+package BaseClass;
+use Mouse;
+
+sub import {
+    my $pkg = caller(0);
+    Mouse->import({into_level => 1});
+    $pkg->meta->add_method('foo' => sub {'bar'});
+}
+
+1;