summaryrefslogtreecommitdiff
path: root/x2p
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2002-07-16 17:56:17 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2002-07-16 17:56:17 +0000
commit52507950ff53d1e30142b93bc5dc60a0fa34b9e7 (patch)
treed4ba3034d2340da05c6d97b9bdd818fe9f513f71 /x2p
parentc214f4ad8bbb376b6ebfcb9c9173169f2cc8986f (diff)
downloadperl-52507950ff53d1e30142b93bc5dc60a0fa34b9e7.tar.gz
Remove the extra warning since after it the right thing
is attempted (and that gives a warning if necessary). p4raw-id: //depot/perl@17578
Diffstat (limited to 'x2p')
-rw-r--r--x2p/s2p.PL1
1 files changed, 0 insertions, 1 deletions
diff --git a/x2p/s2p.PL b/x2p/s2p.PL
index 0e8fa8f2a6..1e2ee1a6ac 100644
--- a/x2p/s2p.PL
+++ b/x2p/s2p.PL
@@ -17,7 +17,6 @@ sub link { # This is a cut-down version of installperl:link().
: die "Couldn't link $from to $to: $!\n";
};
if ($@) {
- warn $@;
require File::Copy;
File::Copy::copy($from, $to)
? $success++