summaryrefslogtreecommitdiff
path: root/Master/texmf/scripts/texlive/uninstall-win32.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf/scripts/texlive/uninstall-win32.pl')
-rw-r--r--Master/texmf/scripts/texlive/uninstall-win32.pl7
1 files changed, 1 insertions, 6 deletions
diff --git a/Master/texmf/scripts/texlive/uninstall-win32.pl b/Master/texmf/scripts/texlive/uninstall-win32.pl
index 3aa3434a358..4c0e52bb7c9 100644
--- a/Master/texmf/scripts/texlive/uninstall-win32.pl
+++ b/Master/texmf/scripts/texlive/uninstall-win32.pl
@@ -19,7 +19,6 @@ BEGIN {
use TeXLive::TLWinGoo;
use TeXLive::TLPDB;
use TeXLive::TLPOBJ;
-use TeXLive::TLPackageConfigurations;
use TeXLive::TLConfig;
use TeXLive::TLUtils;
use Tk;
@@ -51,12 +50,8 @@ sub doit {
tlwarn("Cannot load the TLPDB from $Master, are you sure there is an installation?\n");
} else {
for my $pkg ($localtlpdb->list_packages) {
- if (defined($PackageConfigRemove{$pkg})) {
- info("running post remove action for $pkg\n");
- &{$PackageConfigRemove{$pkg}}($Master);
- }
+ &TeXLive::TLUtils::do_postaction("remove", $pkg);
}
- &TeXLive::TLUtils::do_postaction("remove", $pkg);
}
my $menupath = &TeXLive::TLWinGoo::menu_path();
$menupath =~ s!/!\\!g;