summaryrefslogtreecommitdiff
path: root/Master/tlpkg/libexec/ctan2tds
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2013-04-08 00:29:37 +0000
committerKarl Berry <karl@freefriends.org>2013-04-08 00:29:37 +0000
commit689aefb0727676ed3cddf331337b4be226495e72 (patch)
tree9af26b9aef6a1e923ed7b3e0de08e94b0365a8e8 /Master/tlpkg/libexec/ctan2tds
parent177b0faee50c9834c47fb0122d0a8b3646613c44 (diff)
mptopdf update, precursor and coming from new context
git-svn-id: svn://tug.org/texlive/trunk@29730 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/libexec/ctan2tds')
-rwxr-xr-xMaster/tlpkg/libexec/ctan2tds31
1 files changed, 28 insertions, 3 deletions
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds
index d103a7d1113..7bb103f23e4 100755
--- a/Master/tlpkg/libexec/ctan2tds
+++ b/Master/tlpkg/libexec/ctan2tds
@@ -657,7 +657,7 @@ chomp ($Build = `cd $Master/../Build/source && pwd`);
'mp3d', "&MAKEflatten",
'mpcolornames',"&MAKEcopy",
'mpdinbrief', "die 'skipping, nosell license'",
- 'mptopdf', "die 'skipping, not ready, sorry'", #"&MAKEflatten",
+ 'mptopdf', "&MAKEcopy",
'msuthesis', "die 'skipping, use msu-thesis'",
'mtp2lite', "die 'skipping, nonfree'",
'mtx', "die 'skipping, pascal musixtex binaries'",
@@ -1131,6 +1131,7 @@ chomp ($Build = `cd $Master/../Build/source && pwd`);
'luatexja' => '&POSTluatexja',
'm-tx' => '&POST_do_man',
'montex' => '&POSTmontex',
+ 'mptopdf' => '&POSTmptopdf',
'musixtex' => '&POSTmusixtex',
'niceframe' => '&POST_rmsymlink',
'pedigree-perl' => '&POSTpedigreeperl',
@@ -2529,7 +2530,7 @@ for (@ARGV) {
my $COOKED_PKG = "$COOKED_TOP/$package"; # output directory
if ($specialscripts_bin{$package}
- || $package =~ /^(biber|context)$/) { # special POSTcases
+ || $package =~ /^(biber|context|mptopdf)$/) { # special POSTcases
$BUILDDEST = "$COOKED_PKG/Build/source";
$TOPDEST = "$COOKED_PKG/Master";
} else {
@@ -4984,6 +4985,7 @@ sub bindirs_symlink {
$linktarget .= "/$exec";
#
(my $linkname = $exec) =~ s,.*/,,; # just the basename
+ $linkname =~ s,\.[^./]+$,,; # rm extension too
chomp (my @platforms = `cd $Master/bin && ls`);
for my $p (@platforms) {
@@ -5003,7 +5005,7 @@ sub bindirs_symlink {
sub build_scripts_copy {
my ($exec,$intermediate_dirs) = @_;
- # prepend / to INTERMEDIATE_DIRS if fiven.
+ # prepend / to INTERMEDIATE_DIRS if given.
$intermediate_dirs = ($intermediate_dirs ? "/$intermediate_dirs" : "");
my $build_tldir = "texk/texlive";
@@ -5024,6 +5026,29 @@ sub build_scripts_copy {
}
}
+sub POSTmptopdf {
+ # mptopdf needs a cut-down version of the context post routine.
+ # But there are enough differences that trying to factor out the
+ # commonalities doesn't make sense. Sigh.
+ print "POST$package - user-level executables\n";
+ my $w32_bindir = "$TOPDEST/bin/win32";
+ &xmkdir ($w32_bindir);
+ #
+ my $pkg_subdir = "perl"; # where hans keeps it
+ &xchdir ("$DEST/scripts/context/$pkg_subdir");
+ my $exec = "mptopdf.pl";
+ &bindirs_symlink ($exec);
+ &build_scripts_copy ($exec, $pkg_subdir);
+ &SYSTEM ("$CP ../stubs/mswin/mptopdf.exe $w32_bindir/");
+ #
+ print "still POST$package - man page\n";
+ &xchdir ("$DEST/doc/context/scripts/mkii");
+ my $mandest = "$TOPDEST/texmf-dist/doc/man/man1";
+ &xmkdir ($mandest);
+ &SYSTEM ("$CP mptopdf.man $mandest/mptopdf.1");
+ &tl_man_to_pdf ();
+}
+
sub POSTcontext_games {
print "POST$package - remove duplicated fonts\n";