From: Shawn M Moore <sartak@gmail.com>
Date: Sun, 18 May 2008 11:00:09 +0000 (+0000)
Subject: No longer need to no strict 'refs'
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2374454bb3c441823f6279cc2f14d47df3b3c05c;p=gitmo%2FClass-MOP.git

No longer need to no strict 'refs'
---

diff --git a/examples/C3MethodDispatchOrder.pod b/examples/C3MethodDispatchOrder.pod
index a279e04..0ce9db2 100644
--- a/examples/C3MethodDispatchOrder.pod
+++ b/examples/C3MethodDispatchOrder.pod
@@ -25,12 +25,8 @@ C3MethodDispatchOrder->meta->add_around_method_modifier('initialize' => sub {
     my $meta = $cont->(@_);
     $meta->add_method('AUTOLOAD' => sub {
         my $meta = $_[0]->meta;
-        my $method_name;
-        {
-            no strict 'refs';
-            my $label = ${ $meta->get_package_symbol('$AUTOLOAD') };
-            $method_name = (split /\:\:/ => $label)[-1];
-        }
+        my $label = ${ $meta->get_package_symbol('$AUTOLOAD') };
+        my $method_name = (split /\:\:/ => $label)[-1];
         my $method = $_find_method->($meta, $method_name);
         (defined $method) || confess "Method ($method_name) not found";
         goto &$method;