shithub: riscv

ref: 3f9d5e4a4f9e4f0b5fe66e4a6745a4b8c5f6e447
dir: /sys/doc/cleanps/

View raw version 
#!/bin/rc

if(! ~ $#* 1){
	echo usage: cleanps infile >[1=2]
	exit usage
}

{
echo %!PS-Adobe-2.0
cat /sys/doc/preamble
grep -v '^%%DocumentFonts' $1
} > cleanps.tmp
mv cleanps.tmp $1