lettrine.4ht

% Define options
\newcommand*{\LH@ante}{}
\newcommand*{\LH@findent}{}
\newcommand*{\LH@lhang}{}

% Lettrine will have 4 tags
\NewConfigure{lettrine}{8}

% Renew the command
\renewcommand\lettrine[3][]{%
\leavevmode 
\define@key{LH}{ante}{\renewcommand*{\LH@ante}{##1}}%
\define@key{LH}{findent}{\renewcommand*{\LH@findent}{##1}}%
\define@key{LH}{lhang}{\renewcommand*{\LH@lhang}{##1}}%
\setkeys{LH}{#1}%
\HCode{<span class="lettrine lettrine-#2">}\b:lettrine\LH@ante\c:lettrine\HCode{<span class="lettrine-letter lettrine-letter-#2">}#2\e:lettrine\f:lettrine\g:lettrine#3\h:lettrine
% Reset values
\renewcommand*{\LH@ante}{}%
\renewcommand*{\LH@findent}{}%
\renewcommand*{\LH@lhang}{}%
}

% Set the tags
\Configure{lettrine}{\Tg<span class="lettrine">}{\Tg<span class="lettrine-ante">}{\Tg</span>}{\Tg<span class="lettrine-letter">}{\Tg</span>}{\Tg</span>}{\Tg<span class="lettrine-line">}{\Tg</span>}

% Define default Css
\Css{.lettrine{
float: left;
line-height: 0.7;
margin-left: -0.1em;
margin-bottom: -0.3em;
margin-right: 0.2em;
}
.lettrine-ante{
vertical-align: top;
}
.lettrine-letter{
font-style: normal;
font-size: 4em;
color: gray;
}
.lettrine-A{
margin-right: 0.3em;
}
.lettrine-A + .lettrine-line{
margin-left: -0.4em;
}
.lettrine-À{
margin-right: 0.3em;
}
.lettrine-À + .lettrine-line{
margin-left: -0.4em;
}
.lettrine-J{
line-height: 1;
margin-right: 0;
}
.lettrine-H, .lettrine-I, .lettrine-N, .lettrine-U{
margin-right: 0;
}
.lettrine-V{
margin-right: -0.3em;
}
.lettrine-V + .lettrine-line{
margin-left: 0.3em;
}
.lettrine-Q{
padding-bottom: 1em;
margin-top: -0.6em;
}}

\Css{.lettrine-line{
font-variant: small-caps;
}}