"Fossies" - the Fresh Open Source Software Archive

Member "hevea-2.35/packages.hva" (16 Jan 2021, 2639 Bytes) of package /linux/www/hevea-2.35.tar.gz:

    1 \newcommand{\@usepackage}[1]
    2   {%\hva@warn{\@usepackage '#1'}%
    3   \def\pkg@arg{{\@nostyle\@callprim{\@eatspaces}{#1,}}}%
    4   \ifthenelse{\equal{\pkg@arg}{hevea}}{\@usepackage{comment}}
    5   {\ifu\csname\pkg@arg{}@loaded\endcsname
    6     \@iffileexists{\pkg@arg.hva}
    7        {\def\csname\pkg@arg{}@loaded\endcsname{foo}%
    8 %Warning: loading \pkg@arg.hva may redefine \pgk@arg!!!!
    9        \input{\pkg@arg.hva}}
   10        {}%
   11     \fi}}
   12 \newsavebox{\@pkg@opts}
   13 \newcommand{\usepackagehook}[2]{}
   14 \newcommand{\usepackage}[2][!*!]
   15 {%\hva@warn{\usepackage '#1' '#2'}
   16 \usepackagehook{#1}{#2}%
   17 \ifthenelse{\equal{#1}{!*!}}
   18   {\sbox{\@pkg@opts}{}\begin{toimage}\usepackage{#2}\end{toimage}}
   19 {\sbox{\@pkg@opts}{#1}\begin{toimage}\usepackage[#1]{#2}\end{toimage}}%
   20 \@stopoutput\@stopimage%
   21 \@funcall{\@iter}{\@usepackage,{#2}}%
   22 \@restartimage\@restartoutput}
   23 \hva@newstack{@pkg}\let\@pkg@me\relax
   24 \hva@newstack{@pkg@opts}
   25 \newcommand{\@pkg@pushs}
   26 {%\typeout{Saving: '\@pkg@opts' '\@pkg@me'}
   27 \@push@pkg{\@pkg@me}\@push@pkg@opts{\@pkg@opts}}
   28 \newcommand{\@pkg@pops}
   29 {\@pop@pkg@opts{\@pkg@opts}\@pop@pkg{\@pkg@me}%
   30 %\typeout{Restoring: '\@pkg@opts' '\@pkg@me'}
   31 }
   32 \newcommand{\ProvidesPackage}[1]
   33 {\def{\@pkg@me}{\@getprint{#1}}\AtEndOfFile{\@EndPackage}}
   34 \newcommand{\@EndPackage}{}
   35 \newcommand{\EndPackage}{\hva@warn{END}}
   36 \newcommand{\@pkg@opt@name}[1]{@pkg\@pkg@me{}@#1}
   37 \newcommand{\DeclareOption}[2]
   38   {\newcommand{\csname\@pkg@opt@name{#1}\endcsname}{#2}}
   39 \newcommand{\@process@option}[1]%
   40 	{\def\pkg@opt{{\@nostyle\@callprim{\@eatspaces}{#1,}}}%
   41         \ifu\csname\@pkg@opt@name{\pkg@opt}\endcsname
   42           \ifu\csname\@pkg@opt@name{@defopt}\endcsname
   43              \hva@warn{Ignoring option: '#1'}\else
   44              \csname\@pkg@opt@name{@defopt}\endcsname{#1}\fi
   45          \else
   46 	 \csname\@pkg@opt@name{\pkg@opt}\endcsname\fi}%
   47 %%Do not warn
   48 \newcommand{\@@process@option}[1]%
   49 	{\def\pkg@opt{{\@nostyle\@callprim{\@eatspaces}{#1,}}}%
   50         \ifu\csname\@pkg@opt@name{\pkg@opt}\endcsname\else
   51 	 \csname\@pkg@opt@name{\pkg@opt}\endcsname\fi}%
   52 \newcommand{\ProcessOptions*}
   53 {\@callprim{\@iter}
   54   {\string\@@process@option,{\char123\usebox{\@document@opts}\char125}}%
   55 \@callprim{\@iter}
   56   {\string\@process@option,{\char123\usebox{\@pkg@opts}\char125}}}
   57 \newcommand{\ExecuteOptions}[1]
   58 {\@callprim{\@iter}{\string\@process@option,{\{#1\}}}}
   59 %%%% Packages in packages
   60 \newcommand{\@GoobleOpt}[1][]{}%
   61 \newcommand{\RequirePackage}[2][!*!]
   62 {\@pkg@pushs\usepackage[#1]{#2}\execafter\@GoobleOpt\@pkg@pops}%
   63 %%%%No op ProvidesFile
   64 \newcommand{\@eatopt}[1][]{}
   65 \newcommand{\ProvidesFile}[1]{\@eatopt}
   66 %%%%Misc
   67 \newcommand{\PackageInfo}[2]{\hva@warn{Package #1 info: #2}}