From: gfx <gfuji@cpan.org>
Date: Wed, 15 Jul 2009 04:14:00 +0000 (+0900)
Subject: Move __class_to_pmfile() in load_first_existing_class() to a correct place
X-Git-Tag: 0.90~22
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a3f2cdc0c581b84f6dfaff6e0bba2d3460246f3e;p=gitmo%2FClass-MOP.git

Move __class_to_pmfile() in load_first_existing_class() to a correct place
---

diff --git a/lib/Class/MOP.pm b/lib/Class/MOP.pm
index e3c38ff..2b118d8 100644
--- a/lib/Class/MOP.pm
+++ b/lib/Class/MOP.pm
@@ -92,10 +92,10 @@ sub load_first_existing_class {
     my $found;
     my %exceptions;
     for my $class (@classes) {
-        my $pmfile = _class_to_pmfile($class);
         my $e = _try_load_one_class($class);
 
         if ($e) {
+            my $pmfile = _class_to_pmfile($class);
             $exceptions{$class} = $e;
             last if $e !~ /^Can't locate \Q$pmfile\E in \@INC/;
         }