summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlpostcode/xetex.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlpostcode/xetex.pl')
-rw-r--r--Master/tlpkg/tlpostcode/xetex.pl15
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`);