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

diff --git a/t/op/subst_wamp.t b/t/op/subst_wamp.t
index b716b30..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;
   }
 }