summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLUtils.pm
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2021-01-14 23:27:16 +0000
committerKarl Berry <karl@freefriends.org>2021-01-14 23:27:16 +0000
commit348e25a4350b66df4cade81979a31a80bf0b50b9 (patch)
treef43147ceae6e5de0ebcb40b636b1f7ae6bb16134 /Master/tlpkg/TeXLive/TLUtils.pm
parent99e14824d512341935d281a980a7576a30346a60 (diff)
(_create_config_files): use our own copy() fn
instead of File::Copy::copy. git-svn-id: svn://tug.org/texlive/trunk@57421 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLUtils.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index c1810a76a6f..6f31356cca7 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -225,7 +225,6 @@ BEGIN {
use Cwd;
use Getopt::Long;
use File::Temp;
-use File::Copy qw//;
use TeXLive::TLConfig;
@@ -3202,7 +3201,7 @@ sub _create_config_files {
}
if ($usermode && -e $dest) {
tlwarn("Updating $dest, backup copy in $dest.backup\n");
- File::Copy::copy($dest, "$dest.backup");
+ copy("-f", $dest, "$dest.backup");
}
open(OUTFILE,">$dest")
or die("Cannot open $dest for writing: $!");