From: Shawn M Moore Date: Sun, 8 Mar 2009 08:36:16 +0000 (-0400) Subject: Avoid depending on method modifiers again X-Git-Tag: 0.19~2 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b769bed50e2b29623083a7f66e8be1958a3405f4;p=gitmo%2FMouse.git Avoid depending on method modifiers again --- diff --git a/t/047-attribute-metaclass-role.t b/t/047-attribute-metaclass-role.t index db28fc6..7dbb2de 100644 --- a/t/047-attribute-metaclass-role.t +++ b/t/047-attribute-metaclass-role.t @@ -9,9 +9,9 @@ do { use Mouse; extends 'Mouse::Meta::Attribute'; - around 'create' => sub { - my ($next, @args) = @_; - my $attr = $next->(@args); + sub create { + my ($self, @args) = @_; + my $attr = $self->SUPER::create(@args); my %provides = %{$attr->{provides}}; my $method_constructors = { add => sub {