Cleanup

[gitmo/Mouse.git] / t / 800_shikabased / 013-compatibility-get_method_list.t

diff --git a/t/800_shikabased/013-compatibility-get_method_list.t b/t/800_shikabased/013-compatibility-get_method_list.t
index 1fd9a2f..d43247c 100644 (file)
--- a/t/800_shikabased/013-compatibility-get_method_list.t
+++ b/t/800_shikabased/013-compatibility-get_method_list.t
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 use Test::More;
-plan skip_all => "This test requires Moose 0.81" unless eval { require Moose; Moose->VERSION(0.81); };
+plan skip_all => "This test requires Moose 0.90" unless eval { require Moose; Moose->VERSION(0.90); };
 plan tests => 6;
 
 test($_) for qw/Moose Mouse/;
@@ -12,12 +12,14 @@ sub test {
     eval <<"...";
 {
     package ${class}Class;
+    use Carp; # import external functions (not our methods)
     use ${class};
     sub foo { }
     no ${class};
 }
 {
     package ${class}ClassImm;
+    use Carp; # import external functions (not our methods)
     use ${class};
     sub foo { }
     no ${class};
@@ -25,8 +27,10 @@ sub test {
 }
 {
     package ${class}Role;
+    use Carp; # import external functions (not our methods)
     use ${class}::Role;
     sub bar { }
+    no ${class}::Role;
 }
 ...
     die $@ if $@;