summaryrefslogtreecommitdiff
path: root/Master/tlpkg/libexec/ctan2tds
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2021-05-03 17:49:57 +0000
committerKarl Berry <karl@freefriends.org>2021-05-03 17:49:57 +0000
commitca4b95e67cb163120117189e0990da6dae2de193 (patch)
tree056f9cc6dae58e88cfcbbe788b6ab9beb5d772d9 /Master/tlpkg/libexec/ctan2tds
parent4a3ba7b4fcfe429afbc6f7e14286edd2d1d99dc1 (diff)
copy lwall rename script here, to make us more self-contained
git-svn-id: svn://tug.org/texlive/trunk@59065 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/libexec/ctan2tds')
-rwxr-xr-xMaster/tlpkg/libexec/ctan2tds4
1 files changed, 3 insertions, 1 deletions
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds
index 4085517a719..e30610564b8 100755
--- a/Master/tlpkg/libexec/ctan2tds
+++ b/Master/tlpkg/libexec/ctan2tds
@@ -3704,8 +3704,10 @@ sub sanitize_file_names {
# -0 in case of spaces or other chars in filenames, which would be
# parsed into words by the shell otherwise, cause trouble with svn, etc.
if (-d $dir) {
+ my $libexec = "$mydir/../libexec";
+ my $rename = "$libexec/rename";
&SYSTEM ("find $dir -print0 "
- . "| xargs -0 /l/bin/rename 's![^-_A-Za-z0-9.,/+]!!g'");
+ . "| xargs -0 $rename 's![^-_A-Za-z0-9.,/+]!!g'");
} else {
die "$0:sanitize_file_names: not a directory, goodbye: $dir\n";
}