[Catalyst-commits] r10028 - Catalyst-Runtime/5.80/trunk/lib/Catalyst

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-05-07 00:15:19 +0000 (Thu, 07 May 2009)
New Revision: 10028

Modified:
   Catalyst-Runtime/5.80/trunk/lib/Catalyst/Dispatcher.pm
Log:
Nuke warning, my bad

Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst/Dispatcher.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst/Dispatcher.pm	2009-05-07 00:13:23 UTC (rev 10027)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst/Dispatcher.pm	2009-05-07 00:15:19 UTC (rev 10028)
@@ -707,7 +707,6 @@
         my %package_hash; # Only warn once per method, per package. These are infrequent enough that
                           # I haven't provided a way to disable them, patches welcome.
         $meta->add_before_method_modifier($public_method_name, sub {
-            my $class = blessed(shift);
             my $class = caller(2);
             chomp($class);
             $package_hash{$class}++ || do {