[latex3-commits] [git/LaTeX3-latex3-latex2e] develop: Add first aid for babel to support new case change def. (8de0f4ec)

[Joseph Wright]

Repository : https://github.com/latex3/latex2e
On branch  : develop
Link       : https://github.com/latex3/latex2e/commit/8de0f4ec773afdd9c5ac7b9a78000c635ece274c

>---------------------------------------------------------------

commit 8de0f4ec773afdd9c5ac7b9a78000c635ece274c
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Thu Oct 27 07:58:33 2022 +0100

    Add first aid for babel to support new case change def.


>---------------------------------------------------------------

8de0f4ec773afdd9c5ac7b9a78000c635ece274c
 required/firstaid/changes.txt                      |  5 ++++
 .../latex2e-first-aid-for-external-files.dtx       | 33 +++++++++++++++++++---
 2 files changed, 34 insertions(+), 4 deletions(-)

diff --git a/required/firstaid/changes.txt b/required/firstaid/changes.txt
index 650bcc49..d053ace2 100644
--- a/required/firstaid/changes.txt
+++ b/required/firstaid/changes.txt
@@ -1,3 +1,8 @@
+2022-10-27	Joseph Wright <Joseph.Wright at latex-project.org>
+
+	* latex2e-first-aid-for-external-files.dtx:
+	Add first aid for babel to undo a no-longer required patch
+
 2022-10-03	Joseph Wright <Joseph.Wright at latex-project.org>
 
 	* latex2e-first-aid-for-external-files.dtx:
diff --git a/required/firstaid/latex2e-first-aid-for-external-files.dtx b/required/firstaid/latex2e-first-aid-for-external-files.dtx
index 2a1e2a8d..31f52641 100644
--- a/required/firstaid/latex2e-first-aid-for-external-files.dtx
+++ b/required/firstaid/latex2e-first-aid-for-external-files.dtx
@@ -111,8 +111,8 @@
 %    \end{macrocode}
 %
 %    \begin{macrocode}
-\def\LaTeXFirstAidDate{2022/06/23}
-\def\LaTeXFirstAidVersion{v1.0s}
+\def\LaTeXFirstAidDate{2022/10/27}
+\def\LaTeXFirstAidVersion{v1.0t}
 %    \end{macrocode}
 %
 %    \begin{macrocode}
@@ -341,8 +341,6 @@
 %}
 %    \end{macrocode}
 %
-%
-%
 % \subsection{The \pkg{dinbrief} class first aid}
 %
 %    Again a case of a no longer correct \cs{endgroup} in document.
@@ -406,6 +404,33 @@
 \ExplSyntaxOff
 %    \end{macrocode}
 %
+% \subsection{The \pkg{babel} package}
+%
+% Because of the switch from what was already an odd structure to an \pk{ltcmd}
+% expandable command, we have to save-and-restore an internal function to undo
+% a patch.
+%    \begin{macrocode}
+\AddToHook{file/babel.sty/before}[firstaid]{%
+  \FirstAidNeededT{babel}{sty}{2022/10/23 3.82 The Babel package}%
+    {%
+      \expandafter\let\expandafter\firstaid at MakeLowercase
+        \csname MakeLowercase \endcsname
+      \expandafter\let\expandafter\firstaid at MakeTitlecase
+        \csname MakeTitlecase \endcsname
+      \expandafter\let\expandafter\firstaid at MakeUppercase
+        \csname MakeUppercase \endcsname
+      \AtBeginDocument[firstaid-babel]{%
+        \expandafter\let\csname MakeLowercase \endcsname
+          \firstaid at MakeLowercase
+        \expandafter\let\csname MakeTitlecase \endcsname
+          \firstaid at MakeTitlecase
+        \expandafter\let\csname MakeUppercase \endcsname
+          \firstaid at MakeUppercase
+      }%
+     \DeclareHookRule{begindocument}{firstaid-babel}{after}{babel}%
+    }%
+}
+%    \end{macrocode}
 %
 %    \begin{macrocode}
 %</kernel>