<<<
\def\:temp{\o:obeylines:
\let\obeylines|=\o:obeylines:
\a:obyln \global\let\x:obln|=\end:obeylines \aftergroup\x:obln
\def\:temp{%
\ifx\:tempa\par \ht:everypar{\ht:everypar{\b:obyln}}%
\else \ht:everypar{\b:obyln}\fi}%
\futurelet\:tempa\:temp }
\HLet\obeylines|=\:temp
\NewConfigure{obeylines}[3]{\c:def\a:obyln{#1}\c:def\b:obyln{#3}%
\c:def\end:obeylines{#2}}
>>>
\ifHtml[\HPage{more}\Verbatim
xxxxxxxxxxxxxxxxxxxxx
{\obeylines neither do
things too high for me.}
xxxxxxxxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxx
{\obeylines neither do
things too high for me.}
xxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxxx
{\obeylines neither do
things too high for me.}
xxxxxxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxx
neither do
things too high for me.
xxxxxxxxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxx neither do
things too high for me. xxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxxx neither do
things too high for me.
xxxxxxxxxxxxxxxxxxxxxxxxxx
\EndVerbatim\EndHPage{}]\fi
The \''\%' command needs to be redefined for TeX4ht source files,
but this redefinition causes compilation errors when it is used in
titles or captions. So we redefine it to the original LaTeX
definition. We can detect if we are in the literate sources by checking
if the \''\MAKETITLE' command is defined.
See \Link[https://tex.stackexchange.com/q/652848/2891]{}{}
this question on TeX.sx for more details\EndLink.
\<<<
\ifdefined\MAKETITLE\else
\chardef\%=`\%
\fi
>>>
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\Chapter{ltspace (Horizontal Spaces)}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\Link[http://ctan.tug.org/ctan/tex-archive/macros/latex/base/ltspace.dtx]{}{}ltspace.dtx\EndLink
\<<<
\NewConfigure{hspace}{3}
\Configure{hspace}{}{}{ }
\def\:temp#1{\tmp:dim|=#1\relax
\a:hspace \hsp:c\hskip #1\relax\b:hspace}
\HLet\@hspace|=\:temp
\def\:temp#1{\tmp:dim|=#1\relax
\a:hspace \hsp:c\vrule \@width\z@\nobreak
\hskip #1\hskip \z@skip\b:hspace}
\HLet\@hspacer|=\:temp
\def\hsp:c{\ifdim \tmp:dim<1em\else\c:hspace\fi
\ifdim \tmp:dim<2em\else\c:hspace\fi
\ifdim \tmp:dim<3em\else\c:hspace\fi
\ifdim \tmp:dim<4em\else\c:hspace\fi
\ifdim \tmp:dim<5em\else\c:hspace\fi}
>>>
We need the assignment to \''\tmp:dim' because of commands like
\''\hspace{0.25em plus 0.125em minus 0.08em}'.
\<<<
\let\:tempc\@vspace
\append:defI\:tempc{\a:vspace{#1}}
\HLet\@vspace\:tempc
\let\:tempc\@vspacer
\append:defI\:tempc{\a:vspace{#1}}
\HLet\@vspacer\:tempc
\NewConfigure{vspace}[1]{\def\a:vspace##1{#1}}
\Configure{vspace}{}
>>>
%%%%%%%%%%%%%%%%%%
\Chapter{ltlength}
%%%%%%%%%%%%%%%%%%
\Link[http://ctan.tug.org/ctan/tex-archive/macros/latex/base/ltlength.dtx]{}{}ltlength.dtx\EndLink
%
%>>>
The commands \''\settoheight', \''\settodepth', and \''\settowidth'
invoke \''\setbox' without producing output. To avoid fake pictures,
we do the following.
\<<<
\let\:settodim|=\@settodim
\def\@settodim#1#2#3{\PictureOff \:settodim#1{#2}{#3}\PictureOn}
>>>
%%%%%%%%%%%%%
\Chapter{Cross References}
%%%%%%%%%%%%%
\Link[http://ctan.tug.org/ctan/tex-archive/macros/latex/base/ltxref.dtx]{}{}ltxref.dtx\EndLink
%%%%%%%%%%%%%
\Section{LaTeX}
%%%%%%%%%%%%%
\<<<
|
|
>>>
%%%%%%%%%%%%%
\SubSection{Index Labels}
%%%%%%%%%%%%%
Try to delete, or at least contain, \''\no:lbl:idx'.
\<<<
\def\no:lnk#1#2#3\EndLink{#3}
\let\:ref|=\ref
\let\:index|=\index
\def\no:lbl:idx{\let\label|=\@gobble }
\def\toc:lbl:idx{\a:NoSection}
>>>
%%%%%%%%%%%%%
\SubSection{ref, label, newlabel: Usage}
%%%%%%%%%%%%%
\<<<
\def\:tempc#1{\a:pageref\o:pageref:{#1}\b:pageref}
\HLet\pageref\:tempc
\NewConfigure{pageref}[3]{%
\def\a:pageref{#1\bgroup \Configure{ref}{\Link}{\EndLink}{#3}}%
\def\b:pageref{\egroup #2}%
}
\Configure{pageref}{}{}{}
>>>
\<<<
\NewConfigure{@newlabel}[1]{\concat:config\a:@newlabel{#1}}
\let\a:@newlabel|=\relax
|
\NewConfigure{newlabel}[2]{%
\def\a:newlabel{#1}\ifx \a:newlabel\empty
\def\label:addr{\cur:th \:currentlabel}%
\else
\def\label:addr{#1}%
\fi
\def\a:newlabel##1{\expandafter\string\c:rEfLiNK{\label:addr}{#2}}}
\NewConfigure{ref}[3]{%
\def\a:rEfLiNK{#1}\def\b:rEfLiNK{#3}%
\ifx \a:rEfLiNK\empty
\ifx \b:rEfLiNK\empty
\expandafter\def\c:rEfLiNK##1##2{##2}%
\else
\expandafter\def\c:rEfLiNK##1##2{#3}%
\fi
\else
\ifx \b:rEfLiNK\empty
\expandafter\def\c:rEfLiNK##1##2{#1{##1}{}##2#2}%
\else
\expandafter\def\c:rEfLiNK##1##2{#1{##1}{}#3#2}%
\fi
\fi
\def\b:rEfLiNK{#2}%
}
\Configure{newlabel}{\cur:th \:currentlabel}{#1}
\NewConfigure{newlabel-ref}[1]{\def\c:rEfLiNK{#1}%
\ifx \at:startdoc\:UnDef \dflt:ref{#1}\else
\pend:def\at:startdoc{\dflt:ref{#1}}\fi
}
\def\dflt:ref#1{\if@filesw\immediate\write\@auxout{\string\ifx
\string#1\string\UnDef\gdef\string#1\#1\#2{\#2}\string\fi}\fi}
\Configure{newlabel-ref}{\rEfLiNK}
\let\:writefile|=\@writefile
\def\@writefile#1{\bgroup \catcode`\:|=11 \:wrtfile{#1}}
\def\:wrtfile#1#2{\egroup\:writefile{#1}{#2}}
>>>
\List{*}
\item
\`'\Configure{ref}{\Link}{\EndLink}{anchor}' tells what \''\Link'-type command
should be on insertions of \''\ref'. If the third parameter is empty,
the anchor is the one provided by the system. If the first parameter
is empty, no Link is assumed.
\item
\''\Configure{newlabel}{\cur:th \:currentlabel}{#1}' supplies the
target address and the anchor.
\item
\''\Configure{newlabel}{}{#1}'
is equivalent to
\''\Configure{newlabel}{\cur:th \:currentlabel}{#1}'
\item
The
\''\Configure{newlabel-ref}{\rEfLiNK}' command provides an
intermediate link command for the aux command, which
\`'\Configure{ref}{\Link}{\EndLink}{anchor}' configures. If the first
field of the last configuration command is empty, than the anchor is
provided without its surrounding.
\EndList
\Verbatim
> One more thing. You will notice from `minitoc.tex' that the HTML
> anchors given to the sections depend on the value of \@currentlabel,
> be it set explicitely or implicitly (e.g., by the previous section).
> Is it what you want ?
Yes. I believe the reason was to avoid ambiguities--unfortunately,
I can't locate now where they could occur.
{\makeatletter \gdef\@currentlabel{XxX}}
\section*{first section/First chapter}
\section{second section/First chapter}
\section*{third section/First chapter}
\EndVerbatim
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\SubSection{ref, label, newlabel: Hooking into Label}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\<<<
\let\:label|=\label
\def\label{\relax
\expandafter\ifx \csname cur:th\endcsname\relax \expandafter\:label
\else \expandafter\l:bel \fi}
\let\lb:l|=\label
\def\l:bel#1{\@bsphack\if@filesw {\let\thepage|=\relax
|%
\let\protect|=\@unexpandable@protect \cur:lbl{}%
\ifx \EndPicture\:UnDef
\ifx \cur:th\skip:anchor
|%
\else \ifx \:currentlabel\empty
|%
\fi \fi
\else
|%
\fi
\a:@newlabel
\edef\@tempa{\write\@auxout{\string
\newlabel{#1}{{|}%
{|}|}}}%
\expandafter}\@tempa
\if@nobreak \ifvmode\nobreak\fi\fi\fi
|%
\@esphack}
|
>>>
\<<<
\Configure{@newlabel}{\def\%{\string\%}}
>>>
We had before \`'\ifx \EndPicture\:UnDef...\else...\fi' embeded within
\`'\ifx \cur:th\skip:anchor' but that eliminated the anchors for
eqnarray of pictures.
To save memory, we try to get anchors only when refered by labels.
For instance, this is the case for \''\@thm'.
\<<<
\bgroup \a:@newlabel
\Make:Label{\label:addr}{}\egroup
>>>
\<<<
\let\skip:anchor|=\:UnDef
>>>
The following deals with labels \''\label' provided before sectioning commands.
\<<<
\def\:currentlabel{doc}%
|%
>>>
\<<<
\def\AutoRefstepAnchor{\SkipRefstepAnchor}
>>>
The following is to ensure anchors for labels in pictures.
\<<<
\begingroup
\a:@newlabel
\edef\:temp{\noexpand\AfterPicture{%
\noexpand\Make:Label{\label:addr}{}%
\noexpand\uno:lbl{\label:addr}}%
}\:temp
\endgroup
>>>
The following is to avoid eliminated anchors as is the case in, for instance, \`'\[xx\label{a}\label{b}\] '.
\<<<
\def\uno:lbl#1{\def\:temp{#1}\futurelet\:tempa\I:lbl}
\def\I:lbl{\ifx \:tempa\Make:Label \expandafter\no:mklbl \fi}
\def\no:mklbl#1#2#3{\def\:tempa{#2}\ifx \:temp\:tempa \else
\Make:Label{#2}{#3}\fi}
>>>
\<<<
\a:newlabel\@currentlabel
>>>
The anchor for the page is approximated to the anchor of the logical unit.
This is so to solve the possible problem of having a \`'label' in a position
where \`'' links are not allowed.
\<<<
\a:newlabel\thepage
>>>
\<<<
\let\:currentlabel|=\empty
>>>
In pure latex, \''\Configure{newlabel}{##1}'.
The following is treated in a similar manner to cite.
It provides the means to disable nested links in
entries of tocs. The \''\Link' doesn't seem to need
the \''[]' option there, so a \''\:gobbleII' can do the job.
A better def is given to \''\l:bel' in AmsLaTeX .
\<<<
\let\l:bel:|=\l:bel
\def\l::bel#1{{\:SUBOff\:SUPOff\xdef\:temp{\noexpand\l:bel:{#1}}}\:temp}
\def\l:bel{\Protect\l::bel}
\let\o:ref|=\:ref
\def\::ref#1{{\:SUBOff\:SUPOff\xdef\RefArg{#1}}\expandafter\o:ref
\expandafter{\RefArg}}
\ExplSyntaxOn
\def\::ref#1{{\:SUBOff\:SUPOff\xdef\RefArg{#1}%
\SUBOn\SUPOn%
\def\rEfLiNK##1##2{\Link{##1}{}\tl_rescan:nn{}{##2}\EndLink}%
\expandafter\o:ref\expandafter{\RefArg}%
}}
\ExplSyntaxOff
\DeclareDocumentCommand\:ref{s}{\IfBooleanTF{#1}{\Protect\::ref}{\Protect\::ref}}
\let\ref|=\:ref
>>>
Support for the \''\Ref' command. It is variant of \''\ref' that uppercases
first letter of the referenced label.
\<<<
\ExplSyntaxOn
\def\::Ref#1{{%
\:SUBOff\:SUPOff\xdef\RefArg{#1}%
\SUBOn\SUPOn%
\def\rEfLiNK##1##2{\tl_set_rescan:Nnn\l_tmpa_tl{}{##2}\Link{##1}{}\expandafter\MakeUppercase\l_tmpa_tl\EndLink}%
\expandafter\o:ref\expandafter{\RefArg}%
}}
\ExplSyntaxOff
\DeclareDocumentCommand\:Ref{s}{\IfBooleanTF{#1}{\Protect\::Ref}{\Protect\::Ref}}
\let\Ref\:Ref
>>>
Without the \'''\expandafter' we may get \''\RefArg' passed
as the first argument to \''\T@arg',
resulting in \''\def\RefArg{\RefArg}'.
\<<<
\let\:newl@bel|=\@newl@bel
\let\n:wlbl|=\@newl@bel
\def\@newl@bel#1#2{{\:SUBOff\:SUPOff
\xdef\:temp{\noexpand\n:wlbl{#1}{#2}}}\:temp}
>>>
\<<<
\let\:testdef|=\@testdef
\def\@testdef #1#2{{\:SUBOff\:SUPOff
\xdef\:temp{\noexpand\:testdef{#1}{#2}}}\:temp}
>>>
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\SubSection{@currentlabel}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
The second parameter of \''\anc:lbl' is a counter name, when such is know.
The \`'\@currentlabel' comes sometimes with font info. Normally, it
comes from \''\refstepcounter' in the form of
\''\the..counter-name..'. In such cases, we can take the counter
name which is provided in the parameter of \''\cur:lbl'.
\<<<
\NewConfigure{@:currentlabel}[1]{\concat:config\a:@:currentlabel{#1}}
\let\a:@:currentlabel|=\relax
\def\cur:lbl#1{{\let\saved:currentlabel\:currentlabel\a:@:currentlabel
|\expandafter}\:currentlabel}
>>>
\<<<
\def\:currentlabel{\par}%
\ifx\@currentlabel\:currentlabel
\def\:currentlabel{\let\:currentlabel|=\empty}%
\else \def\:currentlabel{#1}%
\edef\:currentlabel{\def\noexpand
\:currentlabel{\ifx\:currentlabel\empty
\ifx \:@currentlabel\:UnDef
\ifx\saved:currentlabel \@currentlabel\@currentlabel\else\saved:currentlabel\fi
\else \:@currentlabel \fi
\else
\expandafter\ifx\csname #1:Count\endcsname\relax
\expandafter\the\csname c@#1\endcsname
\else \csname #1:Count\endcsname\fi
\fi}}%
\fi
>>>
The \''\label' command of latex invokes \''\cur:lbl{}'. If
\''\:@currentlabel' is deined, it is the to be used for the current label.
The \''\ltx@label' command of amsmath.sty ignores it.
Whenever \''\@currentlabel' is redefined, we also want to redefine
\''\:@currentlabel'. It is redefined in
\List{*}
\item latex.ltx within
\''\refstepcounter', \''\eqnarray', \''\@mpfootnotetext',
and \''\@footnotetext';
\item amsart.cls, amsbook.cls, and amsproc.cls
within \''eqnarray' and \''\@footnotetext';
\item amsmath.sty within
\''\df@tag' and \''\make@df@tag@@';
\item amstex.sty within
\''\@currentlabel', \''\@seteqlabel', and \''multline*'.
\EndList
\<<<
\let\cnt:currentlabel|=\@currentlabel
\def\:@currentlabel{\ifx \cnt:currentlabel\@currentlabel
\expandafter\the\csname c@equation\endcsname\else \@currentlabel\fi}%
>>>
\<<<
\let\cnt:currentlabel|=\@currentlabel
\def\:@currentlabel{\ifx \cnt:currentlabel\@currentlabel
\expandafter\the\csname c@#1\endcsname\else \@currentlabel\fi}%
>>>
\<<<
\html:addr \edef\cur:th{|\last:haddr r}%
>>>
\<<<
\anc:lbl r{}%
>>>
\<<<
|
\def\cnt:currentlabel{\p@equation\theequation}%
\def\:@currentlabel{\ifx \cnt:currentlabel\@currentlabel
\expandafter\the\csname c@equation\endcsname\else \@currentlabel\fi}%
>>>
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\SubSection{/link for /label from /refstepcounter}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
The following is late arrival into TeX4ht, inserted for handling
\''\newtheorem', and possibly other structures. It might cause
duplicated anchors. At least in the case of figures and lists they
are overided by other anchors, and hence not needed. In case of
lists and new theorems we ended to delete the overriden case. Still
need to do it
for pictures, and amybe also other cases.
The \''\refstepcounter' may appear in places (e.g., before first item
of a list) where no text is allowed, hence we have to ensure that
\''\anc:lbl' will not break this restriction.
How about within pictures?
\<<<
\append:defI\refstepcounter{%
|%
\anc:lbl r{#1}}
\def\anc:lbl#1#2{%
\html:addr \xdef\cur:th{|\last:haddr #1}%
\ifx \EndPicture\:UnDef
{\let\leavevmode|=\empty \cur:lbl{#2}%
\Make:Label{\cur:th\:currentlabel}{}}%
\else \ifx \label\@gobble \else \cur:lbl{#2}%
\edef\:temp{\noexpand\AfterPicture{%
\noexpand\Make:Label{\cur:th\:currentlabel}{}}}\:temp
\fi \fi}
\let\onc:lbl|=\anc:lbl
\def\SkipRefstepAnchor{\def\anc:lbl##1##2{\html:addr
\edef\cur:th{|\last:haddr}\ShowRefstepAnchor
\let\skip:anchor|=\cur:th}}
\def\ShowRefstepAnchor{\let\anc:lbl|=\onc:lbl}
|
\html:addr \edef\cur:th{|\last:haddr}
>>>
% \def\AutoRefstepAnchor{\def\anc:lbl##1##2{\onc:lbl{##2}{}%
% \ShowRefstepAnchor}}
We can't use ref- below, because
The MakeLabel removes duplicates such as in
\Verbatim
\documentclass{article}
\begin{document}
\begin{equation}\label{jh}
c
\end{equation}
\end{document}
\EndVerbatim
For memory conservation, a maximum is placed on the number of labels
recorded.
\<<<
\def\Make:Label#1#2{%
\def\:tempb##1|{%
\xdef\Made:Labels{{#1}\Made:Labels}%
\set:label{\hbox{\Link{}{#1}#2\EndLink}}%
\trim:Labels
}%
\def\:tempc##1|{\hbox{#2}}%
\let\:next=\check:labels \edef\:tempa{#1}%
\expandafter\:next\Made:Labels{}|%
}
\let\set:label=\empty
>>>
\<<<
\let\Made:Labels=\empty
\def\check:labels#1{%
\def\:temp{#1}\ifx\:temp\empty \let\:next=\:tempb
\else\ifx \:temp\:tempa \let\:next=\:tempc
\fi \fi
\:next }
>>>
\<<<
\HAssign\Labels:Cnt |= 0
\def\trim:Labels{%
\ifnum \Labels:Cnt>100
\def\:tempa##1|{}%
\gHAssign\Labels:Cnt = 0
\let\:tempb\Made:Labels
\let\Made:Labels\empty
\expandafter\keep:Labels\:tempb|%
\else \gHAdvance\Labels:Cnt by 1 \fi
}
\def\keep:Labels#1{\relax
\ifnum \Labels:Cnt<50
\xdef\Made:Labels{\Made:Labels{#1}}\gHAdvance\Labels:Cnt |by 1
\expandafter\keep:Labels
\else \expandafter\:tempa \fi }
>>>
We need the \''\hbox' above because \''\label' complains if vertical
mode is replaced with horizontal mode.
\`' \let\Link:Labe|=\Make:Label
\def\Tag:Label#1#2{\Tag{fR\label:Count}{#1}#2\GetLabel}
\def\LinkLabels{\let\Make:Label|=\Link:Label}
\def\SendLabels{\let\Make:Label|=\Tag:Label}'
\ifHtml[\HPage{test data}\Verbatim
\newtheorem{example}{Example}[section]
\begin{example}
\label{E}
\end{example}
Example \ref{E}
\EndVerbatim\EndHPage{}]\fi
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\SubSection{divisions in tex4ht.sty}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\<<<
\def\Get:SecAnchor#1#2#3{%
|%
\xdef\cur:th{|\last:haddr}%
|%
\xdef\:currentlabel{#2}%
\edef\:SecAnchor{\cur:th\:currentlabel}%
}
>>>
We redefine \''\@Roman' for \''\thepart' to have the same number
of entries as \''\Alph'.
\<<<
\bgroup \def\@Roman##1{%
\ifcase##1\or I\or II\or III\or IV\or V\or VI\or
VII\or VIII\or IX\or X\or XI\or XII\or XIII\or
XIV\or XV\or XVI\or XVII\or XVIII\or XIX\or XX\or
XXI\or XXII\or XXIII\or XXIV\or XV\or XVI\else
\expandafter\uppercase\expandafter{\romannumeral ##1}\fi}%
\a:currentlabel
\expandafter\ifcsname p@#1\endcsname%
\edef\:temp{\csname p@#1\expandafter\endcsname\csname the#1\endcsname}\ifx \:temp\empty
\else \global\let\@currentlabel|=\:temp\fi\fi
\egroup
>>>
\<<<
\NewConfigure{currentlabel}{1}
>>>
The \''\@currentlabel' may hold a \''\uppercase' due to \''\thepart'
that has a \''\@Roman' in it.
Tried to go for \`'\cur:lbl{#1}%', but that was a problem for cross
references with labels of sections, because \''\label' uses \`'\cur:lbl{}'.
\<<<
\let\:tempa|=\uppercase \def\uppercase##1{##1}\cur:lbl{}%
\let\uppercase|=\:tempa
>>>
How the above \`'\global\let\cur:th|=\last:haddr'
work with the change in \''\refstepcounter'?
%%%%%%%%%%%%%%%%%%
\SubSection{ref-}
%%%%%%%%%%%%%%%%%%
To reduce conflicts, we deal with labels indirectly
through a counter. The counter is increased before
\''\getlabel' and after \''ref'. That is, this pair is assured
consistency of a label. The separation between \''\GetLabel' and
\''\PutLabel' is
to allow the latter one into immediate arguments such as \''\HCode'
and \''\Tg'.
\''\label' sends its info to \''\getlabel'. It insert a
\`'' iff it is a target of a \''\pageref'.
\Verbatim
\:info{\string\Configure{label}{\string#1}{\string#1}}
\:info{\string\Configure{pageref}{\string#1}}
\:info{\string\Configure{ref}{\string#1}}
\Configure{label}{#1}{\HCode{[pagelabel label="#1"/]}}
\Configure{pageref}{\HCode{[pageref label="#1"/]}}
\Configure{ref}{\HCode{[ref label="#1"/]}}
\GetLabel \PutLabel \ref{a} \pageref{a} \label{a}
\EndVerbatim
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\Section{apacite.sty bibtex}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\<<<
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% apacite.4ht |version %
% Copyright (C) |CopyYear.2000. Eitan M. Gurari %
|
|
\ifx \@@citeNP\:UnDef
|
\else
|
\fi
\Hinput{apacite}
\endinput
>>> \AddFile{9}{apacite}
\<<<
\def\B:my@dummy{\B@my@dummy}
\def\:citeP{\@citeP}
\def\:tempc<#1>[#2]#3{%
\start:cite\a:cite \o:@@cite:<#1>[#2]{#3}\b:cite \end:cite
}
\HLet\@@cite=\:tempc
>>>
\<<<
\def\@lbibitem[#1]#2{%
\def\BBA{\BBAA}%
\item[\@biblabel{#1}]%
\if@filesw{%
\a:bibcite
\def\BBA{\string\BBA}%
\def\protect##1{\string ##1}%
\immediate\write\@auxout{\string\bibcite{#2}{#1}}%
\def\BBA{\BBAA}%
}%
\fi%
\ignorespaces%
}
>>>
\<<<
\def\start:cite{%
\let\sv:edef\edef
\let\gobble:cite=\:gobble
\def\edef##1{\def\:temp{##1}%
\ifx \:temp\B:my@dummy
\ifx \o:BCA\:UnDef
\ifx \BCA\:UnDef\else
\let\o:BCA=\BCA
\def\BCA####1####2{\Protect\cIteLink{X\@citeb}{}%
\o:BCA{####1}{####2}\Protect\EndcIteLink}%
\fi
\fi
\fi
\sv:edef##1}%
}
\def\end:cite{%
\let\edef=\sv:edef
\let\BCA=\o:BCA \let\o:BCA=\:UnDef
}
>>>
\<<<
\def\start:cite{%
\let\sv:edef\edef
\let\gobble:cite=\:gobble
\def\edef##1{\def\:temp{##1}%
\ifx \:temp\B:my@dummy
\cIteLink{X\@citeb}{}\let\gobble:cite=\empty
\ifx \o:@BBOP\:UnDef
\let\o:@BBOP=\@BBOP
\let\o:@BBAY=\@BBAY
\pend:def\@BBOP{\gobble:cite\EndcIteLink
\let\gobble:cite=\:gobble}%
\pend:def\@BBAY{\gobble:cite\EndcIteLink
\let\gobble:cite=\:gobble}%
\fi
\fi
\ifx \:temp\:citeP
\gobble:cite\EndcIteLink \let\gobble:cite=\:gobble
\fi
\sv:edef##1}%
}
\def\end:cite{%
\let\edef=\sv:edef
\let\@BBOP=\o:@BBOP \let\o:@BBOP=\:UnDef
\let\@BBAY=\o:@BBAY \let\o:@BBAY=\:UnDef
}
\def\:tempc[#1]#2{%
\start:cite\a:cite \o:@citeA:[#1]{#2}\b:cite \end:cite
}
\HLet\@citeA=\:tempc
\def\:tempc[#1]#2{%
\start:cite\a:cite \o:@citeyear:[#1]{#2}\b:cite \end:cite
}
\HLet\@citeyear=\:tempc
\def\:tempc<#1>[#2]#3{%
\start:cite\a:cite \o:@@citeNP:<#1>[#2]{#3}\b:cite \end:cite
}
\HLet\@@citeNP=\:tempc
\def\:tempc#1{%
\start:cite\a:cite \o:@citeauthor:{#1}\b:cite \end:cite
}
\HLet\@citeauthor=\:tempc
\def\:tempc[#1]#2{%
\start:cite\a:cite \o:@citeyearNP:[#1]{#2}\b:cite \end:cite
}
\HLet\@citeyearNP=\:tempc
>>>
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\Section{mla.sty bibtex}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\<<<
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% mla.4ht |version %
% Copyright (C) |CopyYear.2002. Eitan M. Gurari %
|
|
\Hinput{mla}
\endinput
>>> \AddFile{9}{mla}
\<<<
\catcode`\:=12
\def\@citedatax[#1]#2{%
\if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi%
\def\@citea{}\csname a:cite\endcsname
\@cite{\@for\@citeb:=#2\do%
{\@citea\def\@citea{, }\@ifundefined% by Young
{b@\@citeb}{{\bf ?}%
\@warning{Citation `\@citeb' on page \thepage \space undefined}}%
{\cIteLink {X\@citeb}{}\csname b@\@citeb\endcsname \EndcIteLink
}}}{#1}\csname b:cite\endcsname}
\catcode`\:=11
>>>
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\Section{Biblatex}
\SubSection{biblatex.sty}
\<<<
% biblatex.4ht (|version), generated from |jobname.tex
% Copyright |CopyYear.2007. Eitan M. Gurari
|
|
|
|
|
|