[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[no subject]
From: |
Gavin D. Smith |
Date: |
Sun, 25 Dec 2022 09:26:25 -0500 (EST) |
branch: master
commit 2510193c5f066915fdf29e7ea3fdf8635ed376f8
Author: Gavin Smith <gavinsmith0123@gmail.com>
AuthorDate: Sun Dec 25 14:26:17 2022 +0000
* doc/texinfo.tex: At end of file, move more definitions before
the change from \ to @ as the escape character.
(\normalturnoffactive, \turnoffactive): Define \normalturnoffactive
in terms of \turnoffactive instead of vice versa.
---
ChangeLog | 7 +++++++
doc/texinfo.tex | 53 +++++++++++++++++++++++++++--------------------------
2 files changed, 34 insertions(+), 26 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 22c241cfdf..9ad5ded05d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2022-12-25 Gavin Smith <gavinsmith0123@gmail.com>
+
+ * doc/texinfo.tex: At end of file, move more definitions before
+ the change from \ to @ as the escape character.
+ (\normalturnoffactive, \turnoffactive): Define \normalturnoffactive
+ in terms of \turnoffactive instead of vice versa.
+
2022-12-25 Gavin Smith <gavinsmith0123@gmail.com>
Reduce scope of catcode changes throughout texinfo.tex
diff --git a/doc/texinfo.tex b/doc/texinfo.tex
index 92c41e7586..c3c8f690b0 100644
--- a/doc/texinfo.tex
+++ b/doc/texinfo.tex
@@ -3,7 +3,7 @@
% Load plain if necessary, i.e., if running under initex.
\expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi
%
-\def\texinfoversion{2022-12-25.15}
+\def\texinfoversion{2022-12-25.16}
%
% Copyright 1985, 1986, 1988, 1990-2022 Free Software Foundation, Inc.
%
@@ -11649,23 +11649,26 @@ directory should work if nowhere else does.}
% Used sometimes to turn off (effectively) the active characters even after
% parsing them.
\def\turnoffactive{%
- \normalturnoffactive
+ \passthroughcharstrue
+ \let-=\normaldash
+ \let"=\normaldoublequote
+ \let$=\normaldollar %$ font-lock fix
+ \let+=\normalplus
+ \let<=\normalless
+ \let>=\normalgreater
+ \let^=\normalcaret
+ \let_=\normalunderscore
+ \let|=\normalverticalbar
+ \let~=\normaltilde
\otherbackslash
+ \setregularquotes
+ \unsepspaces
}
-\catcode`\@=0
-
% \backslashcurfont outputs one backslash character in current font,
% as in \char`\\.
\global\chardef\backslashcurfont=`\\
-% \realbackslash is an actual character `\' with catcode other.
-{\catcode`\\=\other @gdef@realbackslash{\}}
-
-% In Texinfo, backslash is an active character; it prints the backslash
-% in fixed width font.
-\catcode`\\=\active % @ for escape char from now on.
-
% Print a typewriter backslash. For math mode, we can't simply use
% \backslashcurfont: the story here is that in math mode, the \char
% of \backslashcurfont ends up printing the roman \ from the math symbol
@@ -11675,8 +11678,18 @@ directory should work if nowhere else does.}
% ignored family value; char position "5C). We can't use " for the
% usual hex value because it has already been made active.
-@def@ttbackslash{{@tt @ifmmode @mathchar29020 @else @backslashcurfont @fi}}
-@let@backslashchar = @ttbackslash % @backslashchar{} is for user documents.
+\def\ttbackslash{{\tt \ifmmode \mathchar29020 \else \backslashcurfont \fi}}
+\let\backslashchar = \ttbackslash % \backslashchar{} is for user documents.
+
+
+\catcode`\@=0
+
+% \realbackslash is an actual character `\' with catcode other.
+{\catcode`\\=\other @gdef@realbackslash{\}}
+
+% In Texinfo, backslash is an active character; it prints the backslash
+% in fixed width font.
+\catcode`\\=\active % @ for escape char from now on.
% \otherbackslash defines an active \ to be a literal `\' character with
% catcode other.
@@ -11687,20 +11700,8 @@ directory should work if nowhere else does.}
%
{@catcode`- = @active
@gdef@normalturnoffactive{%
- @passthroughcharstrue
- @let-=@normaldash
- @let"=@normaldoublequote
- @let$=@normaldollar %$ font-lock fix
- @let+=@normalplus
- @let<=@normalless
- @let>=@normalgreater
- @let^=@normalcaret
- @let_=@normalunderscore
- @let|=@normalverticalbar
- @let~=@normaltilde
+ @turnoffactive
@let\=@ttbackslash
- @setregularquotes
- @unsepspaces
}
}