%
% re-define _ to be normal, and to provide a reasonable underscore.
%
+\catcode`\_=12
+\def\cctwlunder{_}
+
\catcode`\_=\active
\def\_{_}
\def_{\leavevmode {\tt \char95}}
+%
+% fix up index commands to deal with active _
+% from LATEX.TEX:
+% LATEX VERSION 2.09 <4 Aug 1988>, Copyright (C) 1988 by Leslie Lamport
+
+\def\makeindex{\if@filesw \newwrite\@indexfile
+ \immediate\openout\@indexfile=\jobname.idx
+ \def\index{\let_=\cctwlunder\@bsphack\begingroup
+ \def\protect####1{\string####1\space}\@sanitize
+ \@wrindex\@indexfile}\typeout
+ {Writing index file \jobname.idx }\fi}
%
% re-define _ to be normal, and to provide a reasonable underscore.
%
+\catcode`\_=12
+\def\cctwlunder{_}
+
\catcode`\_=\active
\def\_{_}
\def_{\leavevmode {\tt \char95}}
+%
+% fix up index commands to deal with active _
+% from LATEX.TEX:
+% LATEX VERSION 2.09 <4 Aug 1988>, Copyright (C) 1988 by Leslie Lamport
+
+\def\makeindex{\if@filesw \newwrite\@indexfile
+ \immediate\openout\@indexfile=\jobname.idx
+ \def\index{\let_=\cctwlunder\@bsphack\begingroup
+ \def\protect####1{\string####1\space}\@sanitize
+ \@wrindex\@indexfile}\typeout
+ {Writing index file \jobname.idx }\fi}