ctan2tds (INSTALL): no x bit

cjk-build.pl: do not define $INSTALL and &I

git-svn-id: svn://tug.org/texlive/trunk@11912 c570f23f-e606-0410-a88d-b1316a301751

2 files changed, 1 insertions, 12 deletions

diff --git a/Master/tlpkg/libexec/cjk-build.pl b/Master/tlpkg/libexec/cjk-build.pl
index a7cc28cffc3..444cba09dfa 100644
--- a/Master/tlpkg/libexec/cjk-build.pl
+++ b/Master/tlpkg/libexec/cjk-build.pl
@@ -13,24 +13,13 @@
 # simply uses `install -d' so that missing subdirectories are created
 # automatically.
 
-
 # XXX: This installs files in the Build hierarchy!
 
-
-$INSTALL = "install -d"
-
-sub I
-{
-  my ($s, $d) = @_;
-  &SYSTEM ("$INSTALL $s $BUILD/source/texk/$d");
-}
-
 my $B = "cjkutils/bat";
 my $C = "cjkutils/conv";
 my $H = "cjkutils/hbf2gf";
 my $S = "cjkutils/scripts";
 
-
 &I("utils/Bg5conv/bg5conv.c",   "$C/bg5conv.c");
 &I("utils/Bg5conv/bg5latex",    "$S/bg5latex");
 &I("utils/Bg5conv/bg5pdflatex", "$S/bg5pdflatex");
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds
index c2d5904dc41..cd81ca3f166 100755
--- a/Master/tlpkg/libexec/ctan2tds
+++ b/Master/tlpkg/libexec/ctan2tds
@@ -29,7 +29,7 @@ use Cwd;
 $MV = "mv";
 $CP = "cp -p";
 $RM = "rm -vf";  # just to get feedback from GNU rm on removals
-$INSTALL = "install -D";
+$INSTALL = "install -D -m 664";
 
 $| = 1;
 select ((select (STDERR), $| = 1)[0]);