X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=xfonts-traditional.git;a=blobdiff_plain;f=update-xfonts-traditional;h=63e9040d4a5572a8e14ba842526a48644c0a0621;hp=2e8c0d7888b628307175ad867f09f23822cd6e9f;hb=0e320c78a65ebb83a3ab4245a0f25d39ad4eeec9;hpb=bd7891126edbe8500e813f10a78082b27156faef

diff --git a/update-xfonts-traditional b/update-xfonts-traditional
index 2e8c0d7..63e9040 100755
--- a/update-xfonts-traditional
+++ b/update-xfonts-traditional
@@ -23,6 +23,7 @@ our $verbose=0;
 our $reportfh;
 our $foundryinfo;
 our %props;
+our $tolerate_bad_fonts=1;
 our $wanted_parallel;
 
 sub reportloaded {
@@ -259,6 +260,15 @@ sub processpcfgz ($$$$) {
 	return !$st || $ch->{SigOK}{($st & ~128)};
     };
 
+    if ($tolerate_bad_fonts &&
+	$r eq 'no bdf data' &&
+	$st_isok->($ch{'gunzip'}) &&
+	($ch{'pcf2bdf'}{St} & ~128) == 6)
+    {
+	$r = "pcf2bdf failed ($ch{'pcf2bdf'}{St})";
+	print STDERR "warning: $r: skipping $inpcfgz\n";
+	$ch{'pcf2bdf'}{SigOK}{6} = 1;
+    }
     foreach my $ch (@children) {
 	if (!$st_isok->($ch)) {
 	    die "update-xfonts-traditional:".
@@ -443,6 +453,7 @@ our (@options)=(
     'share-dir=s' => \$sharedir,
     'verbose|v+' => \$verbose,
     'j|parallel=i' => \$wanted_parallel,
+    'tolerate-bad-fonts!' => \$tolerate_bad_fonts,
     );
 
 sub define_mode ($$) {