diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /obsolete/support/windex/windex.tex |
Initial commit
Diffstat (limited to 'obsolete/support/windex/windex.tex')
-rw-r--r-- | obsolete/support/windex/windex.tex | 66 |
1 files changed, 66 insertions, 0 deletions
diff --git a/obsolete/support/windex/windex.tex b/obsolete/support/windex/windex.tex new file mode 100644 index 0000000000..2374e039e5 --- /dev/null +++ b/obsolete/support/windex/windex.tex @@ -0,0 +1,66 @@ +% File windex.tex +% Macro for writing out index files (.idx files) for use with windex +% Author: Ronald L. Rivest +% Date: 11/20/89 +% Note: If you are using windex, then this file should be input into +% your source file before and \index commands are given. +% (It need not precede the \makeindex command.) +% At the end of your file foo, you can place the commands +% \makeatletter +% \@input{foo.index} +% \makeatother +% just before the \end{document} command. +% (These command are equivalent to +% \input{foo.index} +% unless foo.index doesn't yet exist, in which case \@input +% merely prints a warning message and procedes, whereas \input +% asks you for another file name.) + +\makeatletter + +%% The following causes all indexed terms to be printed in the right-hand +%% margin of the page. +%% To kill this effect, redefine \indexmargin to be a null macro + +%% The following is for debugging (produces marginal index terms) +%% Comment this out for production; leave in for debugging. +%\newcommand{\indexmargin}[1]{{\tiny\marginpar{#1}}} +%% The following is for production (no marginal index terms) +%% Comment this out for debugging; leave in for production. +\newcommand{\indexmargin}[1]{} + +\@mparswitchfalse % Cause all marginal pars to go on right side + +%% End of marginal notes for index terms hack + +%% Make all characters ``other'' so that par box doesn't give errors +\def\@makeallother{% +\@makeother a\@makeother n\@makeother A\@makeother N% +\@makeother b\@makeother o\@makeother B\@makeother O% +\@makeother c\@makeother p\@makeother C\@makeother P% +\@makeother d\@makeother q\@makeother D\@makeother Q% +\@makeother e\@makeother r\@makeother E\@makeother R% +\@makeother f\@makeother s\@makeother F\@makeother S% +\@makeother g\@makeother t\@makeother G\@makeother T% +\@makeother h\@makeother u\@makeother H\@makeother U% +\@makeother i\@makeother v\@makeother I\@makeother V% +\@makeother j\@makeother w\@makeother J\@makeother W% +\@makeother k\@makeother x\@makeother K\@makeother X% +\@makeother l\@makeother y\@makeother L\@makeother Y% +\@makeother m\@makeother z\@makeother M\@makeother Z% +\@makeother /\@makeother !\@makeother <\@makeother >% +\@makeother \$\@makeother [\@makeother ]% +%\@makeother\ +\@makeother\\\@makeother\$\@makeother\&% +\@makeother\#\@makeother\^\@makeother\^^K\@makeother\_\@makeother\^^A% +\@makeother\%\@makeother\~} + +\def\index{\@bsphack\begingroup\@makeallother\@wrindex\@indexfile} + +%% In the following #1 is the file,#2 is the string being indexed +\def\@wrindex#1#2{\let\thepage\relax + \indexmargin{\fbox{\parbox[t]{1in}{#2}}}% + \xdef\@gtempa{\write#1{#2:\thepage}}\endgroup\@gtempa + \if@nobreak \ifvmode\nobreak\fi\fi\@esphack} + +\makeatother |