From: Karen Etheridge Date: Sun, 15 Sep 2013 19:38:51 +0000 (-0700) Subject: include the expected location in the test name, for diagnosing mysterious failures X-Git-Tag: 1.008018~4 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5da9706a04aec9da59a228cabbb3ac78b962a480;p=p5sagit%2Flocal-lib.git include the expected location in the test name, for diagnosing mysterious failures --- diff --git a/t/install.t b/t/install.t index 2ac49cc..100834f 100644 --- a/t/install.t +++ b/t/install.t @@ -32,10 +32,9 @@ SKIP: for my $dist_type (qw(EUMM MB)) { } }; diag $stdout, $stderr if $@; } + my $file = File::Spec->catfile($dir, qw(lib perl5), "$dist_type.pm"); ok( - -e File::Spec->catfile( - $dir, qw(lib perl5), "$dist_type.pm", - ), - "$dist_type.pm installed into the correct location", + -e $file, + "$dist_type.pm installed as $file", ); }