Explicitly return the DOES coderef if we install it

Moo::Role needs to name it if Sub::Name is installed, so make it clear
that the return value is deliberate.

diff --git a/lib/Role/Tiny.pm b/lib/Role/Tiny.pm
index f3d7333..1bd95c3 100644 (file)
--- a/lib/Role/Tiny.pm
+++ b/lib/Role/Tiny.pm
@@ -426,7 +426,7 @@ sub _install_does {
     Role::Tiny::does_role($proto, $role) or $proto->$existing($role);
   };
   no warnings 'redefine';
-  *{_getglob "${to}::DOES"} = $new_sub;
+  return *{_getglob "${to}::DOES"} = $new_sub;
 }
 
 sub does_role {