Path: utzoo!attcan!uunet!mcvax!ukc!eagle.ukc.ac.uk!iau
From: iau@ukc.ac.uk (I.A.Utting)
Newsgroups: comp.text
Subject: Re: troff macro problem
Keywords: diversion thesis list of figures
Message-ID: <5938@eagle.ukc.ac.uk>
Date: 18 Nov 88 10:12:22 GMT
References: <13138@pollux.UUCP>
Reply-To: iau@ukc.ac.uk (I.A.Utting)
Organization: Computing Lab, University of Kent at Canterbury, UK.
Lines: 114

In article <13138@pollux.UUCP> lll@pollux.UUCP (Laurence Leff) writes:
>I am having trouble making the correct page number appear
>on a list of figures, when the figure caption appears inside
>the ms macros KS-KE pair of KF KE pair.

I have always had great success using these macros, which came off the net
back in the dawn of time. I've no documentation other than these comments.

----------cut here---------
.\"     Do a command OUtside of diversions, or for EVery diversion level.
.\"     (Use OU and EV for macro calls, Ou and Ev for bare nroff commands.)
.\"
.\"	Uparrow is used instead of backslash for the escape character
.\"	so that you needn't count backslashes.  Just use one uparrow where
.\"	you would want a backslash in the final command.
.\"
.\"     Examples:
.\"
.\"	".Ev .cs R 25" can be used in a display to set constant spacing
.\"     mode such that it will again be in effect whenever the display
.\"     is pulled back in from the diversion.
.\"
.\"	If number register P contains the current page number,
.\"	.Ou .tm Current page number is ^nP
.\"	will dump the correct page number to fd 2 regardless of how many
.\"	levels deep in diversion you are, and how many pages your floating
.\"	display floated across.
.\"
.\"	Written by:
.\"		Larry Wall
.\"		{allegra,burdvax,cbosgd,hplabs,ihnp4,sdcsvax}!sdcrdcf!lwall
.de Ou
.ie '\\n(.z'' \\{\\
.di ??
\!\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
.di
.ec ^
.??
.ec
.rm ??
'br\\}
.el \\{\\
\!.ie '\\\\n(.z'' \\\\{\\\\
\!.ec ^
\!\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
\!.ec
\!'br\\\\}
\!.el \\\\{\\\\
\!.Ou "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
\!'br\\\\}
'br\\}
..
.de Ev
.di ??
\!\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
.di
.ec ^
.??
.ec
.rm ??
.if !'\\n(.z'' \\{\\
\!.ie '\\\\n(.z'' \\\\{\\\\
\!.ec ^
\!\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
\!.ec
\!'br\\\\}
\!.el \\\\{\\\\
\!.Ev "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
\!'br\\\\}
'br\\}
..
.\"
.\"	Same as above, but quoting is different
.\"
.de OU
.ie '\\n(.z'' \\{\\
.di ??
\!\\$1 "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
.di
.ec ^
.??
.ec
.rm ??
'br\\}
.el \\{\\
\!.ie '\\\\n(.z'' \\\\{\\\\
\!.ec ^
\!\\$1 "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
\!.ec
\!'br\\\\}
\!.el \\\\{\\\\
\!.OU "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
\!'br\\\\}
'br\\}
..
.de EV
.di ??
\!\\$1 "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
.di
.ec ^
.??
.ec
.rm ??
.if !'\\n(.z'' \\{\\
\!.ie '\\\\n(.z'' \\\\{\\\\
\!.ec ^
\!\\$1 "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
\!.ec
\!'br\\\\}
\!.el \\\\{\\\\
\!.EV "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
\!'br\\\\}
'br\\}
..