Fix {%hash} ~~ %hash test

[p5sagit/p5-mst-13.2.git] / t / Module_Pluggable / 12onlyarray.t

diff --git a/t/Module_Pluggable/12onlyarray.t b/t/Module_Pluggable/12onlyarray.t
index 5ecc654..a37e777 100644 (file)
--- a/t/Module_Pluggable/12onlyarray.t
+++ b/t/Module_Pluggable/12onlyarray.t
@@ -2,7 +2,7 @@
 
 use strict;
 use FindBin;
-use lib "$FindBin::Bin/lib";
+use lib (($FindBin::Bin."/lib")=~/^(.*)$/);
 use Test::More tests => 10;
 
 {