summaryrefslogtreecommitdiff
path: root/Master/tlpkg/libexec/ctan2tds
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/libexec/ctan2tds')
-rwxr-xr-xMaster/tlpkg/libexec/ctan2tds10
1 files changed, 7 insertions, 3 deletions
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds
index 4a09e216f89..6ab7e0f1d2a 100755
--- a/Master/tlpkg/libexec/ctan2tds
+++ b/Master/tlpkg/libexec/ctan2tds
@@ -1742,6 +1742,7 @@ chomp (my $ctan_root = `tlpkginfo --ctan-root`);
'mflogo' => '&POST_rmsymlink',
'moderncv' => '&POST_deref_symlink',
'montex' => '&POSTmontex',
+ 'mpchess' => '&POST_onelevel',
'mpfonts' => '&POSTmpfonts',
'mptopdf' => '&POSTmptopdf',
'musixtex' => '&POSTmusixtex',
@@ -7605,7 +7606,7 @@ sub POSTzhmetrics {
#
sub POST_onelevel {
print "POST_onelevel ($package) - handle doc/source/tex directories\n";
- for my $dir ("opentype", "source", "tex", "latex", "lualatex", "luatex") {
+ for my $dir (qw(latex lualatex luatex metapost opentype source tex)) {
next unless -d $dir;
# theoretically we should use $whichformat, $sourceformat,
# but in practice they are always the same.
@@ -7613,13 +7614,16 @@ sub POST_onelevel {
my $destdir = $dir;
if ($dir =~ /(lua)?(la)?tex/) {
$destdir = "tex/$which";
+ } elsif ($dir =~ /metapost/) {
+ $format = ""; # metapost/PKGNAME
} elsif ($dir =~ /opentype/) {
$destdir = "fonts";
- $format = $dir; # but fonts tree is structured differently
+ my $foundry = $specialfoundry{$package} || $standardfoundry;
+ $format = "$foundry/$dir"; # fonts/opentype/public/PKGNAME
}
&rename_with_mkdir ($dir, "$DEST/$destdir/$format/$package");
}
- # move files in doc/ up to cwd. If there are clashes, will error out.
+ # move files in doc[s]/ up to cwd. If there are clashes, will error out.
&xsystem ("$MV doc/* .") if -d "doc";
&xsystem ("$MV docs/* .") if -d "docs";
}