| Subject: | Roles |
Hi Toby,
Seems roles are broken:
package Test {
use Zydeco;
class Thing {
with Okay;
factory test {
my $c = $class->new;
# $c->one('test');
return $c;
}
method three { 'three' }
}
role Okay {
has one (type => Str);
method two { return $self->one; }
}
}
use feature qw/say/;
my $thing = Test->test;
say $thing->three;
say $thing->two;