summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/frankenstein/simple.sto
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2007-05-18 16:33:56 +0000
committerKarl Berry <karl@freefriends.org>2007-05-18 16:33:56 +0000
commit2e6b6d51f565a1d1aafaa05a7289f9140cf3b266 (patch)
tree6b1aa8b7601953917bc128955df86e3bb6fe66cc /Master/texmf-dist/tex/latex/frankenstein/simple.sto
parent774356b0a3b7fb04a931d846245c784bef0073e9 (diff)
install longstanding and complicated package frankenstein
git-svn-id: svn://tug.org/texlive/trunk@4311 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/frankenstein/simple.sto')
-rw-r--r--Master/texmf-dist/tex/latex/frankenstein/simple.sto58
1 files changed, 58 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/frankenstein/simple.sto b/Master/texmf-dist/tex/latex/frankenstein/simple.sto
new file mode 100644
index 00000000000..80fbcabe9a3
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/frankenstein/simple.sto
@@ -0,0 +1,58 @@
+% \AddToCheckSum{67}
+%
+% The \option{simple} option adds the optional argument to \cs\include, and
+% does nothing else.
+%
+% \begin{macro}{\include}
+% I'm not really sure why the \cs\relax is there; I'm imitating the kernel's
+% command.
+% \begin{macrocode}
+\defcommand\include {%
+ \relax
+ \ifnum\@auxout=\@partaux
+ \@latex@error{\string\include\space cannot be nested}\@eha
+ \else
+ \expandafter\@include
+ \fi
+}
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{\@include}
+% \mbox{}
+% \begin{macrocode}
+\defcommand\@include [2][] {%
+ \clearpage
+ \if@filesw
+ \immediate\write\@mainaux{\string\@input{#2.aux}}%
+ \fi
+ \@tempswatrue
+ \if@partsw
+ \@tempswafalse
+ \edef\reserved@b{#2}%
+ \@for\reserved@a:=\@partlist\do
+ {\ifx\reserved@a\reserved@b\@tempswatrue\fi}%
+ \fi
+ \if@tempswa
+ \let\@auxout\@partaux
+ \if@filesw
+ \immediate\openout\@partaux #2.aux
+ \immediate\write\@partaux{\relax}%
+ \fi
+% \end{macrocode}
+% All we did was change |#1| to |#2| and add the next line.
+% \begin{macrocode}
+ #1%
+ \@input@{#2.tex}%
+ \clearpage
+ \@writeckpt{#2}%
+ \if@filesw
+ \immediate\closeout\@partaux
+ \fi
+ \else
+ \@nameuse{cp@#2}%
+ \fi
+ \let\@auxout\@mainaux
+}
+% \end{macrocode}
+% \end{macro}