diff options
| -rw-r--r-- | Master/texmf-dist/tex/generic/tex4ht/tex4ht.sty | 40 |
1 files changed, 36 insertions, 4 deletions
diff --git a/Master/texmf-dist/tex/generic/tex4ht/tex4ht.sty b/Master/texmf-dist/tex/generic/tex4ht/tex4ht.sty index c9ee5cc0380..cf9ae0c78e8 100644 --- a/Master/texmf-dist/tex/generic/tex4ht/tex4ht.sty +++ b/Master/texmf-dist/tex/generic/tex4ht/tex4ht.sty @@ -1,8 +1,8 @@ \ifnum\the\catcode`\%=14\else\expandafter\edef\csname \string:RestoreCatcodes\endcsname{\catcode`\%\the \catcode`\%}\catcode`\%14\fi -% tex4ht.sty (2016-07-18-16:08), generated from tex4ht-sty.tex -% Copyright 2009-2016 TeX Users Group +% tex4ht.sty (2018-02-11-15:01), generated from tex4ht-sty.tex +% Copyright 2009-2018 TeX Users Group % Copyright 1996-2009 Eitan M. Gurari % % This work may be distributed and/or modified under the @@ -20,7 +20,7 @@ % % If you modify this program, changing the % version identification would be appreciated. -\immediate\write-1{version 2016-07-18-16:08} +\immediate\write-1{version 2018-02-11-15:01} \ifx \Preamble\UnDef \else @@ -1590,7 +1590,39 @@ use the command line option `fonts+'}% \fi - \:CheckOption{verify} \if:Option + \def\InsertTagStart#1#2{% + \edef\local:properties{\ifx\relax#2\relax\else\space#2\fi} + \HCode{<\get:tag{#1}\get:block:properties{#1}\local:properties>}% +} +\def\InsertTagEnd#1{\HCode{</\get:tag{#1}>}} + +\long\def\InlineElementStart#1#2{\InsertTagStart{#1}{#2}} +\long\def\InlineElementEnd#1{\InsertTagEnd{#1}} + +\long\def\BlockElementStart#1#2{\ifvmode\IgnorePar\fi\EndP\InsertTagStart{#1}{#2}} +\long\def\BlockElementEnd#1#2{\ifvmode\IgnorePar\fi\EndP\InsertTagEnd{#1}} + +% define default values for a new logical block +\def\NewLogicalBlock#1{% + \SetTag{#1}{span}% + \expandafter\def\csname #1:properties\endcsname{} +} + +\def\SetTag#1#2{\expandafter\xdef\csname #1:tagname\endcsname{#2}} +\def\get:tag#1{\expandafter\expandafter\csname #1:tagname\endcsname} + +\def\SetBlockProperty#1#2#3{% + \expandafter\ifcsname #1:property:#2\endcsname\else% + \expandafter\edef\csname #1:properties\endcsname{\csname #1:properties\endcsname\space\csname #1:property:#2\endcsname } + \fi% + \expandafter\def\csname #1:property:#2\endcsname{#2="#3"} +} + +\def\get:block:properties#1{% +\expandafter\csname #1:properties\endcsname% +} + +\:CheckOption{verify} \if:Option \let\:chk:trc\:gobble \else \:CheckOption{verify+} \if:Option |