doc-src/sedindex
author wenzelm
Mon, 29 Nov 1993 12:27:29 +0100
changeset 164 43506f0a98ae
parent 103 30bd42401ab2
child 357 a2c5cd25906e
permissions -rwxr-xr-x
added SCANNER; changed scan_any: no longer uses take_prefix;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
103
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
     1
#! /bin/sh
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
     2
#
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
     3
#sedindex - shell script to create indexes, preprocessing LaTeX's .idx file
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
     4
#
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
     5
#  puts strings prefixed by * into \tt font
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
     6
#    terminator characters for strings are |!@{}
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
     7
#
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
     8
# change *"X"Y"Z"W  to  "X"Y"Z"W@{\tt "X"Y"Z"W}
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
     9
# change *"X"Y"Z    to  "X"Y"Z@{\tt "X"Y"Z}
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
    10
# change *"X"Y      to  "X"Y@{\tt "X"Y}
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
    11
# change *"X        to  "X@{\tt "X}
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
    12
# change *IDENT  to  IDENT@{\tt IDENT}  
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
    13
#    where IDENT is any string not containing | ! or @
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
    14
# FOUR backslashes: to escape the shell AND sed
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
    15
sed -e "s~\*\(\".\".\".\".\)~\1@{\\\\tt \1}~g
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
    16
s~\*\(\".\".\".\)~\1@{\\\\tt \1}~g
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
    17
s~\*\(\".\".\)~\1@{\\\\tt \1}~g
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
    18
s~\*\(\".\)~\1@{\\\\tt \1}~g
30bd42401ab2 Initial revision
lcp
parents:
diff changeset
    19
s~\*\([^|!@{}][^|!@{}]*\)~\1@{\\\\tt \1}~g" $1.idx | makeindex -q -o $1.ind