diff options
author | Karl Berry <karl@freefriends.org> | 2021-05-03 17:49:57 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2021-05-03 17:49:57 +0000 |
commit | ca4b95e67cb163120117189e0990da6dae2de193 (patch) | |
tree | 056f9cc6dae58e88cfcbbe788b6ab9beb5d772d9 /Master/tlpkg/libexec/ctan2tds | |
parent | 4a3ba7b4fcfe429afbc6f7e14286edd2d1d99dc1 (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-x | Master/tlpkg/libexec/ctan2tds | 4 |
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"; } |