# New Ticket Created by "Carl Mäsak"
# Please include the string: [perl #74696]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=74696 >
<jnthn> rakudo: role Drinking { method go-to-bar() { say "glug" } };
role Gymnastics { method go-to-bar() { say "ouch" } }; class
DrunkGymnast does Gymnastics does Drinking { method go-to-bar() {
self.Gymnastics::go-to-bar() } }; DrunkGymnast.new.go-to-bar
<p6eval> rakudo 0a04ef: OUTPUT«Method '!select' not found for invocant
of class 'DrunkGymnast' [...]
<jnthn> oh, damm
<jnthn> That's the bit that doesn't work.
<jnthn> :-/
<masak> odd error.
<jnthn> masak: file rakudobug
<jnthn> It should work.
* masak submits rakudobug
<jnthn> We don't have a ticket for it, and I'm not sure if it ever
worked on alpha either.
<masak> alpha: role Drinking { method go-to-bar() { say "glug" } };
role Gymnastics { method go-to-bar() { say "ouch" } }; class
DrunkGymnast does Gymnastics does Drinking { method go-to-bar() {
self.Gymnastics::go-to-bar() } }; DrunkGymnast.new.go-to-bar
<p6eval> alpha 30e0ed: OUTPUT«Method '!select' not found for invocant
of class 'DrunkGymnast' [...]
<masak> it didn't.
