X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=t%2F990_deprecated%2F044-attribute-metaclass.t;h=8a3eb9f580cea6769678c7f5a49828052b9da0ae;hp=01786eb00b3f6519138f3f683ef9aeec4e6ef59e;hb=346a3ab8a10ac61eae8021ccfd068d80ccccd56a;hpb=267711f78bd79835875f805447d3ab802a18f0c4 diff --git a/t/990_deprecated/044-attribute-metaclass.t b/t/990_deprecated/044-attribute-metaclass.t index 01786eb..8a3eb9f 100644 --- a/t/990_deprecated/044-attribute-metaclass.t +++ b/t/990_deprecated/044-attribute-metaclass.t @@ -31,14 +31,14 @@ do { return $attr; }; - around 'canonicalize_args' => sub { - my ($next, $self, $name, %args) = @_; - - %args = $next->($self, $name, %args); - $args{is} = 'rw' unless exists $args{is}; - - return %args; - }; + around 'canonicalize_args' => sub { + my ($next, $self, $name, %args) = @_; + + %args = $next->($self, $name, %args); + $args{is} = 'rw' unless exists $args{is}; + + return %args; + }; package # hide me from search.cpan.org Mouse::Meta::Attribute::Custom::Number;