summaryrefslogtreecommitdiff
path: root/Master/tlpkg/libexec/ctan2tds
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/libexec/ctan2tds')
-rwxr-xr-xMaster/tlpkg/libexec/ctan2tds32
1 files changed, 25 insertions, 7 deletions
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds
index dbe5605b43a..612a1460e66 100755
--- a/Master/tlpkg/libexec/ctan2tds
+++ b/Master/tlpkg/libexec/ctan2tds
@@ -1741,6 +1741,7 @@ chomp (my $ctan_root = `tlpkginfo --ctan-root`);
'musixtex' => '&POSTmusixtex',
'musixtnt' => '&POSTmusixtnt',
'niceframe' => '&POST_rmsymlink',
+ 'novel' => '&POSTnovel',
'numericplots' => '&POSTnumericplots',
'nwejm' => '&POSTnwejm',
'optex' => '&POSToptex',
@@ -7238,6 +7239,21 @@ sub POSTmusixtnt {
&SYSTEM ("$RM -rf windows");
}
+sub POSTnovel {
+ print "POST$package - mv subdirs\n";
+ # similar to onelevel, but the main tree has deep subdirs,
+ # so have to handle it separately. don't bother trying to generalize.
+
+ my $srcdir = "fonts/opentype/$package";
+ &rename_with_mkdir ($srcdir, "$DEST/$srcdir");
+
+ $srcdir = "tex/lualatex/$package";
+ &rename_with_mkdir ($srcdir, "$DEST/$srcdir");
+
+ # move files in doc/ up to cwd. If there are clashes, will error out.
+ &xsystem ("$MV doc/* .") if -d "doc";
+}
+
sub POSTnumericplots {
print "POST$package - mv latex subdir\n";
&SYSTEM ("$MV latex $DEST/tex/latex/$package");
@@ -7471,7 +7487,7 @@ sub POSTtikz_cd {
}
sub POSTtikz_ext {
- print "POST$package - per-format subdirs\n"
+ print "POST$package - per-format subdirs\n";
&xmkdir ("$DEST/tex/generic", "$DEST/tex/latex", "$DEST/tex/plain");
&SYSTEM ("$MV tex/generic $DEST/tex/generic/$package");
&SYSTEM ("$MV tex/latex $DEST/tex/latex/$package");
@@ -7581,7 +7597,7 @@ sub POST_onelevel {
next unless -d $dir;
# theoretically we should use $whichformat, $sourceformat,
# but in practice they are always the same.
- $destdir = $dir eq "luatex" ? "tex" : $dir;
+ my $destdir = $dir eq "luatex" ? "tex" : $dir;
&rename_with_mkdir ($dir, "$DEST/$destdir/$whichdocformat/$package");
}
# move files in doc/ up to cwd. If there are clashes, will error out.
@@ -7589,12 +7605,12 @@ sub POST_onelevel {
}
sub POST_otherformat {
- print "POST$package - move macros up a level\n";
+ print "POST_otherformat ($package) - move tex/ dirs up a level\n";
&SYSTEM ("$MV $DEST/tex/$package/$package/* $DEST/tex/$package/");
}
sub POST_preserve_postcode {
- print "POST$package - preserve tlpostcode/$package-tlpost.pl\n";
+ print "POST_preserve_postcode ($package) - preserve tlpostcode/$package-tlpost.pl\n";
my $dirpath = "tlpkg/tlpostcode";
my $dest = "$TOPDEST/$dirpath";
&xmkdir ($dest);
@@ -7602,7 +7618,7 @@ sub POST_preserve_postcode {
}
sub POST_preserve_man {
- print "POST$package - preserve man pages\n";
+ print "POST_preserve_man ($package) - preserve man pages\n";
&preserve_man_pages ($package);
}
@@ -7614,6 +7630,7 @@ sub POST_preserve_man {
# on CTAN, else doc/*/$package.
sub POST_do_man {
my ($src_mandir) = @_;
+ print "POST_do_man - src_mandir = $src_mandir\n";
if ($src_mandir) {
; # explicitly specified, ok.
@@ -7646,6 +7663,7 @@ sub POST_do_man {
}
sub POST_preserve_bin {
+ print "POST_preserve_bin - binaries = @_\n";
# the pmx package, among others, includes binaries made from Build,
# and normal scripts and support files. The latter can get updated
# without needing to update the former, so we support it. Which means
@@ -7672,12 +7690,12 @@ sub POST_preserve_bin {
}
sub POST_rmsymlink {
- print "POST$package - removing symlinks\n";
+ print "POST_rmsymlink ($package) - removing symlinks\n";
&SYSTEM ("find $DEST -type l | xargs --no-run-if-empty $RM");
}
sub POST_deref_symlink {
- print "POST$package - dereferencing symlinks\n";
+ print "POST_deref_symlink ($package) - dereferencing symlinks\n";
&SYSTEM ("find $DEST -type l | xargs deref-symlinks");
}