Change 13597 by jhi@alpha on 2001/12/10 13:33:51
Retract #13596, #13593 should do the trick.
Affected files ...
.... //depot/perl/t/op/stat.t#47 edit
Differences ...
==== //depot/perl/t/op/stat.t#47 (xtext) ====
Index: perl/t/op/stat.t
--- perl/t/op/stat.t.~1~ Mon Dec 10 06:45:05 2001
+++ perl/t/op/stat.t Mon Dec 10 06:45:05 2001
@@ -309,11 +309,6 @@
ok(-T 'op/stat.t', '-T');
ok(! -B 'op/stat.t', '!-B');
-# Its like this. stat on Cygwin treats 'perl' to mean 'perl.exe'. So
-# all the file test operators work that way except -B and -T which
-# has to actually open the file. open doesn't do the .exe magic.
-$Perl .= $Config{_exe} if $Is_Cygwin and $Perl !~ /$Config{_exe}$/;
-
ok(-B $Perl, '-B');
ok(! -T $Perl, '!-T');
End of Patch.