summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/latex/base/ltfssdcl.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/source/latex/base/ltfssdcl.dtx')
-rw-r--r--Master/texmf-dist/source/latex/base/ltfssdcl.dtx62
1 files changed, 35 insertions, 27 deletions
diff --git a/Master/texmf-dist/source/latex/base/ltfssdcl.dtx b/Master/texmf-dist/source/latex/base/ltfssdcl.dtx
index f2aee76bdab..da024b1f1e6 100644
--- a/Master/texmf-dist/source/latex/base/ltfssdcl.dtx
+++ b/Master/texmf-dist/source/latex/base/ltfssdcl.dtx
@@ -1,6 +1,6 @@
% \iffalse meta-comment
%
-% Copyright 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004
+% Copyright 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006
% The LaTeX3 Project and any individual authors listed elsewhere
% in this file.
%
@@ -8,12 +8,12 @@
% -------------------------------------------
%
% It may be distributed and/or modified under the
-% conditions of the LaTeX Project Public License, either version 1.3
+% conditions of the LaTeX Project Public License, either version 1.3c
% of this license or (at your option) any later version.
% The latest version of this license is in
% http://www.latex-project.org/lppl.txt
-% and version 1.3 or later is part of all distributions of LaTeX
-% version 2003/12/01 or later.
+% and version 1.3c or later is part of all distributions of LaTeX
+% version 2005/12/01 or later.
%
% This file has the LPPL maintenance status "maintained".
%
@@ -36,7 +36,7 @@
%
%
\ProvidesFile{ltfssdcl.dtx}
- [1998/08/17 v3.0i LaTeX Kernel (NFSS Declarative Interface)]
+ [2005/09/27 v3.0k LaTeX Kernel (NFSS Declarative Interface)]
% \iffalse
\documentclass{ltxdoc}
\begin{document}
@@ -52,7 +52,7 @@
%<+checkmem>\CHECKMEM
% \fi
%
-% \CheckSum{1871}
+% \CheckSum{1879}
%
%
% \GetFileInfo{ltfssdcl.dtx}
@@ -365,17 +365,17 @@
% \begin{macro}{\non@alpherr}
% \changes{v3.0c}{1995/10/10}
% {(DPC) autoload error message}
+% \changes{v3.0j}{2005/07/27}
+% {(MH) Change because command is now properly robust}
% \begin{macrocode}
%</2ekernel|autoload>
%<*2ekernel|autoerr>
\gdef\non@alpherr#1{\@latex@error{%
% \end{macrocode}
-% Since the argument is the internal alphabet name, we have to get
-% rid of the |@| in its name. The trick here is to use |\@firstoftwo|
-% which is a \LaTeX{} macro which discards the second of two
-% arguments.
+% The command here will have a space at the end of its name, so we make
+% sure not to insert an extra one.
% \begin{macrocode}
- \expandafter\@firstoftwo\string#1 allowed only in math mode}\@ehd}
+ \string#1allowed only in math mode}\@ehd}
%</2ekernel|autoerr>
%<autoload>\def\non@alpherr{\@autoerr\non@alpherr}
%<*2ekernel|autoload>
@@ -751,6 +751,8 @@
% \end{macro}
%
% \begin{macro}{\DeclareMathAlphabet}
+% \changes{v3.0j}{2005/07/27}
+% {(MH) Make document commands robust}
% \begin{macrocode}
\def\DeclareMathAlphabet#1#2#3#4#5{%
\@tempswafalse
@@ -768,8 +770,8 @@
% Check if it is already a math alphabet.
% \begin{macrocode}
\edef\reserved@a{\noexpand\in@{\string\select@group}%
- {\expandafter\meaning\csname @\expandafter
- \@gobble\string#1\endcsname}}%
+ {\expandafter\meaning\csname \expandafter
+ \@gobble\string#1\space\endcsname}}%
\reserved@a
\ifin@
\@font@info{Redeclaring math alphabet \string#1}%
@@ -780,7 +782,7 @@
% \changes{???}{1994/04/18}{Pass correct arg (2 not 3)}
% \begin{macrocode}
\csname M@#2\expandafter\endcsname
- \csname @\expandafter\@gobble\string#1\endcsname#1}%
+ \csname \expandafter\@gobble\string#1\space\endcsname#1}%
\version@list
\else
% \end{macrocode}
@@ -788,8 +790,8 @@
% |\DeclareSymbolFontAlphabet|.
% \begin{macrocode}
\edef\reserved@a{\noexpand\in@{\string\use@mathgroup}%
- {\expandafter\meaning\csname @\expandafter
- \@gobble\string#1\endcsname}}%
+ {\expandafter\meaning\csname \expandafter
+ \@gobble\string#1\space\endcsname}}%
\reserved@a
\ifin@
% \end{macrocode}
@@ -815,11 +817,13 @@
% \end{macro}
%
% \begin{macro}{\new@mathalphabet}
+% \changes{v3.0j}{2005/07/27}
+% {(MH) Make document commands robust}
% \begin{macrocode}
\def\new@mathalphabet#1#2#3#4#5{%
\toks@\expandafter{\alpha@list}%
- \edef#1{\expandafter\noexpand\csname @\expandafter
- \@gobble\string#1\endcsname
+ \edef#1{\expandafter\noexpand\csname \expandafter
+ \@gobble\string#1\space\endcsname
\if/#5/%
\noexpand\no@alphabet@error
\noexpand\no@alphabet@error
@@ -833,8 +837,8 @@
\def\version@elt##1{\toks@\expandafter{##1}%
\edef##1{\the\toks@\install@mathalphabet
\expandafter\noexpand
- \csname @\expandafter\@gobble
- \string#1\endcsname
+ \csname \expandafter\@gobble
+ \string#1\space\endcsname
{\if/#5/%
\noexpand\no@alphabet@error
\noexpand#1%
@@ -843,22 +847,24 @@
\fi}}%
}%
\version@list
- \expandafter\edef\csname @\expandafter\@gobble
- \string#1\endcsname{\if/#5/%
+ \expandafter\edef\csname \expandafter\@gobble
+ \string#1\space\endcsname{\if/#5/%
\noexpand\no@alphabet@error
\noexpand#1%
\else
\noexpand\select@group\the\toks2
\fi}%
\edef#1{\noexpand\protect
- \expandafter\noexpand\csname @\expandafter
- \@gobble\string#1\endcsname}%
+ \expandafter\noexpand\csname \expandafter
+ \@gobble\string#1\space\endcsname}%
}
\@onlypreamble\new@mathalphabet
% \end{macrocode}
% \end{macro}
%
% \begin{macro}{\SetMathAlphabet}
+% \changes{v3.0j}{2005/07/27}
+% {(MH) Make document commands robust}
% \begin{macrocode}
\def\SetMathAlphabet#1#2#3#4#5#6{%
\@tempswafalse
@@ -870,7 +876,7 @@
\expandafter\SetMathAlphabet@
\csname mv@#2\expandafter\endcsname\csname#3/#4/#5/#6\expandafter
\endcsname \csname M@#3\expandafter\endcsname
- \csname @\expandafter\@gobble\string#1\endcsname#1%
+ \csname \expandafter\@gobble\string#1\space\endcsname#1%
\else
\@latex@error{Encoding scheme `#3' unknown}\@eha
\fi
@@ -1391,10 +1397,12 @@
% \end{macro}
%
% \begin{macro}{\DeclareSymbolFontAlphabet}
+% \changes{v3.0j}{2005/07/27}
+% {(MH) Make document commands robust}
% \begin{macrocode}
\def\DeclareSymbolFontAlphabet#1#2{%
\expandafter\DeclareSymbolFontAlphabet@
- \csname @\expandafter\@gobble\string#1\endcsname{#2}#1}
+ \csname \expandafter\@gobble\string#1\space\endcsname{#2}#1}
\@onlypreamble\DeclareSymbolFontAlphabet
% \end{macrocode}
% \end{macro}
@@ -1452,7 +1460,7 @@
% at all:
% \begin{macrocode}
\expandafter\ifx
- \csname\expandafter\@gobble\string#1\endcsname
+ \csname\expandafter\@gobble\string#1\space\endcsname
\relax
% \end{macrocode}
% If it is undefined, fine otherwise check if it is a math alphabet