Re: [9fans] Fax problem

[Richard Miller <miller@hamnavoe.demon.co.uk>]

If we're going to fix fax, we might as well also handle the general
case of faxing multiple files of different type.  How about replacing
the switch(`{file $infiles(1)}) statement -- which only checks the type
of the first file -- with something like this:

# convert to g3
g3files=()
ntmp=1
for (infile in $infiles) {
	otmp=$tmp.$ntmp
	ntmp=`{echo $ntmp+1 | hoc}
	switch(`{file <$infile}){
	case *g3* *fax*
		g3files=($g3files $infile)
	case postscript
		gs -dSAFER '-sDEVICE=dfaxlow' '-sOUTPUTFILE='$otmp.'.%03d' -dNOPAUSE -d	QUIET $infile quit.ps
		g3files=($g3files $otmp.*)
	case *
		lp -dstdout $infile > $tmpps
		gs -dSAFER '-sDEVICE=dfaxlow' '-sOUTPUTFILE='$otmp'.%03d' -dNOPAUSE -dQUIET $tmpps quit.ps
		g3files=($g3files $otmp.*)
	}
}

-- Richard