From: Josh Jore <jjore@cpan.org>
Date: Thu, 3 Feb 2011 01:00:36 +0000 (-0800)
Subject: Find Module/Metadata.pm in blib/arch before chdir() [RT #65380]
X-Git-Tag: release_1.0.4~1
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1abfcc9a431450a2dc73bc8e8d3f13700a1a6f3a;p=p5sagit%2FModule-Metadata.git

Find Module/Metadata.pm in blib/arch before chdir() [RT #65380]

Signed-off-by: David Golden <dagolden@cpan.org>
---

diff --git a/t/metadata.t b/t/metadata.t
index 7f5cd92..f3d08aa 100644
--- a/t/metadata.t
+++ b/t/metadata.t
@@ -177,6 +177,13 @@ plan tests => 37 + 2 * keys( %modules );
 
 require_ok('Module::Metadata');
 
+# class method C<find_module_by_name>
+my $module = Module::Metadata->find_module_by_name(
+               'Module::Metadata' );
+ok( -e $module, 'find_module_by_name() succeeds' );
+
+#########################
+
 my $tmp = MBTest->tmpdir;
 
 use DistGen;
@@ -185,13 +192,6 @@ $dist->regen;
 
 $dist->chdir_in;
 
-#########################
-
-# class method C<find_module_by_name>
-my $module = Module::Metadata->find_module_by_name(
-               'Module::Metadata' );
-ok( -e $module, 'find_module_by_name() succeeds' );
-
 
 # fail on invalid module name
 my $pm_info = Module::Metadata->new_from_module(