summaryrefslogtreecommitdiff
path: root/Master/tlpkg/libexec/ctan2tds
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2012-01-31 01:17:53 +0000
committerKarl Berry <karl@freefriends.org>2012-01-31 01:17:53 +0000
commit5c01d6ca1760f78d5b83b08e695e958618044348 (patch)
treeaee939610e9d4d0726674255d004253aa7b62a98 /Master/tlpkg/libexec/ctan2tds
parent7897713eab49f38e5bdc53c28bc7d4d770eb9a32 (diff)
tipa non-update, for vowel.pdf (29jan12)
git-svn-id: svn://tug.org/texlive/trunk@25247 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/libexec/ctan2tds')
-rwxr-xr-xMaster/tlpkg/libexec/ctan2tds41
1 files changed, 15 insertions, 26 deletions
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds
index 7ce470b3cc3..351d37d1974 100755
--- a/Master/tlpkg/libexec/ctan2tds
+++ b/Master/tlpkg/libexec/ctan2tds
@@ -1299,6 +1299,13 @@ $standardtex='\.(.bx|cfg|sty|clo|ldf|cls|def|fd|cmap|4ht)$';
'ticket', '\.tdf|' . $standardtex,
'tikz-cd', 'tikz-cd.sty', # not pgfmanual.sty
'tikz-qtree', '(pgf|tikz-)(subpic|q?tree(-compat)?)\.(tex|sty)',
+ # tipa: we want to install all .sty except tipaman|boxchar|codelist.
+ # i can't explain why ^(?!...), the "zero-width negative look-ahead
+ # assertion", is what works, but it does. found in (and modified from)
+ # the perl cookbook,
+ # http://docstore.mik.ua/orelly/perl/cookbook/ch06_18.htm,
+ # Expressing AND, OR, and NOT in a Single Pattern. Fun, huh?
+ 'tipa', '\.fd$|\.def$|^(?!tipaman|boxchar|codelist).*\.sty$',
'tipa-de', 'NULL', # doc package
'titleref', '^..[^s].*\.sty', # not miscdoc.sty
'tkz-orm', 'tkz.*\.sty', # no pgfmanual.sty
@@ -1943,6 +1950,7 @@ $standardmfinstall = '\.mf$';
'ibygrk' => 'ibycus4\.map', # tex|mf source
'ifsym' => $standardmfinstall . '|\.gen',
'niceframe', => '(karta|umrand).*\.mf', # not bbding or dingbat
+ 'tipa' => $standardmfinstall . '|[^c]\.def$',
'wnri' => $standardmfinstall . '|wnindic\.map',# mf source
);
@@ -2968,16 +2976,14 @@ EOF
}
# rebuild list of input files, e.g., after flattening
-sub buildfilelist
-{
+sub buildfilelist {
print "doing buildfilelist()...\n";
opendir (DIR ,'.') || die "opendir(.) failed: $!";
@filenames = grep (!/^\.\.?$/, readdir (DIR));
closedir (DIR);
}
-sub runmf
-{
+sub runmf {
my ($mfpatt) = @_;
print "\t doing runmf for $package ($mfpatt)\n";
for my $file (grep (/$mfpatt/, @filenames)) {
@@ -3002,7 +3008,7 @@ sub runfonts {
}
&SYSTEM("$MV $FileBase.vf $DEST/fonts/vf/$Foundry/$package ");
}
- for (grep(/.tfm/,@filenames)) {
+ for (grep(/\.tfm$/,@filenames)) {
$needdir=1;
print "\t\t INSTALL tfm $_\n";
($FileBase,$Filepath,$Filesuffix) = fileparse($_,"\.[A-z]*");
@@ -3033,10 +3039,12 @@ sub MAKEflatten {
&SYSTEM ("find . -type l | xargs --no-run-if-empty $RM");
# mv foo/README to README.foo. README.txt is for psfragx.
- # LISEZ-MOI is for bclogo.
+ # LISEZ-MOI is for bclogo. Makefile and 00README are for tipa.
# Obviously should be generalized to non-README files.
my $findcmd = "find . -mindepth 2 '(' "
- . "-name README -o -name README.txt -o -name LISEZ-MOI ')'";
+ . "-name README -o -name README.txt -o -name LISEZ-MOI "
+ . "-o -name Makefile -o -name 00README "
+ . "')'";
&SYSTEM ("for r in `$findcmd`; do"
. ' mv $r $r.`basename \`dirname $r\``; done');
@@ -3816,25 +3824,6 @@ sub MAKEtkz {
&SYSTEM ("find -depth -type d -print | xargs rmdir 2>/dev/null");
}
-sub MAKEtipa {
- &xchdir("$packagedir"); #/tipa-1.3");
- my $Foundry = "public";
- &runjob("mkdir -p $DEST/fonts/source/$Foundry/tipa");
- &runjob("mkdir -p $DEST/fonts/type1/$Foundry/tipa");
- &runjob("mkdir -p $DEST/fonts/tfm/$Foundry/tipa");
- &runjob("mkdir -p $DEST/fonts/map/dvips/tipa");
- &runjob("mkdir -p $DEST/tex/latex/tipa");
- &runjob("mkdir -p $DEST/doc/fonts/tipa");
- &runjob("mkdir -p $DEST/source/latex/tipa");
- &runjob("$CP dvips/* $DEST/fonts/map/dvips/tipa");
- &runjob("$CP sty/* $DEST/tex/latex/tipa");
- &runjob("$CP tfm/* $DEST/fonts/tfm/$Foundry/tipa");
- &runjob("$CP type1/* $DEST/fonts/type1/$Foundry/tipa");
- &runjob("$CP mf/* $DEST/fonts/source/$Foundry/tipa");
- &runjob("$CP doc/* $DEST/doc/fonts/tipa");
- &runjob("$CP ../tipaman.pdf $DEST/doc/fonts/tipa");
-}
-
# docs in two languages. The English one is in a separate package,
# mathmode. Just remove it from the copy when building the German one.
#