diff options
author | Karl Berry <karl@freefriends.org> | 2013-04-08 00:29:37 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2013-04-08 00:29:37 +0000 |
commit | 689aefb0727676ed3cddf331337b4be226495e72 (patch) | |
tree | 9af26b9aef6a1e923ed7b3e0de08e94b0365a8e8 /Master/tlpkg/libexec/ctan2tds | |
parent | 177b0faee50c9834c47fb0122d0a8b3646613c44 (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-x | Master/tlpkg/libexec/ctan2tds | 31 |
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"; |