1 files changed, 31 insertions, 26 deletions
diff --git a/Master/texmf-dist/doc/latex/gmdoc/basedrivers/source2e_gmdoc.tex b/Master/texmf-dist/doc/latex/gmdoc/basedrivers/source2e_gmdoc.tex
index 47a14531209..cdfcd7b0626 100644
--- a/Master/texmf-dist/doc/latex/gmdoc/basedrivers/source2e_gmdoc.tex
+++ b/Master/texmf-dist/doc/latex/gmdoc/basedrivers/source2e_gmdoc.tex
@@ -108,21 +108,18 @@ page_precedence "rnaA"
 \PassOptionsToPackage{indexallmacros}{gmdoc}
 
 \if1 1
-  \documentclass[debug,gmeometric]{gmdocc}% 
+  \documentclass[debug,minion]{gmdocc}% 
   \mcdiagOn
 \else
-  \documentclass[gmeometric]{gmdocc}%
+  \documentclass[sysfonts]{gmdocc}%
 \fi
 
-\bgroup\catcode`_=12
-\firstofone{\egroup
-  \if1 1\includeonly{source2e_by_gmdoc}\fi}
-
-
+\foone{\catcode`_=12 }
+{\if1 1\includeonly{source2e_by_gmdoc}\fi}
 
 %^^A\usepackage[margin=2cm,b5paper]{geometry}% and this
-\usepackage{oldcomm}% Definitions of \env{oldcomments} and |\task|
-% copied from \file{ltxdoc.dtx}. 
+\usepackage{gmoldcomm}% Definitions of \env{oldcomments} and |\task|.
+
 
 \listfiles
 
@@ -137,8 +134,6 @@ page_precedence "rnaA"
 % remains shortverb in math mode (by default I~define it to be $\vert$ in
 % math mode.
 
-
-
 % Do not index some TeX primitives, and some common plain TeX commands.
 
 \DoNotIndex{\def,\long,\edef,\xdef,\gdef,\let,\global}
@@ -208,8 +203,19 @@ page_precedence "rnaA"
 \usepackage{textcomp}
 
 \olddocIncludes
+\HideAllDefining
+
+\fooatletter{%
+  \@ifXeTeX{%
+    \def\"#1{%
+      \if o#1\oumlaut\fi
+      \if u#1\uumlaut\fi
+%^^A  \else\typeout{****** \cs{"} with argument }\show#1\fi
+    }}{}}
 
 \begin{document}
+
+
  \title{The \LaTeXe\ Sources\thanks{Typeset with \pk{gmdoc} by Natror
      on \today.}}
  \author{%
@@ -265,16 +271,16 @@ page_precedence "rnaA"
 \fi
 \makeatother
 
- \pagenumbering{roman}
- \thispagestyle{empty}
- \maketitle
- \emptify\maketitle
+\pagenumbering{roman}
+\thispagestyle{empty}
+\maketitle
+\emptify\maketitle
 
- \tableofcontents
+\tableofcontents
 
- \clearpage
+\clearpage
 
- \pagenumbering{arabic}
+\pagenumbering{arabic}
 
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -292,8 +298,8 @@ page_precedence "rnaA"
 % the entire source of the format file. Note that such a document will
 % be quite large (about 555 pages).
 %
-
- \DocInclude[\BasePath]{ltdirchk} % System dependent initialisation
+ 
+\DocInclude[\BasePath]{ltdirchk} % System dependent initialisation
 
 \AfterMacrocode{53}{\def\do{\cs{do}}}% A~bare |\do| in narration on
 % line 161.
@@ -425,11 +431,10 @@ page_precedence "rnaA"
   % precedes |\else|. So if the argument was a~CS, its backslash will
   % be gobbled by |\if|. Otherwise |\if...\fi| expands to what is
   % between |\else| and |\fi|, to the unchanged argument that is. Then
-  % to that expanded list of tokens the original |\cs| is applied.
+  % to that list of tokens the original |\cs| is applied.
   \let\GMDebugCS\cs
-  \def\cs#1{\edef\AtTempa{\if\bslash\string#1\else#1\fi}%
-    \GMDebugCS{\AtTempa}}
-\PrintChanges}
+  \def\cs#1{\GMDebugCS{\if\bslash\string#1\else#1\fi}}%
+  \PrintChanges}
 
 \typeout{%
   ^^JProduce index with^^J%
@@ -466,13 +471,13 @@ page_precedence "rnaA"
 \gmdocIncludes
 \SelfInclude{%^^A\def\CommonEntryCmd{UsgEntry}%\label{UsgHack}
   % ^^A\label{SelfIncludeUsg}
-  \csname gag@index\endcsname% we tur writing outto the \file{.idx}
+  \csname gag@index\endcsname% we turn writing outto the \file{.idx}
   % out for the driver since it's \emph{not} a~part of The Source.
 %^^A  \filediv[The New Driver?]{How I~did It or \gmhypertarget{The Driver} File}% 
 }
 
 \end{document}
-%\endinput
+%\NoEOF
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%