cleanps 184 B

12345678910111213
  1. #!/bin/rc
  2. if(! ~ $#* 1){
  3. echo usage: cleanps infile >[1=2]
  4. exit usage
  5. }
  6. {
  7. echo %!PS-Adobe-2.0
  8. cat /sys/doc/preamble
  9. grep -v '^%%DocumentFonts' $1
  10. } > cleanps.tmp
  11. mv cleanps.tmp $1