From c0a4edcf62c16a86cea716ab1f1229d2d9c74ef7 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Wed, 13 Jan 2010 12:47:11 +0000 Subject: fix mkdir for UNC paths (from Tomek) git-svn-id: svn://tug.org/texlive/trunk@16700 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLUtils.pm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'Master') diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 330bd27149d..0db99434dbf 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -597,6 +597,9 @@ sub mkdirhier { return if (-d "$tree"); my $subdir = ""; + # win32 is special as usual: we need to separate //servername/ part + # from the UNC path, since (! -d //servername/) tests true + $subdir = $& if ( win32() && ($tree =~ s!^//[^/]+/!!) ); @dirs = split (/\//, $tree); for my $dir (@dirs) { -- cgit v1.2.3