diff options
author | Karl Berry <karl@freefriends.org> | 2024-04-24 22:11:10 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2024-04-24 22:11:10 +0000 |
commit | 488ce3fef5b02f2ea18895f0f43f460b0811418a (patch) | |
tree | a1f00a9eafa0480eefeaa145dd803a22af2875a6 /Master/texmf-dist/source/generic/tex4ht/tex4ht-4ht.tex | |
parent | dff4889330f23dea19495dbe8c21dcfc17172690 (diff) |
letterspacing support, tex4ht r1508-1511
git-svn-id: svn://tug.org/texlive/trunk@71072 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/generic/tex4ht/tex4ht-4ht.tex')
-rw-r--r-- | Master/texmf-dist/source/generic/tex4ht/tex4ht-4ht.tex | 36 |
1 files changed, 28 insertions, 8 deletions
diff --git a/Master/texmf-dist/source/generic/tex4ht/tex4ht-4ht.tex b/Master/texmf-dist/source/generic/tex4ht/tex4ht-4ht.tex index 8296aec575f..4af3079f8a6 100644 --- a/Master/texmf-dist/source/generic/tex4ht/tex4ht-4ht.tex +++ b/Master/texmf-dist/source/generic/tex4ht/tex4ht-4ht.tex @@ -1,4 +1,4 @@ -% $Id: tex4ht-4ht.tex 1507 2024-04-22 13:28:48Z michal_h21 $ +% $Id: tex4ht-4ht.tex 1512 2024-04-24 22:10:14Z karl $ % tex tex4ht-4ht or ht tex tex4ht-4ht % % Copyright 2009-2024 TeX Users Group @@ -31389,11 +31389,11 @@ for output formats. %%%%%%%%%%%%% \<microtype.4ht\><<< -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% microtype.4ht |version % -% Copyright (C) |CopyYear.2007. Eitan M. Gurari % -|<TeX4ht copyright|> +% microtype.4ht (|version), generated from |jobname.tex +% Copyright |CopyYear.2007. Eitan M. Gurari +|<TeX4ht copywrite|> |<disable microtype|> + |<microtype textls|> \Hinput{microtype} \endinput >>> \AddFile{9}{microtype} @@ -31406,11 +31406,31 @@ for output formats. \renewcommand{\UseMicroTypeSet}[2][]{} \renewcommand{\SetProtrusion}[3][]{} \renewcommand{\SetExpansion}[3][]{} -\ifx \textls\UnDef\else - \renewcommand{\textls}[2][]{#2} -\fi >>> +We can try to provide a letterspacing command: + +\<microtype textls\><<< +\NewConfigure{textls}{2} +\ExplSyntaxOn +\ifx\MT@letterspace\m@ne +\edef\:letterspacedefault{\fp_eval:n{\MT@letterspace@default/1000}} +\else +\edef\:letterspacedefault{\fp_eval:n{\MT@letterspace/1000}} +\fi +\providecommand\:textls[2][]{% + \begingroup% + \ifx\relax#1\relax\else% + \edef\:letterspacing{\fp_eval:n{#1/1000}}% + \fi% + \a:textls% + #2% + \b:textls% + \endgroup% +} +\ExplSyntaxOff +\HLet\MT@textls\:textls +>>> %%%%%%%%%%%%% \Section{Bm.sty} %%%%%%%%%%%%% |