included in trunk

git-svn-id: svn://tug.org/texlive/trunk@22470 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 0 insertions, 39 deletions

diff --git a/Master/tlpkg/dev/dev.tempfile-for-tlpdb.patch b/Master/tlpkg/dev/dev.tempfile-for-tlpdb.patch
deleted file mode 100644
index 82008f3f3e9..00000000000
--- a/Master/tlpkg/dev/dev.tempfile-for-tlpdb.patch
+++ /dev/null
@@ -1,39 +0,0 @@
-Index: TeXLive/TLPDB.pm
-===================================================================
---- TeXLive/TLPDB.pm	(revision 10575)
-+++ TeXLive/TLPDB.pm	(working copy)
-@@ -60,6 +60,9 @@
- use TeXLive::TLUtils qw(dirname mkdirhier member win32 info debug ddebug tlwarn);
- use TeXLive::TLPOBJ;
- 
-+use File::Temp qw/tempfile/;
-+
-+
- my $_listdir;
- 
- =pod
-@@ -211,13 +214,20 @@
-     # if we have lzmadec available we try the lzma file
-     if (defined($::progs{'lzmadec'})) {
-       # we first try the lzma compressed file
--      my $tmpdir = TeXLive::TLUtils::get_system_tmpdir();
--      my $bn = TeXLive::TLUtils::basename("$path");
--      my $lzmafile = "$tmpdir/$bn.lzma";
-+      #
-+      # we have to create a temp file to download to
-+      my ($lzmafh, $lzmafile) = tempfile();
-+      # now $lzmafh filehandle is open, the file created
-+      # TLUtils::download_file will just overwrite what is there
-+      # on windows that doesn't work, so we close the fh immediately
-+      # is this secure???
-+      close($lzmafh);
-       my $lzmafile_quote = $lzmafile;
-       # this is a variable of the whole sub as we have to remove the file
-       # before returning
--      $tlpdbfile = "$tmpdir/$bn";
-+      my $tlpdbfh;
-+      ($tlpdbfh, $tlpdbfile) = tempfile();
-+      close($tlpdbfh);
-       my $tlpdbfile_quote = $tlpdbfile;
-       if (win32()) {
-         $lzmafile  =~ s!/!\\!g;