diff options
author | Siep Kroonenberg <siepo@cybercomm.nl> | 2008-04-19 12:03:08 +0000 |
---|---|---|
committer | Siep Kroonenberg <siepo@cybercomm.nl> | 2008-04-19 12:03:08 +0000 |
commit | 65fe3c972d11727139e78a5edd7fe7d919abbf89 (patch) | |
tree | fd22fb458c165cb97d1be7976f2c96f347747078 /Master/tlpkg/TeXLive | |
parent | 6436b7491107c65c9d97992c1dd988cd3d142467 (diff) |
Fixed typo in uninstaller. Add/remove entry now gets removed.
git-svn-id: svn://tug.org/texlive/trunk@7517 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive')
-rw-r--r-- | Master/tlpkg/TeXLive/TLWinGoo.pm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/Master/tlpkg/TeXLive/TLWinGoo.pm b/Master/tlpkg/TeXLive/TLWinGoo.pm index b7fe88f0831..e4d5fa5c0b4 100644 --- a/Master/tlpkg/TeXLive/TLWinGoo.pm +++ b/Master/tlpkg/TeXLive/TLWinGoo.pm @@ -894,15 +894,13 @@ Removes TeXLive from Add/Remove Programs. sub unregister_uninstaller { my $regkey_uninst; - print "trying HKCU uninstaller entry\n"; $regkey_uninst = $Registry->Open( - "CUser/software/microsoft/windows/uninstall/", + "CUser/software/microsoft/windows/currentversion/uninstall/", {Access => KEY_ALL_ACCESS()}); reg_delete_recurse($regkey_uninst, 'texlive') if $regkey_uninst; return unless admin(); - print "trying HKLM uninstaller entry\n"; $regkey_uninst = $Registry->Open( - "LMachine/software/microsoft/windows/uninstall/", + "LMachine/software/microsoft/windows/currentversion/uninstall/", {Access => KEY_ALL_ACCESS()}); reg_delete_recurse($regkey_uninst, 'texlive') if $regkey_uninst; } |