# New Ticket Created by Rob Hoelz
# Please include the string: [perl #125304]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=125304 >
As seen in S26-documentation/block-leading.t and
S26-documentation/block-trailing.t:
> role Boxer {
> #|{Robert De Niro}
> method actor { }
> }
>
> my $method = Boxer.^find_method('actor');
> say $method.WHY; # should be "Robert De Niro"
>
> =begin output
> (Any)
> =end output
This test has been failing since d9246fdab869d799f9b28552e2c6a7c16a0a4810,
because that commit made .^ no longer pun roles. Role puns successfully return
a Method whose WHY is correct; RolePunning.find_method returns a wrapper code
that has no WHY. Unfortunately, since the wrapper is an NQP anonymous
function, we can't set its WHY.
