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

[michal_h21 at gnu.org.ua]

Author: michal_h21
Date: 2021-01-24 19:10:43 +0200 (Sun, 24 Jan 2021)
New Revision: 870

Modified:
   trunk/lit/ChangeLog
   trunk/lit/tex4ht-4ht.tex
Log:
Added support for LaTeX environment hooks

Modified: trunk/lit/ChangeLog
===================================================================
--- trunk/lit/ChangeLog	2021-01-21 17:22:02 UTC (rev 869)
+++ trunk/lit/ChangeLog	2021-01-24 17:10:43 UTC (rev 870)
@@ -1,3 +1,8 @@
+2021-01-24  Michal Hoftich  <michal.h21 at gmail.com>
+
+	* tex4ht-4ht.tex (latex.4ht): added support for environment hooks.
+	https://puszcza.gnu.org.ua/bugs/?477
+
 2021-01-21  Michal Hoftich  <michal.h21 at gmail.com>
 
 	* tex4ht-4ht.tex (usepackage.4ht, newcomputermodern-hooks.4ht): fix for the 

Modified: trunk/lit/tex4ht-4ht.tex
===================================================================
--- trunk/lit/tex4ht-4ht.tex	2021-01-21 17:22:02 UTC (rev 869)
+++ trunk/lit/tex4ht-4ht.tex	2021-01-24 17:10:43 UTC (rev 870)
@@ -6128,12 +6128,14 @@
    \PushStack\envn:list\n:list  \SaveEverypar
 \fi
 |<before begin(...)|>%
+\UseHook{env/#1/before}%
 \@ifundefined{#1}%
   {\def\reserved at a{\@latex at error{Environment #1 undefined}\@eha}}%
   {\def\reserved at a{%
           \def\@currenvir{#1}%
           \edef\@currenvline{\on at line}%
           |<LoopOf before begin(...)|>%
+          \@execute at begin@hook{#1}%
           \csname #1\endcsname 
           |<after begin(...)|>%
   }}%
@@ -6190,10 +6192,12 @@
 \<revised end\><<<
 %\IgnoreIndent
   \ifvmode |<ignore par before hline in end|>\fi
-\csname end#1\endcsname
+\UseHook{env/#1/end}%
+\csname end#1\endcsname%
 \@checkend{#1}%
   \aftergroup\recall:afterend
 \expandafter\endgroup\if at endpe\@doendpe\fi
+\UseHook{env/#1/after}%
   \ifx \chk:pic\:UnDef  
      |<after end of /end|>%
      |<check Everypar at end|>%