From 163981c32bcdcd087bdb7b2a3470afded4c4a29a Mon Sep 17 00:00:00 2001 From: Reinhard Kotucha Date: Sun, 1 Apr 2012 00:54:58 +0000 Subject: make_local_skeleton: create skeleton only if texmf-local doesn't already exist. added texmf-local/doc/local git-svn-id: svn://tug.org/texlive/trunk@25812 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLUtils.pm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'Master') diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 7769b9f33d8..6af3f1e4dbc 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -2498,13 +2498,16 @@ sub make_var_skeleton { =item C -Generate a skeleton of empty directories in the C tree. +Generate a skeleton of empty directories in the C tree +if C doesn't already exist. =cut sub make_local_skeleton { my $prefix=shift; + return if (-d $prefix); + mkdirhier "$prefix/tex/latex/local"; mkdirhier "$prefix/tex/plain/local"; mkdirhier "$prefix/dvips/local"; @@ -2515,6 +2518,7 @@ sub make_local_skeleton { mkdirhier "$prefix/fonts/source/local"; mkdirhier "$prefix/fonts/type1/local"; mkdirhier "$prefix/metapost/local"; + mkdirhier "$prefix/doc/local"; mkdirhier "$prefix/web2c"; } -- cgit v1.2.3