summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-11-13 15:43:41 +0000
committerNorbert Preining <preining@logic.at>2008-11-13 15:43:41 +0000
commit6ff046c12b6896c6b7ace34d964ace11ef5059ed (patch)
treeb1ddf76fa424fd8ba2fd62f86663909a1417c972 /Master
parent497424791b8f6b1984f45a21a0558cf2a33beef7 (diff)
fix problems with TLPostActions: missing tlwarn, path not found in touch
git-svn-id: svn://tug.org/texlive/trunk@11288 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rw-r--r--Master/tlpkg/TeXLive/TLPostActions.pm21
1 files changed, 12 insertions, 9 deletions
diff --git a/Master/tlpkg/TeXLive/TLPostActions.pm b/Master/tlpkg/TeXLive/TLPostActions.pm
index 988a845b9b4..24db9e3382f 100644
--- a/Master/tlpkg/TeXLive/TLPostActions.pm
+++ b/Master/tlpkg/TeXLive/TLPostActions.pm
@@ -18,7 +18,7 @@ BEGIN {
}
use TeXLive::TLUtils qw(win32 mkdirhier copy conv_to_w32_path log debug info
- touch);
+ touch tlwarn);
use TeXLive::TLWinGoo;
my $mainmenu = "TeX Live 2008";
@@ -111,14 +111,17 @@ sub do_install_xetex {
if (opendir (WINFONT, $winfontdir)) {
my @dirents = readdir (WINFONT);
closedir (WINFONT) || warn "closedir($winfontdir) failed: $!";
- for my $dirent (@dirents) {
- if ($dirent =~ m/\.(ttf|otf)$/i) {
- touch($dirent);
- tlwarn("touching $dirent in $winfontdir to make fc-cache work\n");
- # one file touched should be enough
- last;
- }
- }
+ # do not actually touch anything by now, maybe already the
+ # opendir is enough ...
+
+ # for my $dirent (@dirents) {
+ # if ($dirent =~ m/\.(ttf|otf)$/i) {
+ # touch("$winfontdir/$dirent");
+ # tlwarn("touching $dirent in $winfontdir to make fc-cache work\n");
+ # # one file touched should be enough
+ # last;
+ # }
+ # }
}
}
foreach (@lines) {