Mercurial > hg > xemacs-beta

annotate lib-src/mule/any2ps @ 70:131b0175ea99 r20-0b30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-0b30
author cvs
date Mon, 13 Aug 2007 09:02:59 +0200
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
70
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
1 #!/bin/sh
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
2 # Usage: any2ps [-in coding-system ] [options_of_m2ps ..] <infile >outfile
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
3
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
4 CODING=
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
5 if [ "$1" = "-in" -a -n "$2" ] ; then
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
6 CODING=$2;
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
7 shift; shift;
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
8 fi
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
9
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
10 coco ${CODING} '*internal*' | m2ps $*