diff options
| author | Norbert Preining <preining@logic.at> | 2023-09-15 13:11:11 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2023-09-15 13:11:11 +0000 |
| commit | 918dc82333976a755c079a3e7e092613f73ade18 (patch) | |
| tree | fe252dd4a9159e5b0b1f3e34f19eb8e74e9ab68e /Master/texmf-dist | |
| parent | 6701ce2c59ac18347d73a7252042ae9ba58ab082 (diff) | |
tlmgr: on update test that we can remove files (deal with ro dirs)
git-svn-id: svn://tug.org/texlive/trunk@68283 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist')
| -rwxr-xr-x | Master/texmf-dist/scripts/texlive/tlmgr.pl | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/Master/texmf-dist/scripts/texlive/tlmgr.pl b/Master/texmf-dist/scripts/texlive/tlmgr.pl index d0d4456bce1..db5753c0efa 100755 --- a/Master/texmf-dist/scripts/texlive/tlmgr.pl +++ b/Master/texmf-dist/scripts/texlive/tlmgr.pl @@ -3371,8 +3371,11 @@ sub action_update { if ($pkg =~ m/$CriticalPackagesRegexp/) { debug("Not removing critical package $pkg\n"); } else { - $localtlpdb->remove_package($pkg, - "remove-warn-files" => \%do_warn_on_move); + if (! $localtlpdb->remove_package($pkg, + "remove-warn-files" => \%do_warn_on_move)) { + info("aborted\n") unless $::machinereadable; + next; + } } if ($remotetlpdb->install_package($pkg, $localtlpdb)) { # installation succeeded because we got a reference @@ -10253,4 +10256,4 @@ $Id$ ### tab-width: 2 ### indent-tabs-mode: nil ### End: -# vim:set tabstop=2 expandtab: # +# vim:set tabstop=2 shiftwidth=2 expandtab: # |