diff options
author | Yitzchak Scott-Thoennes <sthoenna@efn.org> | 2006-02-20 03:09:33 -0800 |
---|---|---|
committer | Steve Peters <steve@fisharerojo.org> | 2006-02-20 23:01:41 +0000 |
commit | 4bbb71267116eb89ad713505b2cb1ec776c520e0 (patch) | |
tree | c1fc4185c8f5c22e14869afa36b617386e4e9a56 /t/op/magic.t | |
parent | 232d1c150c060ca27ef1d2d4770fed5de0e66c01 (diff) | |
download | perl-4bbb71267116eb89ad713505b2cb1ec776c520e0.tar.gz |
op/magic failure on cygwin after 1.5.19-4
Message-ID: <20060220190933.GA1316@efn.org>
p4raw-id: //depot/perl@27252
Diffstat (limited to 't/op/magic.t')
-rwxr-xr-x | t/op/magic.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/magic.t b/t/op/magic.t index b28a082e79..294beb0209 100755 --- a/t/op/magic.t +++ b/t/op/magic.t @@ -257,7 +257,7 @@ EOF s{\\}{/}g; ok((($Is_MSWin32 || $Is_os2) ? uc($_) eq uc($s1) : $_ eq $s1), " :$_:!=:$s1:"); $_ = `$perl $script`; - s/\.exe//i if $Is_Dos or $Is_os2; + s/\.exe//i if $Is_Dos or $Is_os2 or $Is_Cygwin; s{./$perl}{$perl} if $Is_BeOS; # revert BeOS execvp() side-effect s{\\}{/}g; ok((($Is_MSWin32 || $Is_os2) ? uc($_) eq uc($s1) : $_ eq $s1), " :$_:!=:$s1: after `$perl $script`"); |