X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xt%2Fmoose-method-modifiers.t;h=2d49a8bfb201bb7e64e1b0c50abb5d9951f9a472;hb=6ef0fa6f8b9af7c4060b314eb632813b118973c6;hp=89c9891363cfb154edcd676c3fbe1ab835f10a9a;hpb=d86853e0debad21bad01d268a3f7429d6aa902c3;p=gitmo%2FMoo.git

diff --git a/xt/moose-method-modifiers.t b/xt/moose-method-modifiers.t
index 89c9891..2d49a8b 100644
--- a/xt/moose-method-modifiers.t
+++ b/xt/moose-method-modifiers.t
@@ -4,7 +4,7 @@ use Test::More;
 use Moo::HandleMoose;
 
 {
-   package FooAttr;
+   package ModifyFoo;
    use Moo::Role;
 
    our $before_ran = 0;
@@ -16,12 +16,12 @@ use Moo::HandleMoose;
    around foo => sub {
       my ($orig, $self, @rest) = @_;
       $self->$orig(@rest);
-      $after_ran = 1;
+      $around_ran = 1;
    };
 
    package Bar;
    use Moose;
-   with 'FooAttr';
+   with 'ModifyFoo';
 
    sub foo { }
 }