summaryrefslogtreecommitdiff
path: root/Master/tlpkg/installer/install-menu-wizard.pl
diff options
context:
space:
mode:
authorSiep Kroonenberg <siepo@cybercomm.nl>2013-05-10 12:57:51 +0000
committerSiep Kroonenberg <siepo@cybercomm.nl>2013-05-10 12:57:51 +0000
commit16d94df54aae3b3252477492695bd4fe027d1337 (patch)
tree27c604a6efa6fa969bda49a3c0d86f47b4053661 /Master/tlpkg/installer/install-menu-wizard.pl
parent5a2af5e099455faf50af26f6762ba119ad2ae3d0 (diff)
w32 directory handling
git-svn-id: svn://tug.org/texlive/trunk@30368 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/installer/install-menu-wizard.pl')
-rw-r--r--Master/tlpkg/installer/install-menu-wizard.pl9
1 files changed, 0 insertions, 9 deletions
diff --git a/Master/tlpkg/installer/install-menu-wizard.pl b/Master/tlpkg/installer/install-menu-wizard.pl
index 11808d9334e..e44e29ed072 100644
--- a/Master/tlpkg/installer/install-menu-wizard.pl
+++ b/Master/tlpkg/installer/install-menu-wizard.pl
@@ -553,15 +553,6 @@ sub callback_change_texdir {
$vars{'TEXMFSYSVAR'}="$texdirnoslash/texmf-var";
$vars{'TEXMFSYSCONFIG'}="$texdirnoslash/texmf-config";
}
- if ($vars{'TEXDIR'} =~ /:$/) {
- # drive letter: add final slash
- $vars{'TEXDIR'} = $vars{'TEXDIR'}."/";
- # note: main::do_installation will remove this final slash
- } elsif ($vars{'TEXDIR'} =~ /\/$/ and $vars{'TEXDIR'} !~ /:\/$/) {
- # remove final slash
- $vars{'TEXDIR'} =~ s![\\/]$!!;
- }
- #$vars{'TEXDIRW'}=$vars{'TEXDIR'};
$dest = $vars{'TEXDIR'};
$dest_display = native_slashify($dest); # useful as -textvar value in Labels
check_show_warning();