summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-04-28 20:49:41 +0000
committerNorbert Preining <preining@logic.at>2009-04-28 20:49:41 +0000
commit112ac50ab71a7f8a8af21fa802322c7f8a84011d (patch)
treeb91b4ac07db6c1ac65e4d9a61ce5301452846532
parent8bf9a182adf98b559fdf67c5612a1a7ee8f619f7 (diff)
don't remove dirs for now, but give big fat warning
git-svn-id: svn://tug.org/texlive/branches/branch2009-dev@12840 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Master/tlpkg/TeXLive/TLMedia.pm9
1 files changed, 5 insertions, 4 deletions
diff --git a/Master/tlpkg/TeXLive/TLMedia.pm b/Master/tlpkg/TeXLive/TLMedia.pm
index 85347df9aea..f455fd0a654 100644
--- a/Master/tlpkg/TeXLive/TLMedia.pm
+++ b/Master/tlpkg/TeXLive/TLMedia.pm
@@ -380,13 +380,14 @@ sub remove_package {
tlwarn(" $f - $allfiles{$f}\n");
}
}
- my @removals = &removed_dirs (@goodfiles);
foreach my $entry (@goodfiles) {
unlink $entry;
}
- foreach my $entry (@removals) {
- rmdir $entry;
- }
+ tlwarn("MISSING REMOVAL OF EMPTY DIRECTORIES: sub removed_dirs needed!\n");
+ #my @removals = &removed_dirs (@goodfiles);
+ #foreach my $entry (@removals) {
+ # rmdir $entry;
+ #}
$localtlpdb->remove_package($pkg);
merge_into(\%ret, $tlp->make_return_hash_from_executes("disable"));
$ret{'mktexlsr'} = 1;