Fix tests and documents

[gitmo/Mouse.git] / t / 400-define-role.t

diff --git a/t/400-define-role.t b/t/400-define-role.t
index 47ac4ee..7067651 100644 (file)
--- a/t/400-define-role.t
+++ b/t/400-define-role.t
@@ -71,7 +71,8 @@ TODO: {
     eval {
         excludes 'excluded';
     };
-    local our $TODO = "Mouse::Role does not currently support 'excludes'";
+    our $TODO;
+    local $TODO = "Mouse::Role does not currently support 'excludes'";
     ::ok(!$@, "excludes");
 
     no Mouse::Role;