summaryrefslogtreecommitdiff
path: root/Master/install-tl.pl
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-01-08 07:21:21 +0000
committerNorbert Preining <preining@logic.at>2008-01-08 07:21:21 +0000
commite7efd4d78da1983e6cd30ed8bd566d222334d7d4 (patch)
tree6dc4e22ecca33aab3ded7a5b73599468a924ac78 /Master/install-tl.pl
parenta52a937d8c34af66d30aa45c12e190b52251e34a (diff)
use CurrentControlSet instead of ControlSet001
git-svn-id: svn://tug.org/texlive/trunk@6132 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl.pl')
-rwxr-xr-xMaster/install-tl.pl2
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)) {