summaryrefslogtreecommitdiff
path: root/Build/source/texk/tests
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2015-04-12 16:30:18 +0000
committerKarl Berry <karl@freefriends.org>2015-04-12 16:30:18 +0000
commit6a0c9374bb3fb6da6572eca299fa6c3d3e05262b (patch)
treef7643255d9152c7b1c6e5c15c6500419ec69f031 /Build/source/texk/tests
parent99ebd94045fb45ebcb04f4d78cf78abf75fded8e (diff)
sync
git-svn-id: svn://tug.org/texlive/trunk@36792 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/tests')
-rw-r--r--Build/source/texk/tests/TeXLive/TLUtils.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/Build/source/texk/tests/TeXLive/TLUtils.pm b/Build/source/texk/tests/TeXLive/TLUtils.pm
index ab940e6b93e..ca32f0e44dc 100644
--- a/Build/source/texk/tests/TeXLive/TLUtils.pm
+++ b/Build/source/texk/tests/TeXLive/TLUtils.pm
@@ -5,7 +5,7 @@
package TeXLive::TLUtils;
-my $svnrev = '$Revision: 35719 $';
+my $svnrev = '$Revision: 35937 $';
my $_modulerevision;
if ($svnrev =~ m/: ([0-9]+) /) {
$_modulerevision = $1;
@@ -2032,8 +2032,8 @@ sub add_link_dir_dir {
}
#
# try to make the link.
- if (system ("ln -s '$from/$f' '$to'") != 0) {
- tlwarn ("add_link_dir_dir: linking $f from $from to $to failed: $!\n");
+ if (symlink ("$from/$f", "$to/$f") == 0) {
+ tlwarn ("add_link_dir_dir: symlink of $f from $from to $to failed: $!\n");
$ret = 0;
}
}