in=$f/$pcf.pcf.gz
out=$f/$pcf.bdf
if [ -e $in ]; then
- zcat $in | pcf2bdf >$out
+ zcat $in | pcf2bdf | ./bdfnorm >$out
elif [ -e "$out.direct" ]; then
- cp "$out.direct" "$out"
+ ./bdfnorm <"$out.direct" >"$out"
elif [ -e "$f/$pcf.sfd" ]; then
./ffconvert.pe "$f/$pcf"
- # 1. fontforge writes a silly filename
- # 2. our crappy machinery copes only
- # with BDFs all of whose chars have
- # the bbox of the font
+ # fontforge writes a silly filename
./bdfnorm <"$f/$pcf".BDF*.bdf >$out
else
echo >&2 "cannot make $out!"
our $donefile="$package.done";
our $logfile="$package.log";
our $fontprefix="trad--";
+our $bdfnorm="bdfnorm";
our @rulespath;
our $mode;
our %foundrymap;
my $r;
process_filter(\$r, $input, $output, $inpcfgz, $logfh,
[
- ['gunzip'], ['pcf2bdf'],
+ ['gunzip'], ['pcf2bdf'], [$bdfnorm],
[],
['bdftopcf'],['',qw(gzip -1 -n)]
],
GetOptions(@options) or exit 127;
push @rulespath, "$sharedir/rules";
+$bdfnorm = "$sharedir/$bdfnorm";
die "need a mode\n" unless $mode;