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

Thu Apr 14 16:55:19 CEST 2022

Author: michal_h21
Date: 2022-04-14 14:55:19 +0000 (Thu, 14 Apr 2022)
New Revision: 1112

Modified:
   trunk/lit/ChangeLog
   trunk/lit/tex4ht-4ht.tex
Log:
fixed support for \labelformat in sections

Modified: trunk/lit/ChangeLog
===================================================================

--- trunk/lit/ChangeLog	2022-04-14 14:12:45 UTC (rev 1111)
+++ trunk/lit/ChangeLog	2022-04-14 14:55:19 UTC (rev 1112)
@@ -1,5 +1,8 @@
 2022-04-14  Michal Hoftich  <michal.h21 at gmail.com>
 
+	* tex4ht-4ht.tex (latex.4ht): fixed support for \labelformat in
+	sections.
+	https://puszcza.gnu.org.ua/bugs/?559
 	* tex4ht-4ht.tex (hyperref.4ht): added supporting code for TeX4ht
 	from hyperref.sty.
 	https://puszcza.gnu.org.ua/bugs/?559

Modified: trunk/lit/tex4ht-4ht.tex
===================================================================
--- trunk/lit/tex4ht-4ht.tex	2022-04-14 14:12:45 UTC (rev 1111)
+++ trunk/lit/tex4ht-4ht.tex	2022-04-14 14:55:19 UTC (rev 1112)
@@ -1543,7 +1543,7 @@
 \<cross ref\><<<
 \NewConfigure{@:currentlabel}[1]{\concat:config\a:@:currentlabel{#1}}
 \let\a:@:currentlabel|=\relax
-\def\cur:lbl#1{{\a:@:currentlabel 
+\def\cur:lbl#1{{\let\saved:currentlabel\:currentlabel\a:@:currentlabel 
   |<body of cur:lbl|>\expandafter}\:currentlabel}
 >>>
 
@@ -1554,7 +1554,8 @@
 \else \def\:currentlabel{#1}%
    \edef\:currentlabel{\def\noexpand
                  \:currentlabel{\ifx\:currentlabel\empty
-         \ifx \:@currentlabel\:UnDef \@currentlabel
+         \ifx \:@currentlabel\:UnDef 
+         \ifx\saved:currentlabel \@currentlabel\@currentlabel\else\saved:currentlabel\fi
          \else \:@currentlabel \fi
       \else 
           \expandafter\ifx\csname #1:Count\endcsname\relax
@@ -1738,6 +1739,7 @@
    |</edef /@currentlabel|>%
    \xdef\cur:th{|<haddr prefix|>\last:haddr}%
    |<get :currentlabel|>%
+   \xdef\:currentlabel{#2}%
    \edef\:SecAnchor{\cur:th\:currentlabel}%
  }
 >>>
@@ -1753,7 +1755,7 @@
      XXI\or XXII\or XXIII\or XXIV\or XV\or XVI\else
      \expandafter\uppercase\expandafter{\romannumeral ##1}\fi}%
    \a:currentlabel
-   \edef\:temp{#2}\ifx \:temp\empty
+   \edef\:temp{\csname p@#1\expandafter\endcsname\csname the#1\endcsname}\ifx \:temp\empty
    \else \global\let\@currentlabel|=\:temp\fi
 \egroup
 >>>

