summaryrefslogtreecommitdiff
path: root/Master/install-tl
diff options
context:
space:
mode:
authorSiep Kroonenberg <siepo@cybercomm.nl>2008-05-19 16:35:29 +0000
committerSiep Kroonenberg <siepo@cybercomm.nl>2008-05-19 16:35:29 +0000
commitd11e99ad008ba1e3fbeb4c74a61b3b5979a100b7 (patch)
treeaa2de7da7af8fa3701b029835adef7ebcc8fb25b /Master/install-tl
parentb0fc7d6ddd9484f3edf9d120daa4522cca7ceb80 (diff)
Split win32 filetypes in extension<=>filetype and filetype<=>command
git-svn-id: svn://tug.org/texlive/trunk@8236 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl')
-rwxr-xr-xMaster/install-tl23
1 files changed, 7 insertions, 16 deletions
diff --git a/Master/install-tl b/Master/install-tl
index 58eb934724d..9aca143fdfa 100755
--- a/Master/install-tl
+++ b/Master/install-tl
@@ -73,8 +73,10 @@ if (win32) {
&unsetenv_reg
&add_texbindir_to_path
&remove_texbindirs_from_path
- &register_script_type
- &unregister_script_type
+ &register_extension
+ &unregister_extension
+ &register_file_type
+ &unregister_file_type
&broadcast_env
&update_assocs
&add_desktop_shortcut
@@ -411,7 +413,8 @@ sub do_installation {
save_options_into_tlpdb();
do_install_packages();
if (win32()) {
- do_win_registry_magic();
+ add_texbindir_to_path($vars{'TEXDIR'}.'/bin/win32');
+ broadcast_env();
create_uninstaller($vars{'TEXDIR'});
}
foreach my $h (@::start_postinst_hook) {
@@ -857,7 +860,7 @@ operations might be disturbed.\n\n";
&{$PostInstall{$package}}($TEXDIR, $TEXMFSYSVAR, $TEXMFLOCAL);
}
}
-
+ update_assocs() if win32();
# Step 4: run the programs
@@ -1003,18 +1006,6 @@ sub do_texmf_cnf {
close(TMF);
}
-# register texlua handlers etc etc
-sub do_win_registry_magic {
- # we are called under if (win32()) !!
- my $texbindir = $vars{'TEXDIR'}."\\bin\\win32";
- $texbindir =~ s!/!\\!g;
- add_texbindir_to_path($texbindir);
- # setenv_reg('TEXBINDIR', $texbindir);
- # register_script_type(".texlua", "%TEXBINDIR%/texlua.exe");
- broadcast_env();
- # update_assocs();
-}
-
#
# do everything to select a scheme
#