summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorReinhard Kotucha <reinhard.kotucha@web.de>2012-04-01 00:54:58 +0000
committerReinhard Kotucha <reinhard.kotucha@web.de>2012-04-01 00:54:58 +0000
commit163981c32bcdcd087bdb7b2a3470afded4c4a29a (patch)
tree000fa5045fd4b8aeb8fdc218c7115fc1a491059e /Master
parenta7f3f25904531d7f61901735bf82b2b081432c09 (diff)
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
Diffstat (limited to 'Master')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm6
1 files changed, 5 insertions, 1 deletions
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<make_local_skeleton($prefix)>
-Generate a skeleton of empty directories in the C<TEXMFLOCAL> tree.
+Generate a skeleton of empty directories in the C<TEXMFLOCAL> tree
+if C<TEXMFLOCAL> 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";
}