texlive[67755] Master/texmf-dist: textcase (28jul23)
commits+karl at tug.org
commits+karl at tug.org
Fri Jul 28 22:41:25 CEST 2023
Revision: 67755
http://tug.org/svn/texlive?view=revision&revision=67755
Author: karl
Date: 2023-07-28 22:41:25 +0200 (Fri, 28 Jul 2023)
Log Message:
-----------
textcase (28jul23)
Modified Paths:
--------------
trunk/Master/texmf-dist/doc/latex/textcase/textcase.pdf
trunk/Master/texmf-dist/source/latex/textcase/textcase.dtx
trunk/Master/texmf-dist/tex/latex/textcase/textcase.sty
Modified: trunk/Master/texmf-dist/doc/latex/textcase/textcase.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/source/latex/textcase/textcase.dtx
===================================================================
--- trunk/Master/texmf-dist/source/latex/textcase/textcase.dtx 2023-07-28 20:41:16 UTC (rev 67754)
+++ trunk/Master/texmf-dist/source/latex/textcase/textcase.dtx 2023-07-28 20:41:25 UTC (rev 67755)
@@ -1,6 +1,6 @@
% \iffalse
%% Source File: textcase.dtx
-%% Copyright 1997 1998 2019 2022 David Carlisle
+%% Copyright 1997 1998 2019 2022 2023 David Carlisle
%%
%% This file may be distributed under the terms of the LPPL.
%% See 00readme.txt for details.
@@ -13,7 +13,7 @@
%<driver> \ProvidesFile{textcase.drv}
% \fi
% \ProvidesFile{textcase.dtx}
- [2022/07/10 v1.03 Text only upper/lower case changing (DPC)]
+ [2023/07/27 v1.04 Text only upper/lower case changing (DPC)]
%
% \iffalse
%<*driver>
@@ -61,10 +61,13 @@
%
% \subsection*{This package is obsolete with the June 2022 \LaTeX\ release.}
% \begin{sloppypar}
-% With new formats |\MakeUppercase| supports the extensions provided
-% here, with improved support for UTF-8 input. So now the package just defines
-% |\MakeTextUppercase| and |\MakeTextLowercase| as aliases for the
-% standard |\MakeUppercase| and |\MakeLowercase|.
+% With new formats |\MakeUppercase| supports the extensions provided
+% here, with improved support for UTF-8 input. So now the package
+% just defines |\MakeTextUppercase| and |\MakeTextLowercase| as
+% aliases for the standard |\MakeUppercase| and
+% |\MakeLowercase|\footnote{Since v1.04, not quite alises, one
+% grouping level is dropped for compatibility, required by
+% \textsf{amsart}.}.
% \end{sloppypar}
%
%
@@ -234,8 +237,38 @@
\DeclareOption{overload}{}
\ProcessOptions
\PackageInfo{textcase}{Defining Legacy names}
- \let\MakeTextUppercase\MakeUppercase
- \let\MakeTextLowercase\MakeLowercase
+% \end{macrocode}
+% \changes{v1.04}{2023/07/27}
+% {define without outer group}
+% \begin{macrocode}
+\ExplSyntaxOn
+\cs_set_protected:Npn \reserved at a #1
+ {
+ \cs_generate_variant:cn { text_ \str_lowercase:n {#1} case:nn } { V }
+ \ExpandArgs { cnx } \NewExpandableDocumentCommand
+ { MakeText#1case }
+ { O{} +m }
+ { \exp_not:c { MakeText#1case \c_space_tl \c_space_tl \c_space_tl }
+ [####1] {####2} }
+ }
+\reserved at a { Upper }
+\reserved at a { Lower }
+\cs_new_protected:cpn {
+ MakeTextLowercase \c_space_tl \c_space_tl \c_space_tl } [#1] #2
+ {%{
+ \let \OE \oe
+ \@@text at case@aux { lower } {#1} {#2}
+ }%}
+\cs_new_protected:cpn {
+ MakeTextUppercase \c_space_tl \c_space_tl \c_space_tl } [#1] #2
+ {%{
+ \let \oe \OE
+ \@@text at case@aux { upper } {#1} {#2}
+ }%}
+\ExplSyntaxOff
+% \end{macrocode}
+%
+% \begin{macrocode}
\expandafter\endinput
\fi
% \end{macrocode}
@@ -242,7 +275,7 @@
%
% \begin{macro}{\@uclcnotmath}
% This is the main macro of this package. It is basically
-% a copy of |\MakeTextUppercase| and |\MakeTextLowercase|
+% a copy of |\MakeUppercase| and |\MakeLowercase|
% from the \LaTeX\ kernel, modified slightly so that they
% can share code (that modification could be done to the
% standard versions as well) and then further changed to
Modified: trunk/Master/texmf-dist/tex/latex/textcase/textcase.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/textcase/textcase.sty 2023-07-28 20:41:16 UTC (rev 67754)
+++ trunk/Master/texmf-dist/tex/latex/textcase/textcase.sty 2023-07-28 20:41:25 UTC (rev 67755)
@@ -7,19 +7,42 @@
%% textcase.dtx (with options: `package')
%%
%% Source File: textcase.dtx
-%% Copyright 1997 1998 2019 2022 David Carlisle
+%% Copyright 1997 1998 2019 2022 2023 David Carlisle
%%
%% This file may be distributed under the terms of the LPPL.
%% See 00readme.txt for details.
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{textcase}
- [2022/07/10 v1.03 Text only upper/lower case changing (DPC)]
+ [2023/07/27 v1.04 Text only upper/lower case changing (DPC)]
\ifx\AddToNoCaseChangeList\@undefined\else
\DeclareOption{overload}{}
\ProcessOptions
\PackageInfo{textcase}{Defining Legacy names}
- \let\MakeTextUppercase\MakeUppercase
- \let\MakeTextLowercase\MakeLowercase
+\ExplSyntaxOn
+\cs_set_protected:Npn \reserved at a #1
+ {
+ \cs_generate_variant:cn { text_ \str_lowercase:n {#1} case:nn } { V }
+ \ExpandArgs { cnx } \NewExpandableDocumentCommand
+ { MakeText#1case }
+ { O{} +m }
+ { \exp_not:c { MakeText#1case \c_space_tl \c_space_tl \c_space_tl }
+ [####1] {####2} }
+ }
+\reserved at a { Upper }
+\reserved at a { Lower }
+\cs_new_protected:cpn {
+ MakeTextLowercase \c_space_tl \c_space_tl \c_space_tl } [#1] #2
+ {%{
+ \let \OE \oe
+ \@@text at case@aux { lower } {#1} {#2}
+ }%}
+\cs_new_protected:cpn {
+ MakeTextUppercase \c_space_tl \c_space_tl \c_space_tl } [#1] #2
+ {%{
+ \let \oe \OE
+ \@@text at case@aux { upper } {#1} {#2}
+ }%}
+\ExplSyntaxOff
\expandafter\endinput
\fi
\def\@uclcnotmath#1#2#3#4{\begingroup
More information about the tex-live-commits
mailing list.