diff options
Diffstat (limited to 'Master/tlpkg')
| -rw-r--r-- | Master/tlpkg/tlpostcode/xetex.pl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/Master/tlpkg/tlpostcode/xetex.pl b/Master/tlpkg/tlpostcode/xetex.pl index 2ac468358e7..910773f884f 100644 --- a/Master/tlpkg/tlpostcode/xetex.pl +++ b/Master/tlpkg/tlpostcode/xetex.pl @@ -76,6 +76,21 @@ if (win32()) { log(`fc-cache -v -r 2>&1`); #system("fc-cache","-v", "-r"); } else { + # create a texlive-fontconfig.conf file in $texmfsysvar + mkdirhier("$texmfsysvar/fonts/conf"); + if (!open(FONTSCONF, ">$texmfsysvar/fonts/conf/texlive-fontconfig.conf")) { + warn("Cannot open $texmfsysvar/fonts/conf/texlive-fontconfig.conf for writing\n"); + } else { + print FONTSCONF '<?xml version="1.0"?> +<!DOCTYPE fontconfig SYSTEM "fonts.dtd"> +<fontconfig> +'; + for my $t (qw/opentype truetype type1/) { + print FONTSCONF "<dir>$texdir/texmf-dist/fonts/$t</dir>\n"; + } + print FONTSCONF "</fontconfig>\n"; + close(FONTSCONF) || tlwarn("Cannot close filehandle for texmfsysvar/fonts/conf/texlive-fontconfig.conf\n"); + } # cygwin specific warning # we don't have platform available ... chomp(my $un = `uname`); |