Add second location to search for t to test

timj · Jan 26, 2015 · 4293db8 · 4293db8
1 parent 3c8105a
commit 4293db8
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 1 deletion.
diff --git a/t/c/file1 b/t/c/file1
diff --git a/t/search.t b/t/search.t
@@ -58,7 +58,7 @@ is($full[0], $compat[0], "backcompat matches normal file2");
 is($full[1], $compat[1], "backcompat matches normal file2");
 
 # Search for a directory
-setpath( "MYPATH", File::Spec->curdir );
+setpath( "MYPATH", File::Spec->catdir(File::Spec->curdir, "blib"), File::Spec->curdir );
 $fullpath = File::SearchPath::searchpath( "t", dir => 1, env => "MYPATH");
 is( $fullpath, File::Spec->catdir(File::Spec->curdir, "t"), "Found directory");