Explicitly return the DOES coderef if we install it

[gitmo/Role-Tiny.git] / t / role-duplication.t

diff --git a/t/role-duplication.t b/t/role-duplication.t
index 4227777..b44629c 100644 (file)
--- a/t/role-duplication.t
+++ b/t/role-duplication.t
@@ -4,11 +4,11 @@ use Test::More;
 
 {
   package Role; use Role::Tiny;
-  around foo => sub { my $orig = shift; 1 + $orig->(@_) };
-  package Base; sub foo { 1 }
+  sub foo { my $orig = shift; 1 + $orig->(@_) };
+  package BaseClass; sub foo { 1 }
 }
 
-eval { Role::Tiny->create_class_with_roles('Base', qw(Role Role)); };
+eval { Role::Tiny->create_class_with_roles('BaseClass', qw(Role Role)); };
 
 like $@, qr/Duplicated/, 'duplicate role detected';