summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive
diff options
context:
space:
mode:
authorPiotr Strzelczyk <piotr@eps.gda.pl>2009-09-03 21:21:58 +0000
committerPiotr Strzelczyk <piotr@eps.gda.pl>2009-09-03 21:21:58 +0000
commit9888383ec4a546a5b43679d14087e79853f889fb (patch)
treefc79d795c46a064bd68b4ee5dee2148d12a95faf /Master/tlpkg/TeXLive
parent6f9bdf0b75b74b51f8db19ed7973122e3ae809ac (diff)
dir_writable test with copy nul
git-svn-id: svn://tug.org/texlive/trunk@15042 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index f26976e244a..4a05df23939 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -548,7 +548,7 @@ sub dir_writable {
my $fb = $f;
$fb =~ s!/!\\!g;
return 0 if
- system('copy /b ' . $ENV{'COMSPEC'} . ' "' . $fb . '" >nul 2>&1');
+ system('copy /b nul "' . $fb . '" >nul 2>&1');
unlink $f if -e $f;
return 1;
} else {