Change 31758 by [EMAIL PROTECTED] on 2007/08/28 16:52:45
Subject: [PATCH] Revert/fix 31731 - Empty PATH taint test on Cygwin
From: "Jerry D. Hedden" <[EMAIL PROTECTED]>
Date: Tue, 28 Aug 2007 10:43:41 -0400
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/t/op/taint.t#86 edit
Differences ...
==== //depot/perl/t/op/taint.t#86 (xtext) ====
Index: perl/t/op/taint.t
--- perl/t/op/taint.t#85~31731~ 2007-08-18 01:01:15.000000000 -0700
+++ perl/t/op/taint.t 2007-08-28 09:52:45.000000000 -0700
@@ -150,17 +150,7 @@
};
}
}
- if ($Is_Cygwin and (! -f 'cygwin1.dll' or ! -f 'cygcrypt-0.dll')) {
- require File::Copy;
- -f 'cygwin1.dll' or File::Copy::copy("/usr/bin/cygwin1.dll", '.') or
- die "$0: failed to copy cygwin1.dll: $!\n";
- -f 'cygcyrypt-0.dll' or File::Copy::copy("/usr/bin/cygcrypt-0.dll", '.')
or
- die "$0: failed to copy cygcrypt-0.dll: $!\n";
- eval q{
- END { unlink "cygwin1.dll"; unlink "cygcrypt-0.dll"; }
- };
- }
- $ENV{PATH} = '';
+ $ENV{PATH} = ($Is_Cygwin) ? '/usr/bin' : '';
delete @[EMAIL PROTECTED];
$ENV{TERM} = 'dumb';
End of Patch.
