texlive[47752] Master/texmf-dist/tex/generic/tex4ht/memoir.4ht:

[commits+karl at tug.org]

Revision: 47752
          http://tug.org/svn/texlive?view=revision&revision=47752
Author:   karl
Date:     2018-05-19 00:31:31 +0200 (Sat, 19 May 2018)
Log Message:
-----------
memoir fixes for no more mempatch.sty, tex4ht r395

Revision Links:
--------------
    http://tug.org/svn/texlive?view=revision&revision=395

Modified Paths:
--------------
    trunk/Master/texmf-dist/tex/generic/tex4ht/memoir.4ht

Modified: trunk/Master/texmf-dist/tex/generic/tex4ht/memoir.4ht
===================================================================
--- trunk/Master/texmf-dist/tex/generic/tex4ht/memoir.4ht	2018-05-18 21:10:45 UTC (rev 47751)
+++ trunk/Master/texmf-dist/tex/generic/tex4ht/memoir.4ht	2018-05-18 22:31:31 UTC (rev 47752)
@@ -1,4 +1,4 @@
-% memoir.4ht (2018-05-02-14:52), generated from tex4ht-4ht.tex
+% memoir.4ht (2018-05-11-14:26), generated from tex4ht-4ht.tex
 % Copyright 2003-2009 Eitan M. Gurari
 % Copyright 2009-2018 TeX Users Group
 %
@@ -58,7 +58,62 @@
    \append:def\thepoemline{\b:poemline}}
 \append:defII\getthelinenumber{\let\thepoemline\sv:thepoemline}
 
+   \let\no at Msect\M at sect
+\NewConfigure{@sec @ssect}[1]{%
+   \def\rdef:sec##1{#1\csname no@##1\endcsname}}
+\:CheckOption{sections-}     \if:Option
+   \Configure{@sec @ssect}{}
+\else
+   \Configure{@sec @ssect}{%
+      \let\sv:Sc\:Sc \let\sv:sect\@sect \let\sv:ssect\@ssect
+\let\sv:Msect\M at sect
+\let\:Sc\:gobble
+      \def\M at sect##1##2##3##4##5##6[##7][##8]##9{%
+   \ifx \o:@seccntformat:\:UnDef
+  \let\o:@seccntformat:\@seccntformat
 \fi
+\let\@seccntformat\:gobble
+%
+   \let\M at sect\no at Msect   \xdef\c:secnumdepth{##2}%
+   {\SkipRefstepAnchor \let\addcontentsline\:gobbleIII \let\mark\:gobble
+    \no at Msect{##1}{##2}{##3}{##4}{##5}{##6}[{##7}][{##8}]{}}%
+   \let\:Sc\sv:Sc \let\@sect\sv:sect \let\@ssect\sv:ssect
+\let\M at sect\sv:Msect
+%
+   \let\@seccntformat=\o:@seccntformat:
+%
+   \HtmlEnv    \Toc:Title{##8}\csname no:#1\endcsname{##9}}%
+%
+      \def\@sect##1##2##3##4##5##6[##7]##8{%
+   \ifx \o:@seccntformat:\:UnDef
+  \let\o:@seccntformat:\@seccntformat
+\fi
+\let\@seccntformat\:gobble
+%
+   \let\@sect\no at sect   \xdef\c:secnumdepth{##2}%
+   {\SkipRefstepAnchor \let\addcontentsline\:gobbleIII \let\mark\:gobble
+    \no at sect{##1}{##2}{##3}{##4}{##5}{##6}[{##7}]{}}%
+   \let\:Sc\sv:Sc \let\@sect\sv:sect \let\@ssect\sv:ssect
+\let\M at sect\sv:Msect
+%
+   \let\@seccntformat=\o:@seccntformat:
+%
+   \HtmlEnv    \Toc:Title{##7}\csname no:#1\endcsname{##8}}%
+%
+      \def\@ssect##1##2##3##4##5{%
+   \gdef\ssect:ttl{##5}%
+%
+   \let\@ssect\no at ssect
+   {\def\addcontentsline####1####2####3{}%
+    \no at ssect{##1}{##2}{##3}{##4}{}}%
+   \let\:Sc\sv:Sc \let\@sect\sv:sect \let\@ssect\sv:ssect
+\let\M at sect\sv:Msect
+%
+   \HtmlEnv   \csname :like#1\endcsname{##5}}%
+\IgnorePar}
+\fi
+
+\fi
 \Hinput{memoir}
 \endinput