texlive[42481] Master/tlpkg: fira (10nov16)

commits+karl at tug.org commits+karl at tug.org
Fri Nov 11 00:19:15 CET 2016


Revision: 42481
          http://tug.org/svn/texlive?view=revision&revision=42481
Author:   karl
Date:     2016-11-11 00:19:14 +0100 (Fri, 11 Nov 2016)
Log Message:
-----------
fira (10nov16)

Modified Paths:
--------------
    trunk/Master/tlpkg/bin/ctan2tl
    trunk/Master/tlpkg/libexec/ctan2tds

Modified: trunk/Master/tlpkg/bin/ctan2tl
===================================================================
--- trunk/Master/tlpkg/bin/ctan2tl	2016-11-10 23:05:27 UTC (rev 42480)
+++ trunk/Master/tlpkg/bin/ctan2tl	2016-11-10 23:19:14 UTC (rev 42481)
@@ -133,6 +133,7 @@
 spacenames="`find $pkg -name \*\ \*`"
 if test -n "$spacenames"; then
   echo "$0: cooked hierarchy contains files with spaces, goodbye:" >&2
+  echo "in `pwd`/$pkg:" >&2
   echo "$spacenames" >&2
   exit 1
 fi

Modified: trunk/Master/tlpkg/libexec/ctan2tds
===================================================================
--- trunk/Master/tlpkg/libexec/ctan2tds	2016-11-10 23:05:27 UTC (rev 42480)
+++ trunk/Master/tlpkg/libexec/ctan2tds	2016-11-10 23:19:14 UTC (rev 42481)
@@ -3038,7 +3038,9 @@
 # 
 sub sanitize_file_names {
   my ($dir) = @_;
-  &SYSTEM ("find $dir -print | xargs rename 's![^-_A-Za-z0-9.,/+]!!g'");
+  # -0 in case of spaces or other chars in filenames, which would be
+  # parsed into words by the shell otherwise.
+  &SYSTEM ("find $dir -print0 | xargs -0 /l/bin/rename 's![^-_A-Za-z0-9.,/+]!!g'");
 }
 
 



More information about the tex-live-commits mailing list