summaryrefslogtreecommitdiff
path: root/Master/tlpkg/libexec/ctan2tds
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/libexec/ctan2tds')
-rwxr-xr-xMaster/tlpkg/libexec/ctan2tds74
1 files changed, 28 insertions, 46 deletions
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds
index efbe40d4a4e..3048cb8c7e9 100755
--- a/Master/tlpkg/libexec/ctan2tds
+++ b/Master/tlpkg/libexec/ctan2tds
@@ -451,7 +451,8 @@ chdir $startdir || die "chdir($startdir) failed: $!"; # back to raw
'pst-fun', "&MAKEpst",
'pst-func', "&MAKEpst",
'pst-gantt', "&MAKEpst",
- 'pst-geo', "&MAKEpstgeo",
+ 'pst-geo', "&MAKEpst",
+ 'pst-geo-compress', "die 'skipping, in pst-geo, check with hvoss'",
'pst-ghsb', "&MAKEpst",
'pst-gr3d', "&MAKEpst",
'pst-grad', "&MAKEpst",
@@ -609,15 +610,16 @@ chdir $startdir || die "chdir($startdir) failed: $!"; # back to raw
'impatient' => '&POSTimpatient',
'interactiveworkbook' => '&POSTinteractiveworkbook',
'knuth' => '&POSTknuth',
- 'koma-script' => '&POSTkoma',
+ 'koma-script' => '&POSTkomascript',
'latex2man' => '&POSTlatex2man',
'lithuanian' => '&POSTlithuanian',
'montex' => '&POSTmontex',
'pgf' => '&POSTpgf',
'pst-cox' => '&POSTpstcox',
+ 'pst-geo' => '&POSTpstgeo',
'splitindex' => '&POSTsplitindex',
'xecyr' => '&POSTxecyr',
- 'xetex-pstricks' => '&POSTxetex_pstricks',
+ 'xetex-pstricks' => '&POSTxetexpstricks',
'zhspacing' => '&POSTzhspacing',
'zhmetrics' => '&POSTzhmetrics',
);
@@ -1255,7 +1257,6 @@ $standardmakeindex='\.ist';
'pst-circ', '.*-e\.tex|doc-.*.tex|pst-circ-doc.tex',
'pst-fr3d', 'doc-.*.tex|pst-fr3d-doc',
'pst-func', '.*-e\.tex|doc-.*.tex|pst-func-doc',
- 'pst-geo', '.*-e\.tex|doc-.*.tex|pst-geo-doc.tex',
'pst-ghsb', '.*-e\.tex|doc-.*.tex|pst-ghsb-doc.tex',
'pst-gr3d', '.*-e\.tex|doc-.*.tex|pst-gr3d-doc.tex',
'pst-jftree', '.*-e\.tex|doc-.*.tex|pst-jftree-doc.tex',
@@ -3283,6 +3284,7 @@ sub MAKEbeebe {
&SYSTEM("rm *");
}
+
# pstricks packages usually support both plain and latex.
#
sub MAKEpst
@@ -3310,40 +3312,11 @@ sub MAKEpst
&SYSTEM("mv $DEST/tex/generic/$package/*sty $DEST/tex/latex/$package");
&SYSTEM("mv $DEST/doc/generic/$package/*cfg $DEST/tex/latex/$package")
unless $package eq "pst-pad"; # its showexpl.cfg is for the doc
-}
-sub MAKEpstgeo
-{
- print "\t SPECIAL pst-geo $package starts\n";
- $standardtex = qq{^$package(Obj)?\.(tex|sty)}; # for pst-laboObj.tex
- $whichformat='generic';
- $whichdocformat='generic';
- $specialsourcefmt{$package}='generic';
- &setup;
- &xchdir("$DEST/doc/$whichdocformat/$package");
- -d <*/*/*/*/*/.> && &SYSTEM("$MV -f */*/*/*/* .");
- -d <*/*/*/*/.> && &SYSTEM("$MV -f */*/*/* .");
- -d <*/*/*/.> && &SYSTEM("$MV -f */*/* .");
- -d <*/*/.> && &SYSTEM("$MV -f */*/* .");
- -d <*/.> && &SYSTEM("$MV -f */* .");
- &SYSTEM("find -type d -print | xargs rmdir 2>/dev/null");
- &SYSTEM("find -type f -print >/tmp/find");
- &buildfilelist;
-
- $inspatt=$standardins if ! $inspatt;
- &runins($inspatt);
- &buildfilelist;
- &dosource;
- &dotex;
- &dotype1;
- killfiles($standardclean);
- &SYSTEM("mkdir -p $DEST/tex/latex/$package");
- &SYSTEM("mv $DEST/tex/generic/$package/*sty $DEST/tex/latex/$package");
- &SYSTEM("mv $DEST/doc/generic/$package/*sty $DEST/tex/latex/$package");
- &SYSTEM("mv $DEST/doc/generic/$package/*cfg $DEST/tex/latex/$package");
+ my $postaction = $posthook{$package};
+ eval ($postaction) if $postaction;
}
-
sub MAKEfontinst
{
&xchdir ($packagedir);
@@ -3677,7 +3650,7 @@ sub POSTknuth
&SYSTEM ("rm -rf etc mf mfware tex/tex.web tex/trip* texware web/*.web");
}
-sub POSTkoma
+sub POSTkomascript
{
print "POST$package - removing symlinks\n";
&SYSTEM ("find $DEST -type l | xargs --no-run-if-empty rm");
@@ -3731,15 +3704,6 @@ sub POSTpgf
&SYSTEM ("$RM $DEST/README");
}
-# has to be post instead of specialman because we use the tds.zip.
-sub POSTsplitindex
-{
- print "POST$package - mv man page\n";
- my $mydest = "$TOPDEST/texmf/doc/man/man1/";
- &xmkdir ($mydest);
- &SYSTEM ("$MV doc/latex/splitindex/$package.1 $mydest");
-}
-
sub POSTpstcox
{
print "POST$package - mv latex .sty, doc Gallery\n";
@@ -3753,6 +3717,24 @@ sub POSTpstcox
&SYSTEM ("mv -v pst-coxcoor?* pst-coxcoor");
}
+sub POSTpstgeo
+{
+ print "POST$package - mv data, doc\n";
+ &SYSTEM ("$MV data/pst*compress.pl .");
+ &SYSTEM ("$RM dataII/pst*compress.pl");
+ &SYSTEM ("$MV data dataII $DEST/tex/generic/pst-geo/");
+ &SYSTEM ("$MV doc/* .");
+}
+
+# has to be post instead of specialman because we use the tds.zip.
+sub POSTsplitindex
+{
+ print "POST$package - mv man page\n";
+ my $mydest = "$TOPDEST/texmf/doc/man/man1/";
+ &xmkdir ($mydest);
+ &SYSTEM ("$MV doc/latex/splitindex/$package.1 $mydest");
+}
+
sub POSTxecyr
{
print "POST$package - handling bat, moving language.dat.add from runtime\n";
@@ -3764,7 +3746,7 @@ sub POSTxecyr
&SYSTEM ("$MV $DEST/bin/xecyr/*.bat $wdir/");
}
-sub POSTxetex_pstricks
+sub POSTxetexpstricks
{
print "POST$package - need tex/ level\n";
&xchdir ($DEST);