From: Jim Cromie <jcromie@cpan.org>
Date: Mon, 8 Jul 2002 19:23:38 +0000 (-0400)
Subject: patch against   t/op/magic.t
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c3e0e61a76f0014fd5a0eaa46e3304c65816b46d;p=p5sagit%2Fp5-mst-13.2.git

patch against   t/op/magic.t
Message-ID: <3D2A1EFA.8050603@divsol.com>

p4raw-id: //depot/perl@17427
---

diff --git a/t/op/magic.t b/t/op/magic.t
index ab0544e..a85ff6b 100755
--- a/t/op/magic.t
+++ b/t/op/magic.t
@@ -201,6 +201,9 @@ EOT
     elsif ($Is_VMS) {
       $script = "[]show-shebang";
     }
+    else {
+      $script = "./show-shebang";
+    }
     if ($^O eq 'os390' or $^O eq 'posix-bc' or $^O eq 'vmesa') {  # no shebang
 	$headmaybe = <<EOH ;
     eval 'exec ./perl -S \$0 \${1+"\$\@"}'