diff options
author | Karl Berry <karl@freefriends.org> | 2008-07-06 18:18:57 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2008-07-06 18:18:57 +0000 |
commit | 231fc251fff6ff4c087e7678772c15875a8f91d6 (patch) | |
tree | d0756fdb158e4e74aac20d188fedb0a001fde630 /Master/texmf-dist/tex/generic/tex4ht/javahelp.4ht | |
parent | cb2c4aa6e476dccf515b5d163ddf1c6b3a961372 (diff) |
tex4ht-1.0.2008_07_05_0937
git-svn-id: svn://tug.org/texlive/trunk@9301 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/tex4ht/javahelp.4ht')
-rw-r--r-- | Master/texmf-dist/tex/generic/tex4ht/javahelp.4ht | 1016 |
1 files changed, 1009 insertions, 7 deletions
diff --git a/Master/texmf-dist/tex/generic/tex4ht/javahelp.4ht b/Master/texmf-dist/tex/generic/tex4ht/javahelp.4ht index ddd611f1c25..1a48445fcd9 100644 --- a/Master/texmf-dist/tex/generic/tex4ht/javahelp.4ht +++ b/Master/texmf-dist/tex/generic/tex4ht/javahelp.4ht @@ -1,6 +1,6 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% javahelp.4ht 2006-02-22-11:12 % -% Copyright (C) 2003--2006 Eitan M. Gurari % +% javahelp.4ht 2008-07-05-09:27 % +% Copyright (C) 2003--2008 Eitan M. Gurari % % % % This work may be distributed and/or modified under the % % conditions of the LaTeX Project Public License, either % @@ -24,9 +24,22 @@ % gurari@cse.ohio-state.edu % % http://www.cse.ohio-state.edu/~gurari % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\immediate\write-1{version 2006-02-22-11:12} +\immediate\write-1{version 2008-07-05-09:27} -\immediate\write-1{--------------- JavaHelp -----------------} +\exit:ifnot{Preamble,% +array,% +color,% +colortbl,% +fontmath,% +frenchb,% +latex,% +longtable,% +tex4ht} + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \ConfigureHinput{Preamble} +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \immediate\write-1{--------------- JavaHelp -----------------} \immediate\write-1{The entry (HelpSet) file for the java program is at `\jobname.hs'} \immediate\write-1{Generate a search database @@ -45,7 +58,118 @@ \immediate\write-1{ htlatex \jobname\space "html,javahelp,3.2,3"} \immediate\write-1{------------------------------------------} -\def\Write:File#1#2{% +\newif\ifimmediate +\immediatefalse + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +\endinput\empty\empty\empty\empty\empty\empty +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \ConfigureHinput{tex4ht} +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \:CheckOption{-css} \if:Option \else + \Log:Note{to ignore CSS code, use the command line option `-css} + \:CheckOption{css-in} \if:Option + \Log:Note{the inline CSS code is extracted from the input of the + previous compilation, so an extra compilation might be needed} + \Configure{@HEAD}{\openin15=\jobname .css +\ifeof15 \:warning{Missing file: \jobname .css }% +\else +\bgroup + \catcode`\{=12 \catcode`\}=12 \catcode`\%=12 \catcode`\#=12 + \HCode{\Hnewline<style type="text/css">\Hnewline <!-- \Hnewline}% + \loop + \read15 to \:temp + \def\:tempa{\par}\ifx \:temp\:tempa \let\:temp\empty \fi + \ifeof15\else + \expandafter\tmp:toks\expandafter{\:temp}% + \HCode{\the\tmp:toks \Hnewline}% + \repeat + \HCode{\Hnewline-->\Hnewline</style>\Hnewline}% +\egroup +\fi +\closein15 +} + \else + \Log:Note{for inline CSS code, use the command line option `css-in'} + \Configure{@HEAD}{\HCode{<link + rel="stylesheet" type="text/css" + href="\aa:CssFile"\xml:empty>\Hnewline}} + \fi +\fi +\:CheckOption{-css} \if:Option + \def\Css#1{} + \NewConfigure{CssFile}{2} +\else + \def\Css#1{{\def\:temp{\Configure{Needs}}% + \expandafter\:temp\expandafter{\aa:Css}\Needs{#1}}} +\ScriptCommand{\CssFile}{% + \immediate\write-1{--- file \aa:CssFile\space ---}% + \def\FontSize##1##2{\:Context{##1}\ht:special{t4ht;\%##2}\%}% + \def\FontName##1{\:Context{##1}\ht:special{t4ht;=}}% + \def\:Context##1{\ht:special{t4ht>\jobname.tmp}##1\ht:special + {t4ht>\aa:CssFile}}% + \ht:special{t4ht>\jobname.tmp}\ht:special{t4ht>\aa:CssFile}% + \bgroup \everypar{}\NoFonts \bb:CssFile \hfil\break} + {\egroup \EndNoFonts + \ht:special{t4ht<\aa:CssFile}\ht:special{t4ht<\jobname.tmp}} +\let\Css:File=\CssFile +\def\CssFile{\futurelet\:temp\Css:Fl} +\def\Css:Fl{\ifx [\:temp \expandafter\Css:fl + \else \expand:after{\Css:File \space}\fi} +\def\Css:fl[#1]{\Css:File\space \css:files #1,,!*?: } +\def\css:files#1,#2!*?: {\def\:temp{#1}\ifx \:temp\empty + \else \def\:temp{\in:css#1.!*?: \css:files#2,,!*?: }\fi + \:temp } +\def\in:css#1.#2!*?: {\def\:temp{#2}\ifx \:temp\empty + \inc:ss#1.css!*?: + \else \inc:ss#1.#2!*?: \fi} +\def\inc:ss#1.!*?: { \immediate\openin15=#1 + \ifeof15 \immediate\closein15 + \:warning{Missing file: #1}% + \else \immediate\closein15 \input #1 \fi + } +\NewConfigure{CssFile}[2]{\def\aa:CssFile{#1}\def\bb:CssFile{#2}} + +\fi + +\ifx \a:FontCss:\:UnDef + \Configure{FontCss}{Font\string_Css##1} + {Font\string_Css\string_Plus\space##1} +\fi +\expandafter\ifx \csname aa:Css\endcsname\relax + \Configure{Css}{Css: ##1} +\fi +\Configure{halignTD} {}{} + {<}{\HCode{ style="white-space:nowrap; text-align:left;"}} + {-}{\HCode{ style="white-space:nowrap; text-align:center;"}} + {>}{\HCode{ style="white-space:nowrap; text-align:right;"}} + {^}{\HCode{ style="vertical-align:top; white-space:nowrap;"}} + {=}{\HCode{ style="vertical-align:baseline; white-space:nowrap;"}} + {|}{\HCode{ style="vertical-align:middle; white-space:nowrap;"}} + {_}{\HCode{ style="vertical-align:bottom; white-space:nowrap;"}} + {p}{\HCode{ style="white-space:wrap; text-align:left;"}\Protect\a:HColWidth} + {m}{\HCode{ style="white-space:nowrap; text-align:left; vertical-align:middle;"}} + {b}{\HCode{ style="white-space:nowrap; text-align:left; vertical-align:baseline;"}} + {} +\NewConfigure{HColWidth}{1} +\Configure{HColWidth}{} + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +\endinput\empty\empty\empty\empty\empty\empty +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + + + + + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \ConfigureHinput{latex} +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \def\Write:File#1#2{% \special{t4ht>#1}% \special{t4ht=#2}% \special{t4ht*>#1}% @@ -98,7 +222,13 @@ \fi \Configure{Preamble} - {} + {\:CheckOption{-css} \if:Option + \else {\ifdim \lastskip>\z@ \unskip\fi \IgnorePar\parindent\z@ +\leavevmode}% +\immediate\write-1{--- file \aa:CssFile\space ---}% +\ht:special{t4ht>\aa:CssFile}\ht:special{t4ht=\Hnewline /* css.sty */}% +\ht:special{t4ht<\aa:CssFile}% +\fi} {\Write:File {\jobname.jhm} {<?xml version="1.0" encoding="ISO-8859-1" ?>\Hnewline @@ -115,7 +245,879 @@ \Configure{@/BODY} {\relax \ifnum \FileNumber=1 - \input javahelp-a.4ht + \SaveEndP + \input javahelp-a.4ht + \RecallEndP \fi } +\:CheckOption{no-array}\if:Option \else + \:CheckOption{pic-tabular} \if:Option \else + \ConfigureEnv{tabular} + {\Configure{noalign}% + {\f:tabular\d:tabular \HCode{<tr><td colspan="\ar:cnt">}} + {\HCode{</td></tr>}\pend:def\TableNo{0}\c:tabular\e:tabular}% +% + \IgnorePar\ifvmode\else\HCode{<!--tex4ht:inline-->}\fi +\EndP\HCode{<div class="tabular">}% + \PushStack\Col:Marg\AllColMargins + } + {\HCode{</div>}\PopStack\Col:Marg\AllColMargins\ShowPar + \Configure{noalign}{}{}% +% + \ShowPar +% + }{}{} + \Css{div.tabular, div.center div.tabular {text-align: center; + margin-top:0.5em; margin-bottom:0.5em; }} + \Css{table.tabular td p{margin-top:0em;}} + \Css{table.tabular {margin-left: auto; + margin-right: auto;}} +\fi +\def\ColMargins{% + \ifx \AllColMargins\empty + \:warning{Empty \string\AllColMargins}% + \else + \tmp:cnt=\HCol\relax + \expandafter\nosp:hbr\AllColMargins 1//% + \fi } +\def\nosp:hbr#11#2//{\ifnum \tmp:cnt>1 \advance\tmp:cnt by -1 + \nosp:hbr#2//\else\nosp:gt#11#2//\fi} +\def\nosp:gt#11#21#3//{% + \def\:temp{#1}\ifx \:temp\empty 1\else 0\fi + \def\:temp{#2}\ifx \:temp\empty 1\else 0\fi} +\Configure{VBorder} + {\global\let\oldVBorder=\empty} + {\gdef\oldVBorder{border="1"}} + {}{} +\Configure{halignTB<>}{tabular}{\HCode{id="TBL-\TableNo" + class="tabular"\Hnewline + \oldVBorder \GROUPS\Hnewline + }<>\HAlign} +\Css{table[rules] {border-left:solid black 0.4pt; + border-right:solid black 0.4pt; }} +\:CheckOption{pic-tabular} \if:Option \else + \Configure{tabular} + {\ifvmode \IgnorePar\fi \EndP \halignTB{tabular}\putVBorder } + {\HCode{</table>}} + {\HCode{<tr \Hnewline}\halignTR + \HCode{ id="TBL-\TableNo-\HRow-">}} + {\r:HA} + {\HCode{<td \ifnum \HMultispan>1 colspan="\HMultispan"\fi}% + \halignTD \HCode{ id="TBL-\TableNo-\HRow-\HCol" + \Hnewline class="td}\NoFonts + \bgroup + \ifx \ttfamily\:UnDef \else \ttfamily\fi + \ColMargins + \egroup +\EndNoFonts +% + \HCode{">}\SaveEndP +% + \par \ShowPar +\PushStack\Table:Stck\TableNo} + {\IgnorePar \EndP +\PopStack\Table:Stck\TableNo \d:HA} +\fi +\def\R:HA{\HCode{<tr \Hnewline}\halignTR\HCode{>}} +\def\r:HA{\HCode{</tr>}} +\def\D:HA{\SaveEndP + \HCode{<td + \ifnum \HMultispan>1 colspan="\HMultispan"\fi}% + \halignTD \HCode{\Hnewline>}\ShowPar\par} +\def\d:HA{\ifvmode \IgnorePar \fi \EndP\HCode{</td>}\RecallEndP +} +\Configure{@{}}{} + +\Css{td.td00{ padding-left:0pt; padding-right:0pt; }} +\Css{td.td01{ padding-left:0pt; padding-right:5pt; }} +\Css{td.td10{ padding-left:5pt; padding-right:0pt; }} +\Css{td.td11{ padding-left:5pt; padding-right:5pt; }} +\Configure{halignTB<>}{array}{\HCode{id="TBL-\TableNo" class="array"\Hnewline + \GROUPS\Hnewline + }<>\HAlign} +\Css{table[rules] {border-left:solid black 0.4pt; + border-right:solid black 0.4pt; }} +\:CheckOption{pic-array} \if:Option \else + \Configure{array} + {\ifvmode \IgnorePar\fi \EndP\halignTB{array}\putVBorder} + {\HCode{</table>}} + {\R:HA} + {\r:HA} + {\D:HA\HCode{<div class="td}\NoFonts + \bgroup + \ifx \ttfamily\:UnDef \else \ttfamily\fi + \ColMargins + \egroup +\EndNoFonts +% + \HCode{">}\par \ShowPar +\pic:env} + {\IgnorePar \EndP +\HCode{</div>}\d:HA} + \Configure{arrayparbox}{\ShowPar} +\fi + \let\VBorder=\empty \let\AllColMargins=\empty + \Configure{VBorder} + {\let\VBorder=\empty \let\AllColMargins=\empty + \global\let\GROUPS=\empty \HAssign\NewGroup = 0 + \gHAdvance\Next:TableNo by 1 \global\let\TableNo=\Next:TableNo + \global\let\oldVBorder=\empty + } + {\xdef\VBorder{\VBorder\ifnum \NewGroup> 0 </colgroup>\fi} + \HAssign\NewGroup = 0 \gdef\GROUPS{rules="groups"}% + \gdef\oldVBorder{border="1" }% + } + {\Advance:\NewGroup by 1 + \ifnum \NewGroup=1 \xdef\VBorder{\VBorder<colgroup + id="TBL-\TableNo-\ar:cnt g">}\fi + \xdef\VBorder{\VBorder<col\Hnewline id="TBL-\TableNo + -\ar:cnt"\xml:empty>}\xdef\AllColMargins{\AllColMargins1}} + {\xdef\AllColMargins{\AllColMargins 0}} +% \Configure{HBorder} +% {<tr\Hnewline class="hline">} {<td><hr\xml:empty></td>} {</tr>} +% {<tr\Hnewline class="cline">} +% {<td></td>} {<td><hr\xml:empty></td>} {</tr>} +% {<tr\Hnewline class="vspace" style="font-size:\HBorderspace">} +% {<td\Hnewline>\string </td>} {</tr>} +% \Configure{putHBorder}{\HCode{\HBorder}} +\HAssign\Next:TableNo=0 \global\let\TableNo=\Next:TableNo +\Css{.hline hr, .cline hr{ height : 1px; margin:0px; }} +\def\putVBorder{\expandafter\put:VBorder\VBorder</>!*?: } +\def\put:VBorder#1</#2>#3!*?: {\def\:temp{#2}\ifx\:temp\empty + \HCode{\VBorder}% + \def\:temp{#1}\ifx\:temp\empty \else\HCode{</colgroup>}\fi + \else \def\:temp{\put:VBorder#3!*?: }\expandafter\:temp\fi +} +\Configure{multicolumn} + {\let\col:Css\empty + \Configure{VBorder} + {} + {\edef\col:Css{\col:Css + border-\ifnum \ar:cnt=0 left\else right\fi + :solid black 0.4pt;}% + }{}{}% + } + {\ifx \col:Css\empty \else + \Css{td\#TBL-\TableNo-\HRow-\HCol{\col:Css}}% + \fi + } + {\ifvmode\IgnorePar\fi + \HCode{<div class="multicolumn" }\HColAlign\HCode{>}% + \ifx \col:Css\empty \else + \Css{td\#TBL-\TableNo-\HRow-\HCol{\col:Css}}% + \fi + } + {\ifvmode\IgnorePar\fi \EndP\HCode{</div>}} +\def\pic:env{% + \def\begin##1{\bgroup + \def\end####1{\o:end:{####1}\EndPicture\egroup}% + \ifx \EndPicture\:UnDef + \Picture+{ class="##1" style="text-align:middle"}% + \else \let\EndPicture=\empty\fi + \o:begin:{##1}}% +} + +\fi + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +\endinput\empty\empty\empty\empty\empty\empty +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + + + + + + + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \ConfigureHinput{fontmath} +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \Configure{textbf} + {\ifimmediate\else \Protect\HCode{<b>}\fi} + {\ifimmediate\else \Protect\HCode{</b>}\fi} +\Configure{textit} + {\ifimmediate\else \Protect\HCode{<i>}\fi} + {\ifimmediate\else \Protect\HCode{</i>}\fi} +\Configure{textsl} + {\ifimmediate\else \Protect\HCode{<i>}\fi} + {\ifimmediate\else \Protect\HCode{</i>}\fi} +\Configure{texttt} + {\ifimmediate\else \Protect\HCode{<tt>}\fi} + {\ifimmediate\else \Protect\HCode{</tt>}\fi} +\Configure{emph} + {\ifimmediate\else \Protect\HCode{<em>}\fi} + {\ifimmediate\else \Protect\HCode{</em>}\fi} + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +\endinput\empty\empty\empty\empty\empty\empty +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \ConfigureHinput{array} +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \:CheckOption{pic-tabular} \if:Option \else + \ConfigureEnv{tabular} + {\Configure{noalign}% + {\f:tabular\d:tabular \HCode{<tr><td colspan="\ar:cnt">}} + {\HCode{</td></tr>}\pend:def\TableNo{0}\c:tabular\e:tabular}% +% + \IgnorePar\ifvmode\else\HCode{<!--tex4ht:inline-->}\fi +\EndP\HCode{<div class="tabular">}% + \PushStack\Col:Marg\AllColMargins + } + {\HCode{</div>}\PopStack\Col:Marg\AllColMargins\ShowPar + \Configure{noalign}{}{}% +% + \ShowPar +% + }{}{} + \Css{div.tabular, div.center div.tabular {text-align: center; + margin-top:0.5em; margin-bottom:0.5em; }} + \Css{table.tabular td p{margin-top:0em;}} + \Css{table.tabular {margin-left: auto; + margin-right: auto;}} +\fi +\def\ColMargins{% + \ifx \AllColMargins\empty + \:warning{Empty \string\AllColMargins}% + \else + \tmp:cnt=\HCol\relax + \expandafter\nosp:hbr\AllColMargins 1//% + \fi } +\def\nosp:hbr#11#2//{\ifnum \tmp:cnt>1 \advance\tmp:cnt by -1 + \nosp:hbr#2//\else\nosp:gt#11#2//\fi} +\def\nosp:gt#11#21#3//{% + \def\:temp{#1}\ifx \:temp\empty 1\else 0\fi + \def\:temp{#2}\ifx \:temp\empty 1\else 0\fi} +\Configure{VBorder} + {\global\let\oldVBorder=\empty} + {\gdef\oldVBorder{border="1"}} + {}{} +\Configure{halignTB<>}{tabular}{\HCode{id="TBL-\TableNo" + class="tabular"\Hnewline + \oldVBorder \GROUPS\Hnewline + }<>\HAlign} +\Css{table[rules] {border-left:solid black 0.4pt; + border-right:solid black 0.4pt; }} +\:CheckOption{pic-tabular} \if:Option \else + \Configure{tabular} + {\ifvmode \IgnorePar\fi \EndP \halignTB{tabular}\putVBorder } + {\HCode{</table>}} + {\HCode{<tr \Hnewline}\halignTR + \HCode{ id="TBL-\TableNo-\HRow-">}} + {\r:HA} + {\HCode{<td \ifnum \HMultispan>1 colspan="\HMultispan"\fi}% + \halignTD \HCode{ id="TBL-\TableNo-\HRow-\HCol" + \Hnewline class="td}\NoFonts + \bgroup + \ifx \ttfamily\:UnDef \else \ttfamily\fi + \ColMargins + \egroup +\EndNoFonts +% + \HCode{">}\SaveEndP +% + \par \ShowPar +\PushStack\Table:Stck\TableNo} + {\IgnorePar \EndP +\PopStack\Table:Stck\TableNo \d:HA} +\fi +\def\R:HA{\HCode{<tr \Hnewline}\halignTR\HCode{>}} +\def\r:HA{\HCode{</tr>}} +\def\D:HA{\SaveEndP + \HCode{<td + \ifnum \HMultispan>1 colspan="\HMultispan"\fi}% + \halignTD \HCode{\Hnewline>}\ShowPar\par} +\def\d:HA{\ifvmode \IgnorePar \fi \EndP\HCode{</td>}\RecallEndP +} +\Configure{@{}}{} + +\Css{td.td00{ padding-left:0pt; padding-right:0pt; }} +\Css{td.td01{ padding-left:0pt; padding-right:5pt; }} +\Css{td.td10{ padding-left:5pt; padding-right:0pt; }} +\Css{td.td11{ padding-left:5pt; padding-right:5pt; }} +\Configure{halignTB<>}{array}{\HCode{id="TBL-\TableNo" class="array"\Hnewline + \GROUPS\Hnewline + }<>\HAlign} +\Css{table[rules] {border-left:solid black 0.4pt; + border-right:solid black 0.4pt; }} +\:CheckOption{pic-array} \if:Option \else + \Configure{array} + {\ifvmode \IgnorePar\fi \EndP\halignTB{array}\putVBorder} + {\HCode{</table>}} + {\R:HA} + {\r:HA} + {\D:HA\HCode{<div class="td}\NoFonts + \bgroup + \ifx \ttfamily\:UnDef \else \ttfamily\fi + \ColMargins + \egroup +\EndNoFonts +% + \HCode{">}\par \ShowPar +\pic:env} + {\IgnorePar \EndP +\HCode{</div>}\d:HA} + \Configure{arrayparbox}{\ShowPar} +\fi + \let\VBorder=\empty \let\AllColMargins=\empty + \Configure{VBorder} + {\let\VBorder=\empty \let\AllColMargins=\empty + \global\let\GROUPS=\empty \HAssign\NewGroup = 0 + \gHAdvance\Next:TableNo by 1 \global\let\TableNo=\Next:TableNo + \global\let\oldVBorder=\empty + } + {\xdef\VBorder{\VBorder\ifnum \NewGroup> 0 </colgroup>\fi} + \HAssign\NewGroup = 0 \gdef\GROUPS{rules="groups"}% + \gdef\oldVBorder{border="1" }% + } + {\Advance:\NewGroup by 1 + \ifnum \NewGroup=1 \xdef\VBorder{\VBorder<colgroup + id="TBL-\TableNo-\ar:cnt g">}\fi + \xdef\VBorder{\VBorder<col\Hnewline id="TBL-\TableNo + -\ar:cnt"\xml:empty>}\xdef\AllColMargins{\AllColMargins1}} + {\xdef\AllColMargins{\AllColMargins 0}} +% \Configure{HBorder} +% {<tr\Hnewline class="hline">} {<td><hr\xml:empty></td>} {</tr>} +% {<tr\Hnewline class="cline">} +% {<td></td>} {<td><hr\xml:empty></td>} {</tr>} +% {<tr\Hnewline class="vspace" style="font-size:\HBorderspace">} +% {<td\Hnewline>\string </td>} {</tr>} +% \Configure{putHBorder}{\HCode{\HBorder}} +\HAssign\Next:TableNo=0 \global\let\TableNo=\Next:TableNo +\Css{.hline hr, .cline hr{ height : 1px; margin:0px; }} +\def\putVBorder{\expandafter\put:VBorder\VBorder</>!*?: } +\def\put:VBorder#1</#2>#3!*?: {\def\:temp{#2}\ifx\:temp\empty + \HCode{\VBorder}% + \def\:temp{#1}\ifx\:temp\empty \else\HCode{</colgroup>}\fi + \else \def\:temp{\put:VBorder#3!*?: }\expandafter\:temp\fi +} +\Configure{multicolumn} + {\let\col:Css\empty + \Configure{VBorder} + {} + {\edef\col:Css{\col:Css + border-\ifnum \ar:cnt=0 left\else right\fi + :solid black 0.4pt;}% + }{}{}% + } + {\ifx \col:Css\empty \else + \Css{td\#TBL-\TableNo-\HRow-\HCol{\col:Css}}% + \fi + } + {\ifvmode\IgnorePar\fi + \HCode{<div class="multicolumn" }\HColAlign\HCode{>}% + \ifx \col:Css\empty \else + \Css{td\#TBL-\TableNo-\HRow-\HCol{\col:Css}}% + \fi + } + {\ifvmode\IgnorePar\fi \EndP\HCode{</div>}} +\def\pic:env{% + \def\begin##1{\bgroup + \def\end####1{\o:end:{####1}\EndPicture\egroup}% + \ifx \EndPicture\:UnDef + \Picture+{ class="##1" style="text-align:middle"}% + \else \let\EndPicture=\empty\fi + \o:begin:{##1}}% +} + + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +\endinput\empty\empty\empty\empty\empty\empty +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \ConfigureHinput{longtable} +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \Configure{halignTB<>}{longtable}{\HCode{id="TBL-\TableNo" + class="longtable"\Hnewline + \oldVBorder \GROUPS\Hnewline + }<>\HAlign} +\Css{table[rules] {border-left:solid black 0.4pt; + border-right:solid black 0.4pt; }} +\Configure{longtable} + {\IgnorePar\EndP + \HCode{<!--l. \the\inputlineno-->% +<div class="longtable">}% + \halignTB{longtable}\putVBorder } + {\HCode{</table></div>}} + {\HCode{<tr \Hnewline}\halignTR\HCode{ id="TBL-\TableNo-\HRow-">}} + {\r:HA} + {\HCode{<td \ifnum \HMultispan>1 colspan="\HMultispan"\fi}% + \halignTD \HCode{ id="TBL-\TableNo-\HRow-\HCol" + \Hnewline class="td}\NoFonts + \bgroup + \ifx \ttfamily\:UnDef \else \ttfamily\fi + \ColMargins + \egroup +\EndNoFonts +% + \HCode{">}\SaveEndP +% + \par \ShowPar +\PushStack\Table:Stck\TableNo} + {\PopStack\Table:Stck\TableNo \IgnorePar \EndP +\d:HA} +\Css{div.longtable{text-align:center;}} +\Configure{longtableparbox}{\IgnorePar\leavevmode\ShowPar\par} + +\:CheckOption{pic-longtable} \if:Option + \ConfigureEnv{longtable} + {\IgnorePar\EndP\Tg<div class="pic-longtable">\Picture*{}} + {\EndPicture\Tg</div>}{}{} + \Css{div.pic-longtable {text-align:center;}} +\else + \Log:Note{for pictorial longtable, + use the command line option `pic-longtable'} +\fi + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +\endinput\empty\empty\empty\empty\empty\empty +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + + + + + + + + + + + + + + + + + + + + + + + + + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \ConfigureHinput{color} +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \HAssign\textcolorN=0 +\Configure{colorbox} + {\bgroup + \gHAdvance\textcolorN by 1 + \ifvmode \let\v:colorbox\def \IgnorePar \EndP + \else \let\v:colorbox=\relax \fi + \let\A:color=\a:color +\Configure{color}% + {\let\a:color=\A:color + \Configure{SetHColor} + {\Css{\ifx \v:colorbox\def div\else span\fi + \#colorbox\textcolorN{background-color:\HColor;}}}}% +% + \HCode{<\ifx \v:colorbox\def div\else span\fi \Hnewline + class="colorbox" id="colorbox\textcolorN">}}% + {\ifx \v:colorbox\def \EndP\HCode{</div>}\par + \else \HCode{</span>}\fi + \egroup + } + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +\endinput\empty\empty\empty\empty\empty\empty +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + + + + + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \ConfigureHinput{colortbl} +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \Configure{@classz} + {\let\begin:current@color\relax + \let\end:current@color\relax } + {% + \ifx \CT@column@color\relax \else + \ifx \CT@column@color\empty \else{% + \def\CT@color{\@ifnextchar[\color:ii\color:i}% + \CT@column@color!*?: % + \edef\:temp{\noexpand\add:color + {background-color}{\:temp}{\ar:cnt}}\:temp + }\fi \fi + } + {\begin:current@color} + {\end:current@color} +\Configure{rowcolor}{\row:clr} +\def\row:clr#1{{% + \HAdvance\HRow by 1 + \add:color{background-color}{#1}{\HRow-}}} +\Configure{text-colortbl} + {\add:color{color}{\current@color}{\HRow-\HCol}} +\Configure{cell-colortbl} + {\add:color{background-color}{\current@color}{\HRow-\HCol}} +\def\add:color#1#2#3{% + \Configure{SetHColor}{\Css{ \#TBL-\TableNo-#3{ #1:\HColor }}}{#2}} + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +\endinput\empty\empty\empty\empty\empty\empty +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \ConfigureHinput{frenchb} +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + \expandafter\let\csname jha:ftsp\expandafter\endcsname + \csname a:frenchb-thinspace\endcsname +\expandafter\def\csname a:frenchb-thinspace\endcsname{% + \ifimmediate + \expandafter\jha:ftspignore + \else + \expandafter\jha:ftsp + \fi +} +\def\jha:ftspignore#1frenchb-thinspace\endcsname{} + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +\endinput\empty\empty\empty\empty\empty\empty +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +\endinput |