X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fop%2Fsubst_wamp.t;h=5e1b826ad44113b79b948d7440ab5f565ef5b275;hb=dc459aad73ffc3aaf43c03d9908415c433fd93ba;hp=ced5ee9ebbb4f032b4a1e707749f3d42ad4710ed;hpb=21f5a6076e634a7ee61d6f5aa4e44bf6708db9fb;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/t/op/subst_wamp.t b/t/op/subst_wamp.t
index ced5ee9..5e1b826 100755
--- a/t/op/subst_wamp.t
+++ b/t/op/subst_wamp.t
@@ -1,9 +1,9 @@
 #!./perl
 
 $dummy = defined $&;		# Now we have it...
-for $file ('op/subst.t', 't/op/subst.t') {
+for $file ('op/subst.t', 't/op/subst.t', ':op:subst.t') {
   if (-r $file) {
-    do "./$file";
+    do ($^O eq 'MacOS' ? $file : "./$file");
     exit;
   }
 }