[tex4ht-commits] [SCM] tex4ht updated: r1557 - trunk/lit

[Michal Hoftich]

Author: michal_h21
Date: 2024-09-23 12:20:56 +0000 (Mon, 23 Sep 2024)
New Revision: 1557

Modified:
   trunk/lit/ChangeLog
   trunk/lit/tex4ht-4ht.tex
Log:
fixed subscripts support in tags

Modified: trunk/lit/ChangeLog
===================================================================
--- trunk/lit/ChangeLog	2024-09-23 10:50:11 UTC (rev 1556)
+++ trunk/lit/ChangeLog	2024-09-23 12:20:56 UTC (rev 1557)
@@ -1,5 +1,8 @@
 2024-09-23  Michal Hoftich  <michal.h21 at gmail.com>
 
+	* tex4ht-4ht.tex (amsmath.4ht): fixed support for superscripts and
+	subscripts in equation tags (like \tag{$e_{1}$}).
+
 	* tex4ht-4ht.tex (th4.4ht),
 	* tex4ht-info.tex (info4ht.4ht),
 	* tex4ht-sty.tex (tex4ht.sty),

Modified: trunk/lit/tex4ht-4ht.tex
===================================================================
--- trunk/lit/tex4ht-4ht.tex	2024-09-23 10:50:11 UTC (rev 1556)
+++ trunk/lit/tex4ht-4ht.tex	2024-09-23 12:20:56 UTC (rev 1557)
@@ -22121,11 +22121,13 @@
                |<def :currentlabel for make at df@tag|>%
                \anc:lbl r{}%
 }}
-\def\make at df@tag@@@#1{\gdef\df at tag{\tagform@{#1}%
+\ExplSyntaxOn
+\def\make at df@tag@@@#1{\gdef\df at tag{\tagform@{\tl_rescan:nn{}{#1}}%
   \toks@\@xp{\p at equation{#1}}\edef\@currentlabel{\the\toks@}%
   |<def :currentlabel for make at df@tag|>%
   \anc:lbl r{}%
   }}
+\ExplSyntaxOff
 >>>
 
 %%%%%%%%%%%%%