From 9888383ec4a546a5b43679d14087e79853f889fb Mon Sep 17 00:00:00 2001 From: Piotr Strzelczyk Date: Thu, 3 Sep 2009 21:21:58 +0000 Subject: dir_writable test with copy nul git-svn-id: svn://tug.org/texlive/trunk@15042 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLUtils.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Master') 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 { -- cgit v1.2.3