From ca4b95e67cb163120117189e0990da6dae2de193 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 3 May 2021 17:49:57 +0000 Subject: 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 --- Master/tlpkg/libexec/ctan2tds | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'Master/tlpkg/libexec/ctan2tds') 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"; } -- cgit v1.2.3