diff options
Diffstat (limited to 'Master/tlpkg/libexec')
-rwxr-xr-x | Master/tlpkg/libexec/ctan2tds | 40 |
1 files changed, 27 insertions, 13 deletions
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds index cb257e7b842..444d4162cc3 100755 --- a/Master/tlpkg/libexec/ctan2tds +++ b/Master/tlpkg/libexec/ctan2tds @@ -1895,11 +1895,17 @@ $standardxmt='\.xmt'; %specialxmt = (); -# code to install under texmf*/.../scripts. -# if they should end up in $bindir too, -# add to Build/source/texk/texlive/Makefile.in (and ChangeLog), -# which the doscripts function does. -%specialscripts = ( +# scripts to install under texmf*/.../scripts. +%specialscripts_nobin = ( + 'epspdf' => '(epspdf(|\.help|boot|tk)|\.rb|makegray\.pro)$', + 'lua-alt-getopt' => '\.lua$', + 'luaindex' => '\.lua$', + 'lualatex-math' => '\.lua$', + 'luasseq' => '\.lua$', +); + +# scripts that should end up in $bindir too. +%specialscripts_bin = ( 'a2ping' => '\.pl$', 'accfonts' => 'mkt1font|vpl2', 'authorindex' => 'authorindex$', @@ -1908,7 +1914,6 @@ $standardxmt='\.xmt'; 'de-macro' => 'de-macro', 'dviasm' => '\.py$', 'ebong' => '\.py$', - 'epspdf' => '(epspdf(|\.help|boot|tk)|\.rb|makegray\.pro)$', 'epstopdf' => 'epstopdf\.pl', 'fig4latex' => 'fig4latex', 'findhyph' => 'findhyph$', @@ -1918,9 +1923,6 @@ $standardxmt='\.xmt'; 'latexdiff' => 'latex(diff-so|diff-vc|revise)$', 'latexmk' => '\.pl$', 'listings-ext' => '\.sh$', - 'lua-alt-getopt' => '\.lua$', - 'luaindex' => '\.lua$', - 'luasseq' => '\.lua$', 'mathspic' => '^mathspic\.pl$', 'mkgrkindex' => 'mkgrkindex$', 'mkjobtexmf' => '\.pl$', @@ -2059,7 +2061,7 @@ for (@ARGV) { $package = pop (@x); my $COOKED_PKG = "$COOKED_TOP/$package"; # output directory - if ($specialscripts{$package}) { + if ($specialscripts_bin{$package}) { $BUILDDEST = "$COOKED_PKG/Build/source"; $TOPDEST = "$COOKED_PKG/Master"; } else { @@ -2539,10 +2541,22 @@ sub dotype1{ # We also make the symlinks/w32-wrapper-copy in Master/bin. # sub doscripts { - my $scriptpatt = $specialscripts{$package}; - return unless $scriptpatt; - my $pwd = getcwd(); + + # first do the ones that don't go in the bindirs. + my $scriptpatt = $specialscripts_nobin{$package}; + if ($scriptpatt) { + if ($pwd ne "$DEST/scripts/$package") { + # in the .tds.zip case, we will already be in the scripts dir. + &install ("$DEST/scripts/$package", $scriptpatt); + &SYSTEM ("chmod a+x $DEST/scripts/$package/*"); + } + } + + # now the user-visible bindir entries. Duplicating above, sorry. + $scriptpatt = $specialscripts_bin{$package}; + return unless $scriptpatt; + if ($pwd ne "$DEST/scripts/$package") { # in the .tds.zip case, we will already be in the scripts dir. &install ("$DEST/scripts/$package", $scriptpatt); |