Normalise bdfs before all rule generation and on-system processing

1 files changed, 3 insertions, 1 deletions

diff --git a/update-xfonts-traditional b/update-xfonts-traditional
index 01ae145..494d637 100755
--- a/update-xfonts-traditional
+++ b/update-xfonts-traditional
@@ -16,6 +16,7 @@ our @fonttrees=qw(/usr/share/fonts/X11 /usr/local/share/fonts/X11);
 our $donefile="$package.done";
 our $logfile="$package.log";
 our $fontprefix="trad--";
+our $bdfnorm="bdfnorm";
 our @rulespath;
 our $mode;
 our %foundrymap;
@@ -291,7 +292,7 @@ sub processpcfgz ($$$$) {
     my $r;
     process_filter(\$r, $input, $output, $inpcfgz, $logfh,
         [
-	    ['gunzip'], ['pcf2bdf'],
+	    ['gunzip'], ['pcf2bdf'], [$bdfnorm],
 	    [],
 	    ['bdftopcf'],['',qw(gzip -1 -n)]
 	],
@@ -548,6 +549,7 @@ Getopt::Long::Configure(qw(bundling));
 GetOptions(@options) or exit 127;
 
 push @rulespath, "$sharedir/rules";
+$bdfnorm = "$sharedir/$bdfnorm";
 
 die "need a mode\n" unless $mode;