summaryrefslogtreecommitdiff
path: root/Build
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-05-03 22:45:19 +0000
committerKarl Berry <karl@freefriends.org>2006-05-03 22:45:19 +0000
commit152bb89af43aa5483e42e9b3981c6437bd4be059 (patch)
tree24cd7a5ddd66caf509e7d24dedf95298d92e7cc9 /Build
parentec949a72dc92282187534262a2eaea9f80e021b3 (diff)
(runmf): don't mv *.mf unless we have some.
git-svn-id: svn://tug.org/texlive/trunk@1568 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build')
-rwxr-xr-xBuild/cdbuild/ctan2tds.pl31
1 files changed, 17 insertions, 14 deletions
diff --git a/Build/cdbuild/ctan2tds.pl b/Build/cdbuild/ctan2tds.pl
index 4a77b31520a..0cd078f3f1c 100755
--- a/Build/cdbuild/ctan2tds.pl
+++ b/Build/cdbuild/ctan2tds.pl
@@ -1132,9 +1132,8 @@ sub doxmt{
sub domf {
# build the font files
- $mfpatt = $specialmf{$package};
- if ($mfpatt eq "") { $mfpatt=$standardmf; }
- &runmf($mfpatt);
+ $mfpatt = $specialmf{$package} || $standardmf;
+ &runmf ($mfpatt);
}
sub rundvi {
@@ -1145,7 +1144,7 @@ sub rundvi {
else { $TEX=$whichformat; }
}
if ($TEX eq "generic") { $TEX="pdflatex"; }
- print "\t MAKEDVI $thispatt, $TEX, @filenames\n";
+ print "\t MAKEDVI $thispatt using $TEX (@filenames)\n";
for (grep(/$thispatt/,@filenames)) {
($FileBase,$Filepath,$Filesuffix) = fileparse($_,"\.[A-z]*");
print "found $FileBase\n";
@@ -1166,7 +1165,7 @@ sub rundvi {
}
&runjob("$TEX '\\nonstopmode\\input $FileBase$Filesuffix'");
}
- print "DVI over\n";
+ print "\t MAKEDVI done\n";
}
#
# run a &SYSTEM job, and append stderr output to log file
@@ -1204,21 +1203,25 @@ sub buildfilelist {
}
sub runmf {
- local($mfpatt) = @_;
- $needdir=1;
+ my ($mfpatt) = @_;
+ my $needdir=0;
print "\t Make fonts for $package ($mfpatt)\n";
for (grep(/$mfpatt/,@filenames)) {
$needdir=1;
print "\t\t Make TFM from $_\n";
($FileBase,$Filepath,$Filesuffix) = fileparse($_,"\.[A-z]*");
- if (-e "$FileBase.tfm") { }
- else {
- &runjob("mktextfm --destdir=`pwd` $FileBase.tfm");
- }
+ if (! -e "$FileBase.tfm") {
+ &runjob("mktextfm --destdir=`pwd` $FileBase.tfm");
+ }
}
- &SYSTEM("mkdir -p $DEST/fonts/source/$Foundry/$package");
- &runjob("$MV *.mf $DEST/fonts/source/$Foundry/$package");
- &SYSTEM("rm -f *pk"); # not worth the space
+ if ($needdir) {
+ &SYSTEM("mkdir -p $DEST/fonts/source/$Foundry/$package");
+ # don't use $mfpatt since that's only the tfm-able mf files.
+ &runjob("$MV *.mf $DEST/fonts/source/$Foundry/$package");
+ &SYSTEM("rm -f *pk"); # not worth the space
+ } else {
+ print "\t (no $mfpatt)\n";
+ }
}
sub runfonts {