From 87f08dbac512a5b4aff5617fb26ca687bd370c32 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Fri, 18 Sep 2009 19:36:14 +0000 Subject: TLUtils: add dir_creatable in addition to dir_writable. On Vista/W7 in c:/ one can create directories, but not files! TLUtils: use dir_creatable in texdir_check, since that is what we need for parent and parent install-tl: on w32 if %ProgramFiles% is not writable fall back to c:\texlive\NNNN git-svn-id: svn://tug.org/texlive/trunk@15364 c570f23f-e606-0410-a88d-b1316a301751 --- Master/install-tl | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'Master/install-tl') diff --git a/Master/install-tl b/Master/install-tl index c609051e6ae..5aef80d493c 100755 --- a/Master/install-tl +++ b/Master/install-tl @@ -995,8 +995,12 @@ sub set_texlive_default_dirs { if (win32) { my $prog = getenv('ProgramFiles'); $tex_prefix ||= $prog . '/texlive'; - # if default is not writable, user has to pick another place manually - # USERPROFILE isn't an option, it is copied around on roaming setups + if (!TeXLive::TLUtils::texdir_check("$tex_prefix/$texlive_release")) { + # the default location is not writable, switch to C:\texlive + $tex_prefix = "c:/texlive"; + } + # we don't use USERPROFILE here because that will be copied back and + # forth on roaming profiles } else { $tex_prefix||='/usr/local/texlive'; } -- cgit v1.2.3