develooper Front page | perl.perl5.porters | Postings from February 2006

[PATCH] op/magic failure on cygwin after 1.5.19-4

Thread Next
From:
Yitzchak Scott-Thoennes
Date:
February 20, 2006 11:09
Subject:
[PATCH] op/magic failure on cygwin after 1.5.19-4
Message ID:
20060220190933.GA1316@efn.org
In snapshots released after cygwin 1.5.19-4, $^X now includes .exe.
Adjust op/magic.t to suit.  (Patch is harmless for earlier versions
of cygwin.)

--- perl/t/op/magic.t.orig	2005-12-20 12:52:58.000000000 -0800
+++ perl/t/op/magic.t	2006-02-20 10:29:29.156250000 -0800
@@ -257,7 +257,7 @@
     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`");

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About