Fix {%hash} ~~ %hash test

[p5sagit/p5-mst-13.2.git] / t / Module_Pluggable / 04acmedir.t

diff --git a/t/Module_Pluggable/04acmedir.t b/t/Module_Pluggable/04acmedir.t
index 7154486..e2572fe 100644 (file)
--- a/t/Module_Pluggable/04acmedir.t
+++ b/t/Module_Pluggable/04acmedir.t
@@ -2,7 +2,7 @@
 
 use strict;
 use FindBin;
-use lib "$FindBin::Bin/lib";
+use lib (($FindBin::Bin."/lib")=~/^(.*)$/);
 use Test::More tests => 3;