Fix {%hash} ~~ %hash test

[p5sagit/p5-mst-13.2.git] / t / Module_Pluggable / 14package.t

diff --git a/t/Module_Pluggable/14package.t b/t/Module_Pluggable/14package.t
index 3ba56ed..aaca94c 100644 (file)
--- a/t/Module_Pluggable/14package.t
+++ b/t/Module_Pluggable/14package.t
@@ -2,7 +2,7 @@
 
 use strict;
 use FindBin;
-use lib "$FindBin::Bin/lib";
+use lib (($FindBin::Bin."/lib")=~/^(.*)$/);
 use Test::More tests => 5;
 
 my $foo;