diff options
author | Karl Berry <karl@freefriends.org> | 2019-03-21 22:55:48 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2019-03-21 22:55:48 +0000 |
commit | ab5126e3419bd90af9d13d84a97c650fa1df150c (patch) | |
tree | beb4677e638bead9eb314ce0da622a4f478df4ef /Build/source/texk/tests/TeXLive | |
parent | 7f9f41da9cef87b2c7eb9cd7fc2c05fbe8da77a7 (diff) |
doc,sync
git-svn-id: svn://tug.org/texlive/trunk@50520 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/tests/TeXLive')
-rw-r--r-- | Build/source/texk/tests/TeXLive/TLUtils.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Build/source/texk/tests/TeXLive/TLUtils.pm b/Build/source/texk/tests/TeXLive/TLUtils.pm index 494ee70601c..8c3be67da98 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: 50202 $'; +my $svnrev = '$Revision: 50427 $'; my $_modulerevision = ($svnrev =~ m/: ([0-9]+) /) ? $1 : "unknown"; sub module_revision { return $_modulerevision; } @@ -376,7 +376,7 @@ sub platform_desc { 'amd64-kfreebsd' => 'GNU/kFreeBSD on x86_64', 'amd64-netbsd' => 'NetBSD on x86_64', 'armel-linux' => 'GNU/Linux on ARM', - 'armhf-linux' => 'GNU/Linux on ARMhf', + 'armhf-linux' => 'GNU/Linux on ARMv6 (RPi)', 'hppa-hpux' => 'HP-UX', 'i386-cygwin' => 'Cygwin on Intel x86', 'i386-darwin' => 'MacOSX legacy (10.5-10.6) on Intel x86', @@ -880,7 +880,7 @@ sub mkdirhier { # from the UNC path, since (! -d //servername/) tests true $subdir = $& if ( win32() && ($tree =~ s!^//[^/]+/!!) ); - @dirs = split (/\//, $tree); + @dirs = split (/[\/\\]/, $tree); for my $dir (@dirs) { $subdir .= "$dir/"; if (! -d $subdir) { @@ -893,7 +893,7 @@ sub mkdirhier { } else { if (! mkdir ($subdir)) { $ret = 0; - $reterror = "mkdir($subdir) failed: $!"; + $reterror = "mkdir($subdir) failed for tree $tree: $!"; last; } } |