X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=xfonts-traditional.git;a=blobdiff_plain;f=update-xfonts-traditional;h=01ae14584e645a15533bace6d52ce8c20024c8be;hp=8dccad424924f88c36c012ceab5cc6a69a72cc14;hb=a6bafbd15bc99ab5efc7a20e86dd78fbb4ac4166;hpb=ced98e3d359fbe2910913f8ff4d7a339ebf2c8d2 diff --git a/update-xfonts-traditional b/update-xfonts-traditional index 8dccad4..01ae145 100755 --- a/update-xfonts-traditional +++ b/update-xfonts-traditional @@ -241,16 +241,23 @@ sub process_filter ($$$$$$$$) { # for some other reason then sending it a KILL now won't # affect its exit status.) We kill the output filters (before # we close the output pipe) so we don't produce messages from - # our output filters about corrupted data. + # our output filters about corrupted data. And we tolerate + # SIGPIPE in all the input filters. flush $uswrite or die $!; + my $filterkind = 'input'; foreach my $ch (@children) { if ($ch->{Stage} ne 'self') { kill 9, $ch->{Pid} or die "$ch->{Pid} $ch->{Exe} $!"; $ch->{SigOK}{9} = 1; + } else { + $filterkind = 'output'; + next; + } + if ($filterkind eq 'input') { + $ch->{SigOK}{13} = 1; } } - $ch{'pcf2bdf'}{SigOK}{13} = 1; # ... we might not have read all the output from pcf2bdf, which is OK }