diff options
| author | Norbert Preining <preining@logic.at> | 2009-07-06 13:12:07 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2009-07-06 13:12:07 +0000 |
| commit | 21c401925b2e3b1b3073b0eaf846281b6fa5d62c (patch) | |
| tree | b9e351564b082eeb388208fbc482bdb525a46a86 /Master/texmf/scripts | |
| parent | 06ef2f3fec53b17649761eb9a6fb6910cad99830 (diff) | |
- put the add/remove path to reg for w32 into separate function in TLUtils,
- use these funcions in install-tl and uninstall-win32.pl
git-svn-id: svn://tug.org/texlive/trunk@14147 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf/scripts')
| -rw-r--r-- | Master/texmf/scripts/texlive/uninstall-win32.pl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/Master/texmf/scripts/texlive/uninstall-win32.pl b/Master/texmf/scripts/texlive/uninstall-win32.pl index cfc3ff9bee1..6bc34ba67e3 100644 --- a/Master/texmf/scripts/texlive/uninstall-win32.pl +++ b/Master/texmf/scripts/texlive/uninstall-win32.pl @@ -64,8 +64,11 @@ sub doit { my $menupath = &TeXLive::TLWinGoo::menu_path(); $menupath =~ s!/!\\!g; `rmdir /q "$menupath\\$TeXLive::TLConfig::WindowsMainMenuName" 2>nul`; - my $mode = ($localtlpdb->option("w32_multi_user")) ? 'system' : 'user'; - adjust_reg_path_for_texlive('remove', "$Master/bin/win32", $mode); + + # remove bindir from PATH settings + TeXLive::TLUtils::w32_remove_from_path("$Master/bin/win32", + $localtlpdb->option("w32_multi_user")); + # unsetenv_reg("TEXBINDIR"); # from_dvd case: # unsetenv_reg("TEXMFSYSVAR"); |