<..fig4tex.4ht..>
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% fig4tex.4ht 2014-07-12-22:36 %
% Copyright (C) 2004--2009 Eitan M. Gurari %
<.TeX4ht copyright.>
<.fig4tex hooks.>
\Hinput{fig4tex}
\endinput
-_-_-
<..fig4tex hooks..>
\ifx \AtBeginDocument\UnDef
<.config figvisu.>
\else
\AtBeginDocument{<.config figvisu.>}
\fi
\NewConfigure{figvisu}{2}
\Configure{figvisu}{\Picture+{}}{\EndPicture}
-_-_-
<..config figvisu..>
\def\:tempc#1#2#3{%
\let\sv:EndPicture\EndPicture
\let\EndPicture\empty
\o:figvisu:{#1}{#2}{#3}%
\let\EndPicture\sv:EndPicture
}%
\HLet\figvisu\:tempc
-_-_-
<..config figvisu..>+
\def\:tempc#1#2#3{%
\let\svEndPicture\EndPicture
\let\EndPicture\empty
\o:figvisu:{#1}{#2}{#3}%
\let\EndPicture\svEndPicture
}%
\HLet\figvisu\:tempc
\def\:tempc#1{%
\a:figvisu
\raise -\dp#1 \rlap{\vrule width .001pt height .001pt depth 0pt}%
\edef\:temp{\the\ht#1}%
\box#1%
\raise \:temp \llap{\vrule width .001pt height .001pt depth 0pt}%
\b:figvisu
}
\HLet\figbox\:tempc
\def\:tempc#1{%
\a:figvisu
\raise -\dp#1 \rlap{\vrule width .001pt height .001pt depth 0pt}%
\edef\:temp{\the\ht#1}%
\copy#1%
\raise \:temp \llap{\vrule width .001pt height .001pt depth 0pt}%
\b:figvisu
}
\HLet\figcopy\:tempc
-_-_-
As far as latex is concerned fig4tex is correct, but for tex4ht the typesetting of code occurs too early within movable boxes positional-wise. The solution to the problem results in a tiny dirt at opposite corners of the figure.