14 lines
184 B
Plaintext
14 lines
184 B
Plaintext
|
#!/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
|