From 17ee36c1805fbbbd8174c38c36b78de954114f3b Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Wed, 18 Nov 2009 03:49:01 +0000 Subject: try to remove empty ROOT/bin/$arch directories after tlmgr arch remove git-svn-id: svn://tug.org/texlive/trunk@16061 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf/scripts/texlive/tlmgr.pl | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'Master') diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index 2df72ffcbb2..7ef87afaf17 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -2908,6 +2908,12 @@ sub action_arch { } } if (!$opts{"dry-run"}) { + # try to remove bin/$a dirs + for my $a (@todoarchs) { + if (!rmdir("$Master/bin/$a")) { + tlwarn("binary directory $Master/bin/$a not empty after removal of $a.\n"); + } + } # update the option("available_architectures") list of installed archs my @larchs = $localtlpdb->setting("available_architectures"); my @newarchs; -- cgit v1.2.3