diff options
Diffstat (limited to 'Master/tlpkg/libexec/ctan2tds')
-rwxr-xr-x | Master/tlpkg/libexec/ctan2tds | 30 |
1 files changed, 15 insertions, 15 deletions
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds index 4dfe0b69ffa..9ae5be649d0 100755 --- a/Master/tlpkg/libexec/ctan2tds +++ b/Master/tlpkg/libexec/ctan2tds @@ -1071,7 +1071,6 @@ chomp ($Build = `cd $Master/../Build/source && pwd`); 'latexdiff' => '&PREHOOK_latexdiff', 'mathspic' => '&PREHOOK_mathspic', 'movie15' => '&PREHOOK_flatten1', - 'musixtex' => '&PREHOOK_musixtex', 'musixtex-fonts' => '&PREHOOK_unzip', 'mp3d' => '&PREHOOK_mp3d', 'pgf-blur' => '&PREHOOK_pgfblur', @@ -1120,6 +1119,7 @@ chomp ($Build = `cd $Master/../Build/source && pwd`); 'luatexja' => '&POSTluatexja', 'm-tx' => '&POST_do_man', 'montex' => '&POSTmontex', + 'musixtex' => '&POSTmusixtex', 'niceframe' => '&POST_rmsymlink', 'pedigree-perl' => '&POSTpedigreeperl', 'pgf' => '&POSTpgf', @@ -4684,17 +4684,6 @@ sub PREHOOK_mp3d { &SYSTEM ("$RM -rf v1.0"); } -sub PREHOOK_musixtex { - print "PREHOOK_$package - unzip, scripts\n"; - # must unzip first so we can find the scripts. - &PREHOOK_unzip (); - # - my $mandest = "$TOPDEST/texmf/doc/man/man1/"; - &xmkdir ($mandest); - &SYSTEM ("$CP $DEST/doc/generic/$package/scripts/*.1 $mandest/"); - &tl_man_to_pdf (); -} - sub PREHOOK_pgfblur { print "PREHOOK_$package - build pdf doc\n"; &SYSTEM ("pdflatex pgf-blur.dtx"); @@ -5126,6 +5115,11 @@ sub POSTluatexja { &SYSTEM ("$MV doc/* .; rmdir doc"); } +sub POSTmusixtex { + print "POST$package - man pages\n"; + &POST_do_man ("doc/generic/$package/scripts"); +} + sub POSTmontex { print "\t POST$package - avoid 00readme case clash\n"; # these files are no longer used in TL. @@ -5238,14 +5232,20 @@ sub POSTzhspacing { &SYSTEM ("$MV doc/* .; rmdir doc"); } +# (Generic post hook actions.) + # has to be post instead of specialman because we use the tds.zip. +# Optional argument is directory where the man pages are as distributed +# on CTAN. sub POST_do_man { - print "POST$package - mv man page\n"; + my ($src_mandir) = @_; + $src_mandir = "doc/*/$package" if ! $src_mandir; + # + print "POST$package - mv *.1 man pages from $src_mandir\n"; my $mydest = "$TOPDEST/texmf/doc/man/man1/"; &xmkdir ($mydest); &xchdir ($DEST); - print STDERR `pwd`; - &SYSTEM ("$MV doc/*/$package/*.1 $mydest"); + &SYSTEM ("$MV $src_mandir/*.1 $mydest"); &tl_man_to_pdf (); } |