54 lines
1.6 KiB
TeX
54 lines
1.6 KiB
TeX
\NeedsTeXFormat{LaTeX2e}
|
|
\ProvidesPackage{Sweave}{}
|
|
|
|
\RequirePackage{ifthen}
|
|
\newboolean{Sweave@gin}
|
|
\setboolean{Sweave@gin}{true}
|
|
\newboolean{Sweave@ae}
|
|
\setboolean{Sweave@ae}{true}
|
|
\newboolean{Sweave@inconsolata}
|
|
\setboolean{Sweave@inconsolata}{false}
|
|
|
|
\DeclareOption{nogin}{\setboolean{Sweave@gin}{false}}
|
|
\DeclareOption{noae}{\setboolean{Sweave@ae}{false}}
|
|
\DeclareOption{inconsolata}{\setboolean{Sweave@ae}{false}\setboolean{Sweave@inconsolata}{true}}
|
|
\ProcessOptions
|
|
|
|
\RequirePackage{graphicx,fancyvrb,textcomp}
|
|
%% inspired by an earlier version of upquote.sty
|
|
\begingroup
|
|
\catcode`'=\active \catcode``=\active
|
|
\g@addto@macro\@noligs{\let`\textasciigrave \let'\textquotesingle}
|
|
\endgroup
|
|
|
|
\ifthenelse{\boolean{Sweave@gin}}{\setkeys{Gin}{width=0.8\textwidth}}{}%
|
|
\ifthenelse{\boolean{Sweave@ae}}{%
|
|
\RequirePackage[T1]{fontenc}
|
|
\RequirePackage{ae}
|
|
}{}%
|
|
%% see comment in Rd.sty
|
|
\ifthenelse{\boolean{Sweave@inconsolata}}{%
|
|
\IfFileExists{zi4.sty}{\usepackage[noupquote]{zi4}}{\usepackage{inconsolata}}}{}
|
|
|
|
\DefineVerbatimEnvironment{Sinput}{Verbatim}{fontshape=sl}
|
|
\DefineVerbatimEnvironment{Soutput}{Verbatim}{}
|
|
\DefineVerbatimEnvironment{Scode}{Verbatim}{fontshape=sl}
|
|
|
|
\ifdefined\Schunk%
|
|
\message{\string Environment Schunk is already defined, stay with former definition}%
|
|
\else
|
|
\newenvironment{Schunk}{}{}%
|
|
\fi
|
|
|
|
\newcommand{\Sconcordance}[1]{%
|
|
\ifx\pdfoutput\undefined%
|
|
\csname newcount\endcsname\pdfoutput\fi%
|
|
\ifcase\pdfoutput\special{#1}%
|
|
\else%
|
|
\begingroup%
|
|
\pdfcompresslevel=0%
|
|
\immediate\pdfobj stream{#1}%
|
|
\pdfcatalog{/SweaveConcordance \the\pdflastobj\space 0 R}%
|
|
\endgroup%
|
|
\fi}
|