[latex3-commits] [git/LaTeX3-latex3-babel] main: Vertical spacing with ams mostly fixed. (d9e977e)

[Javier]

Repository : https://github.com/latex3/babel
On branch  : main
Link       : https://github.com/latex3/babel/commit/d9e977e1e67c2d75efb56e3c263cdadb9239e09e

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

commit d9e977e1e67c2d75efb56e3c263cdadb9239e09e
Author: Javier <email at localhost>
Date:   Thu Apr 21 17:37:50 2022 +0200

    Vertical spacing with ams mostly fixed.
    
    * Pending is \intertext.


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

d9e977e1e67c2d75efb56e3c263cdadb9239e09e
 README.md    |   2 +-
 babel.dtx    |  35 +++++++++++++++++++++++------------
 babel.ins    |   2 +-
 babel.pdf    | Bin 856731 -> 857136 bytes
 bbcompat.dtx |   2 +-
 5 files changed, 26 insertions(+), 15 deletions(-)

diff --git a/README.md b/README.md
index a80a0a7..79e4869 100644
--- a/README.md
+++ b/README.md
@@ -1,4 +1,4 @@
-## Babel 3.73.2713
+## Babel 3.73.2714
 
 *(Development)*
 
diff --git a/babel.dtx b/babel.dtx
index 559f573..d64e267 100644
--- a/babel.dtx
+++ b/babel.dtx
@@ -32,7 +32,7 @@
 %
 % \iffalse
 %<*filedriver>
-\ProvidesFile{babel.dtx}[2022/04/20 v3.73.2713 The Babel package]
+\ProvidesFile{babel.dtx}[2022/04/21 v3.73.2714 The Babel package]
 \documentclass{ltxdoc}
 \GetFileInfo{babel.dtx}
 \usepackage{fontspec}
@@ -5116,8 +5116,8 @@ help from Bernd Raichle, for which I am grateful.
 % \section{Tools}
 %
 %    \begin{macrocode}
-%<<version=3.73.2713>>
-%<<date=2022/04/20>>
+%<<version=3.73.2714>>
+%<<date=2022/04/21>>
 %    \end{macrocode}
 %
 % \textbf{Do not use the following macros in \texttt{ldf} files. They
@@ -14622,9 +14622,11 @@ end
       \expandafter\bbl at sreplace\csname] \endcsname{$$}{\eqno\kern.001pt$$}%
     \else % amstex
       \ifx\bbl at noamsmath\@undefined
-        \@ifpackagewith{amsmath}{leqno}%
-          {\let\bbl at ams@lap\hbox}% = leqno
-          {\let\bbl at ams@lap\llap}% = default
+        \ifnum\bbl at eqnpos=\@ne
+          \let\bbl at ams@lap\hbox
+        \else
+          \let\bbl at ams@lap\llap
+        \fi
         \ExplSyntaxOn
         \bbl at sreplace\intertext@{\normalbaselines}%
           {\normalbaselines
@@ -14644,12 +14646,21 @@ end
             \bbl at sreplace\textdef@{\hbox}{\bbl at ams@tagbox\hbox}%
             \bbl at sreplace\maketag@@@{\hbox}{\bbl at ams@tagbox#1}%
           \fi}%
-        \AddToHook{env/equation/begin}{%
-          \ifnum\bbl at thetextdir>\z@
-            \ifx\bbl at ams@lap\llap\hrule\@height\z@\fi
-            \bbl at ams@preset\bbl at ams@flip
-          \fi}%
-        \AddToHook{env/equation*/begin}{\bbl at ams@preset\bbl at ams@flip}%
+        \ifnum\bbl at eqnpos=\tw@\else
+          \def\bbl at ams@equation{%
+            \ifnum\bbl at thetextdir>\z@
+              \edef\bbl at eqnodir{\noexpand\bbl at textdir{\the\bbl at thetextdir}}%
+              \chardef\bbl at thetextdir\z@
+              \bbl at add\normalfont{\bbl at eqnodir}%
+              \ifcase\bbl at eqnpos
+                \def\veqno##1##2{\bbl at eqno@flip{##1##2}}%
+              \or
+                \def\veqno##1##2{\bbl at leqno@flip{##1##2}}%
+              \fi
+            \fi}%
+          \AddToHook{env/equation/begin}{\bbl at ams@equation}%
+          \AddToHook{env/equation*/begin}{\bbl at ams@equation}%
+        \fi
         \AddToHook{env/cases/begin}{\bbl at ams@preset\bbl at ams@lap}%
         \AddToHook{env/multline/begin}{\bbl at ams@preset\hbox}%
         \AddToHook{env/gather/begin}{\bbl at ams@preset\bbl at ams@lap}%
diff --git a/babel.ins b/babel.ins
index ad9d03f..0fd6087 100644
--- a/babel.ins
+++ b/babel.ins
@@ -26,7 +26,7 @@
 %% and covered by LPPL is defined by the unpacking scripts (with
 %% extension .ins) which are part of the distribution.
 %%
-\def\filedate{2022/04/20}
+\def\filedate{2022/04/21}
 \def\batchfile{babel.ins}
 \input docstrip.tex
 
diff --git a/babel.pdf b/babel.pdf
index f35b8ff..8320c4e 100644
Binary files a/babel.pdf and b/babel.pdf differ
diff --git a/bbcompat.dtx b/bbcompat.dtx
index 285e63c..067fb07 100644
--- a/bbcompat.dtx
+++ b/bbcompat.dtx
@@ -30,7 +30,7 @@
 %
 % \iffalse
 %<*dtx>
-\ProvidesFile{bbcompat.dtx}[2022/04/20 v3.73.2713]
+\ProvidesFile{bbcompat.dtx}[2022/04/21 v3.73.2714]
 %</dtx>
 %
 %% File 'bbcompat.dtx'