diff options
author | Norbert Preining <preining@logic.at> | 2008-05-16 09:10:08 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-05-16 09:10:08 +0000 |
commit | 454fd0afc518eeb317e77f1779d59d59bca7c788 (patch) | |
tree | 19d3c6905507826575c4d589d3ae76495d06a712 | |
parent | facd9363182f2a643e239abc4e8a11dc58fb2e7e (diff) |
PostRemove: fix for missing include and wrong name
git-svn-id: svn://tug.org/texlive/trunk@8174 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 3 | ||||
-rw-r--r-- | Master/tlpkg/TeXLive/TLPostActions.pm | 1 |
2 files changed, 3 insertions, 1 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index 051148ba663..64023a72e5f 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -25,6 +25,7 @@ use TeXLive::TLConfig; use TeXLive::TLMedia; use TeXLive::TLUtils; use TeXLive::TLWinGoo; +use TeXLive::TLPostActions; TeXLive::TLUtils->import( qw(kpsewhich member win32 merge_into) ); use Cwd qw/abs_path/; use Pod::Usage; @@ -243,7 +244,7 @@ sub remove_package { # do the post removal actions if (defined($PostRemove{$pkg})) { tllog($::LOG_NORMAL, "running post remove action for $pkg\n"); - &{$PostRemove{$pkg}}($totlpdb->root); + &{$PostRemove{$pkg}}($localtlpdb->root); } } return \%ret; diff --git a/Master/tlpkg/TeXLive/TLPostActions.pm b/Master/tlpkg/TeXLive/TLPostActions.pm index bc0c82509ca..a4bd75d2ead 100644 --- a/Master/tlpkg/TeXLive/TLPostActions.pm +++ b/Master/tlpkg/TeXLive/TLPostActions.pm @@ -12,6 +12,7 @@ BEGIN { @ISA = qw(Exporter); @EXPORT_OK = qw( %PostInstall + %PostRemove ); @EXPORT = @EXPORT_OK; } |