From 7b89e8971f880d3c7b3cdbc6144d8d7d25e622f6 Mon Sep 17 00:00:00 2001
From: Karl Berry <karl@freefriends.org>
Date: Thu, 1 Dec 2022 20:38:11 +0000
Subject: latex (1dec22)

git-svn-id: svn://tug.org/texlive/trunk@65161 c570f23f-e606-0410-a88d-b1316a301751
---
 Master/texmf-dist/tex/latex/base/latex.ltx | 32 ++++++++++++++++++++++++------
 1 file changed, 26 insertions(+), 6 deletions(-)

(limited to 'Master/texmf-dist/tex/latex/base/latex.ltx')

diff --git a/Master/texmf-dist/tex/latex/base/latex.ltx b/Master/texmf-dist/tex/latex/base/latex.ltx
index f9373b9d8e3..daf5ff1c8ef 100644
--- a/Master/texmf-dist/tex/latex/base/latex.ltx
+++ b/Master/texmf-dist/tex/latex/base/latex.ltx
@@ -706,7 +706,7 @@
 \def\fmtname{LaTeX2e}
 \edef\fmtversion
    {2022-11-01}
-\def\patch@level{0}
+\def\patch@level{1}
 \edef\development@branch@name{}
 \iffalse
 \def\reserved@a#1/#2/#3\@nil{%
@@ -6744,7 +6744,7 @@ Type  H <return>  for immediate help.}%
              \@xnewline}%
   \@xnewline}
 \let\\\@normalcr
-\def\@vspace@calcify#1{\begingroup\setlength\skip@{#1}\vskip\skip@\endgroup}
+\def\@vspace@calcify#1{\setlength\sp@ce@skip{#1}\vskip\sp@ce@skip}
 
 \DeclareRobustCommand\newline{\@normalcr\relax}
 \def\@xnewline{\@ifnextchar[% ] bracket matching
@@ -6912,7 +6912,8 @@ Type  H <return>  for immediate help.}%
 \expandafter\let\expandafter\@xobeysp\csname nobreakspace \endcsname
 \def\@{\spacefactor\@m{}}%
 \DeclareRobustCommand\hspace{\@ifstar\@hspacer\@hspace}
-\def\@hspace#1{\begingroup\setlength\skip@{#1}\hskip\skip@\endgroup}
+\newskip\sp@ce@skip
+\def\@hspace#1{\setlength\sp@ce@skip{#1}\hskip\sp@ce@skip}
 
 \def\@hspacer#1{\vrule \@width\z@\nobreak
                 \@hspace{#1}\hskip \z@skip}
@@ -17383,9 +17384,7 @@ Type  H <return>  for immediate help.}%
 \cs_set_protected:Npn \reserved@a #1
   {
     \cs_generate_variant:cn { text_ \str_lowercase:n {#1} case:nn } { V }
-    \cs_new_protected:cpx { Make#1case \c_space_tl \c_space_tl \c_space_tl } [##1] ##2
-      { \exp_not:N \@@text@case@aux { \str_lowercase:n {#1} } {##1} {##2} }
-     \ExpandArgs { cnx } \NewExpandableDocumentCommand
+    \ExpandArgs { cnx } \NewExpandableDocumentCommand
        { Make#1case }
        { O{} +m }
        { \exp_not:c { Make#1case \c_space_tl \c_space_tl \c_space_tl } [####1] {####2} }
@@ -17393,6 +17392,27 @@ Type  H <return>  for immediate help.}%
 \reserved@a { Upper }
 \reserved@a { Lower }
 \reserved@a { Title }
+\cs_new_protected:cpn { MakeLowercase \c_space_tl \c_space_tl \c_space_tl } [#1] #2
+  {
+    \let \kernel@saved@OE \OE
+    \let \OE \oe
+    \@@text@case@aux { lower } {#1} {#2}
+    \let \OE \kernel@saved@OE
+  }
+\cs_new_protected:cpn { MakeUppercase \c_space_tl \c_space_tl \c_space_tl } [#1] #2
+  {
+    \let \kernel@saved@oe \oe
+    \let \oe \OE
+    \@@text@case@aux { upper } {#1} {#2}
+    \let \oe \kernel@saved@oe
+  }
+\cs_new_protected:cpn { MakeTitlecase \c_space_tl \c_space_tl \c_space_tl } [#1] #2
+  {
+    \let \kernel@saved@oe \oe
+    \let \oe \OE
+    \@@text@case@aux { title } {#1} {#2}
+    \let \oe \kernel@saved@oe
+  }
 \cs_new_protected_nopar:Npn\AddToNoCaseChangeList
          {\tl_put_right:Nn \l_text_case_exclude_arg_tl}
 \AddToNoCaseChangeList{ \NoCaseChange }
-- 
cgit v1.2.3

