diff options
author | Norbert Preining <preining@logic.at> | 2008-01-08 07:21:21 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-01-08 07:21:21 +0000 |
commit | e7efd4d78da1983e6cd30ed8bd566d222334d7d4 (patch) | |
tree | 6dc4e22ecca33aab3ded7a5b73599468a924ac78 | |
parent | a52a937d8c34af66d30aa45c12e190b52251e34a (diff) |
use CurrentControlSet instead of ControlSet001
git-svn-id: svn://tug.org/texlive/trunk@6132 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-x | Master/install-tl.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/install-tl.pl b/Master/install-tl.pl index 1df2cdb1132..92c92341c02 100755 --- a/Master/install-tl.pl +++ b/Master/install-tl.pl @@ -692,7 +692,7 @@ sub do_win_registry_magic { # PATHEXT editing # should this be currentcontrolset or ControlSet001 ???? - my $winenv = $Registry->Open( "LMachine/SYSTEM/ControlSet001/Control/Session Manager/Environment/", {Access=>'KEY_ALL_ACCESS',Delimiter=>"/"}); + my $winenv = $Registry->Open( "LMachine/SYSTEM/CurrentControlSet/Control/Session Manager/Environment/", {Access=>'KEY_ALL_ACCESS',Delimiter=>"/"}); my $pathext = $winenv->GetValue("PATHEXT"); my $found = 0; foreach (split(/;/,$pathext)) { |