1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
|
% $Id: common-info.tex 237 2017-01-29 18:20:42Z karl $
% Common TeX definitions used only in the *-info.tex literate sources.
% Not installed.
%
% Copyright 2009-2017 TeX Users Group
% Copyright 1996-2009 Eitan M. Gurari
% Released under LPPL 1.3c+.
% See tex4ht-cpright.tex for license text.
\expandafter\ifx \csname YES\HTML\endcsname\relax
% begin comment. 21/07/2016 (dg)
% on first run \infoIVht expects \ConfigureHinput
% ( \def\infoIVht#1\ConfigureHinput{..} )
% so we feed it with "\ConfigureHinput" (no expansion here, merely
% a delimiter); the rest is slurped until the "//".
% end
\def\CleanComment{[0]\ConfigureHinput\id:gobble}
\else
\let\saveCd=\<
\def\<{\edef\FIRST{\the\inputlineno}\let\<\saveCd \saveCd}
%
% Eitan's commented-out definition started like this (and doesn't work):
%\def\CleanComment#1tex4ht-info#2#3#4.#5>#6//{[\eatIV#4% <--jobname
%
% Eitan's active definition started like this:
%\def\CleanComment#1tex4ht-info#2#3#4.#5>#6//{[#4% <--jobname
%
% However, that didn't work either. #4 is not the jobname.
% The arguments when running htlatex tex4ht-info-mml.tex are these:
% %#1<-
%\CleanComment #1tex4ht-info#2#3#4.#5>#6//->
%[\if ,\ifnum \FIRST =#6 .\else ,0\fi
%#1<-
%#2<--
%#3<-m
%#4<-ml
%#5<-html#QPrTx1"\<infomml\
%#6<-92\ifx \CodeId \:gobbleii \else ...\fi
%
% As a result, when running mzlatex hello.tex xhtml,info there was
% an error on the first line of infomml.4ht, which looked like this:
% \ifx\infoIVht\UnDeF\def\infoIVht#1//{}\fi\infoIVht[ml0]28...//
% That "ml" is not a number, so \ifnum fails. This only happens
% mzlatex and the info option, not htlatex. We don't understand.
%
% This version avoids the spurious "ml" but mzlatex hello.tex still
% fails, trying to process the \ConfigureHinput blocks as text.
% Changing the bracketed number in infomml.4ht to small values seems
% to make it pass, but can't see how to generate it. The number
% after the brackets (#6) changes also.
%
% Since all this is only about the info option with mzlatex,
% just leaving it failing for now. Other things to do.
\def\CleanComment#1tex4ht-info#2#3#4.#5>#6//{[1\empty %
\if,\ifnum \FIRST=#6 .\else ,0\fi\fi]#6//}
\def\eatIV#1#2#3#4{}
\fi
\Comment{
\string\ifx\string\infoIVht\string\UnDeF\string\def\string\infoIVht#1//{}\string\fi\string\infoIVht\CleanComment}{//
}
\def\>>>#1<<<{\bgroup\csname no:catcodes\endcsname0{255}{12}%
\csname no:catcodes\endcsname{13}{13}{13}% ^^M
\def\temp##1>>>{\egroup
\expandafter \def\csname #1\endcsname{##1}}\temp}
|
