1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2
% fancyvrb.4ht 2005-03-27-10:43 %
3
% Copyright (C) 1997--2005 Eitan M. Gurari %
5
% This work may be distributed and/or modified under the %
6
% conditions of the LaTeX Project Public License, either %
7
% version 1.3 of this license or (at your option) any %
8
% later version. The latest version of this license is %
10
% http://www.latex-project.org/lppl.txt %
11
% and version 1.3 or later is part of all distributions %
12
% of LaTeX version 2003/12/01 or later. %
14
% This work has the LPPL maintenance status "maintained".%
16
% This Current Maintainer of this work %
17
% is Eitan M. Gurari. %
19
% If you modify this program your changing its signature %
20
% with a directive of the following form will be %
22
% \message{signature} %
24
% gurari@cse.ohio-state.edu %
25
% http://www.cse.ohio-state.edu/~gurari %
26
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
27
\immediate\write-1{version 2005-03-27-10:43}
30
\pend:def\FV@FormattingPrep{\let\fv:color\empty
31
\ifx \color\:UnDef\else\Configure{color}{\xdef\fv:color}\fi
33
\append:def\FV@FormattingPrep{\a:fancyvrb
34
\ifx \FV@BeginListFrame\relax\else
35
\tmp:dim=\FV@FrameRule \edef\HSize{\the\tmp:dim}%
38
\ifx \FV@LeftListFrame\relax\else
39
\tmp:dim=\FV@FrameRule \edef\HSize{\the\tmp:dim}%
42
\ifx \FV@EndListFrame\relax\else
43
\tmp:dim=\FV@FrameRule \edef\HSize{\the\tmp:dim}%
46
\ifx \FV@RightListFrame\relax\else
47
\tmp:dim=\FV@FrameRule \edef\HSize{\the\tmp:dim}%
52
\ifx \fv:color\empty \else{
53
\let\HColor\fv:color \a:fancyvrbcolor
55
\ifx \FancyVerbFillColor\relax \else
56
\:fvcolor \b:fancyvrbcolor \FancyVerbFillColor!*?: %
58
\ifx \FancyVerbRuleColor\relax \else
59
\:fvcolor \c:fancyvrbcolor \FancyVerbRuleColor!*?: %
62
\let\FV@BeginListFrame\relax
63
\let\FV@LeftListFrame\relax
64
\let\FV@RightListFrame\relax
65
\let\FV@EndListFrame\relax
68
\def\FV@ListProcessLine#1{%
69
\hbox{\c:fancyvrb \anc:lbl r{FancyVerbLine}\FV@LeftListNumber
70
\FV@LeftListFrame \e:fancyvrb \FancyVerbFormatLine{#1}\f:fancyvrb
71
\FV@RightListFrame \csname FV@RightListNumber\endcsname
73
\def\FV@EndList{\FV@ListProcessLastLine \FV@EndListFrame
74
\IgnorePar\b:fancyvrb\par\@endparenv
75
\endgroup \@endpetrue}
78
\def\FV@StepLineNo{\SkipRefstepAnchor\refstepcounter{FancyVerbLine}}%
81
\catcode`\^^M=\active%
85
\let\a:fancyvrb\empty\FV@FormattingPrep%
89
\def\@tempa{\def\FancyVerbGetVerb####1####2}%
90
\expandafter\@tempa\string#1{\mbox{\a:verb##2\b:verb}\endgroup}%
91
\FancyVerbGetVerb\FV@EOL}%
93
\def\FV@UseVerb#1{\mbox{\FV@UseKeyValues
94
\let\a:fancyvrb\empty \FV@FormattingPrep
96
\def\:fvcolor#1{\def\a:color##1##2!*?: {%
97
\Configure{SetHColor}#1{##1}}}
98
\define@key{FV}{framerule}{%
100
\edef\FV@FrameRule{\number\@tempdima sp\relax}%
101
{\Advance:\fancyvrbNo by 1 \tmp:dim=\FV@FrameRule
102
\edef\HSize{\the\tmp:dim}%
104
\define@key{FV}{framesep}{%
106
\edef\FV@FrameSep{\number\@tempdima sp\relax}%
107
{\Advance:\fancyvrbNo by 1 \tmp:dim=\FV@FrameSep
108
\edef\HSize{\the\tmp:dim}%
110
\def\FV@BVerbatimBegin{%
112
\let\a:fancyvrb\empty \IgnorePar
115
\let\FV@ProcessLine\FV@BProcessLine
117
\FV@ObeyTabsInit \a:BVerbatimInput
119
\def\FV@BVerbatimEnd{\b:BVerbatimInput \FV@EndVBox\endgroup}
120
\def\FV@BProcessLine#1{\hbox{\FancyVerbFormatLine
121
{\c:BVerbatimInput#1\d:BVerbatimInput}}}
122
\NewConfigure{BVerbatimInput}{4}
123
\pend:def\V@@footnotetext{%
124
\let\FNmark\@thefnmark
126
\ifnum \FNnum>\fn:txt
127
\gHAssign\fn:txt\FNnum
128
\def\@makefnmark{\hbox{\ExitHPage{\a:footnote}}}%
129
\b:footnote \def\end:fverb{\c:footnote}%
131
\a:footnotetext \b:footnotetext \let\end:fverb\c:footnotetext
134
\append:def\V@@@footnotetext{\end:fverb\endgroup}
136
\NewConfigure{fancyvrb}{6}
137
\NewConfigure{fancyvrbcolor}{3}
138
\NewConfigure{fancyvrbframe}{6}