create is now called enter; new "create" first calls enter, then
[unix-history] / usr / src / share / me / index.me
CommitLineData
84f25a89 1.nr _0 \n(c.
d52b8cf4 2.\" @(#)index.me 2.8 %G%
6ac5b741 3.\" %beginstrip%
84f25a89 4.de (x \" *** begin index entry
799e5a57
EA
5.if \n@>4 .tm >> (x, .z=\\n(.z
6.ds |X x
7.if \\n(.$>0 \
8. ds |X \\$1
1b376901
EA
9.\" please note these cases MUST be in this order
10.ie !"\\n(.z"" \
11\{\
12. ev 2 \" if in a diversion, save & process later
799e5a57
EA
13\!.(x \\*(|X
14.rm |X
1b376901
EA
15.\}
16.el \
7180e633 17\{\
7180e633
EA
18. am %\\*(|X )x
19. sp \\n(xsu
d52b8cf4 20. ti -\\n(piu
7180e633 21.\}
84f25a89
EA
22..
23.de )x \" *** end index entry
799e5a57 24.if \n@>4 .tm >> )x, .z=\\n(.z
7180e633
EA
25.ie "\\n(.z"" \
26\{\
27. ds |x \\n%
799e5a57 28. if \\n(.$>0 \
7180e633
EA
29. ds |x \\$1
30. if "\\*(|x"_" \
31. ig ..
32. am %\\*(|X ..
33. if \w"\\$2">(\\n(.l-\\n(.i-\\n(.k) \
34. ti +\\n(xuu
84f25a89
EA
35\\\\a\\\\t\\$2\\*(|x
36...
7180e633
EA
37. rm |x
38. rm |X
39.\}
6f6d9ee7
EA
40.el \
41\{\
799e5a57 42\!.)x \\$1 \\$2
1b376901 43. br \" if in a diversion, save & process later
6f6d9ee7
EA
44. ev
45.\}
84f25a89
EA
46..
47.de xp \" *** print the index
48.br
49.@C 2
50.ls 1
51.vs \\n(.su*\\n($Ru
52.fi
d52b8cf4 53.in +\\n(piu
84f25a89 54.ds |X x
799e5a57 55.if \\n(.$>0 \
84f25a89
EA
56. ds |X \\$1
57.xl -(\\n(xuu+\w'...'u)
58.di |x
59.%\\*(|X
60.br
61.di
62.rm %\\*(|X
63.xl \\n($lu
64.rm |X
65.ev
66.nf
67.in 0
68.ta \\n(.lu-\\n(xuuR \\n(.luR
69.|x
70.fi
71.in
72.rm |x
73..
74.if \n(xu<=0 \
75. nr xu 0.5i \" index undent
76.nr c. \n(_0