From 6ce207af516d79adc8c85fd0f2ac7bc8e17ce3c4 Mon Sep 17 00:00:00 2001 From: Muhammad Moinur Rahman Date: Wed, 29 May 2024 22:35:56 +0200 Subject: [PATCH] print/texlive-tlmgr: Fix patch Reported by: imb@protected-networks.net Sponsored by: Nepustil --- ...rce_texk_texlive_linked__scripts_texlive_tlmgr.pl | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/print/texlive-tlmgr/files/patch-texlive-20240312-source_texk_texlive_linked__scripts_texlive_tlmgr.pl b/print/texlive-tlmgr/files/patch-texlive-20240312-source_texk_texlive_linked__scripts_texlive_tlmgr.pl index fe9a0f42d4d4..07a4b4ee481b 100644 --- a/print/texlive-tlmgr/files/patch-texlive-20240312-source_texk_texlive_linked__scripts_texlive_tlmgr.pl +++ b/print/texlive-tlmgr/files/patch-texlive-20240312-source_texk_texlive_linked__scripts_texlive_tlmgr.pl @@ -40,26 +40,26 @@ + my $temp = "$root/tlpkg/temp"; TeXLive::TLUtils::mkdirhier($temp); tlwarn("$prg: warning: backup option not implemented for infrastructure " - . " update on Windows; continuing anyway.\n") + . " update on Windows; continuing anyway.\n") @@ -5449,15 +5452,14 @@ sub uninstall_texlive { system("rm", "-rf", "$texmfsysvar"); - + print "misc... "; - system("rm", "-rf", "$Master/readme-html.dir"); - system("rm", "-rf", "$Master/readme-txt.dir"); + system("rm", "-rf", "$Master/tlpkg/readme-html.dir"); + system("rm", "-rf", "$Master/tlpkg/readme-txt.dir"); for my $f (qw/doc.html index.html install-tl install-tl.log - LICENSE.CTAN LICENSE.TL README README.usergroups - release-texlive.txt texmf.cnf texmfcnf.lua - /) { + LICENSE.CTAN LICENSE.TL README README.usergroups + release-texlive.txt texmf.cnf texmfcnf.lua + /) { - system("rm", "-f", "$Master/$f"); + system("rm", "-f", "$Master/tlpkg/$f"); } - finddepth(sub { rmdir; }, $Master); rmdir($Master); print "done.\n"; - + @@ -6397,7 +6399,7 @@ sub action_conf { $fn || ( $fn = "$TEXMFCONFIG/tlmgr/config" ) ; $cf = TeXLive::TLConfFile->new($fn, "#", "=");