You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
242 lines
7.9 KiB
242 lines
7.9 KiB
%%
|
|
%% This is file `scrwfile.sty',
|
|
%% generated with the docstrip utility, extended by scrdocstrip.
|
|
%%
|
|
%% The original source files were:
|
|
%%
|
|
%% scrwfile.dtx (with options: `package,trace,scrwfile,identify,option,body')
|
|
%% scrlogo.dtx (with options: `logo')
|
|
%%
|
|
%% Copyright (c) 2010-2019 Markus Kohm [komascript at gmx info]
|
|
%%
|
|
%% This file was generated from file(s) of the KOMA-Script bundle.
|
|
%% ---------------------------------------------------------------
|
|
%%
|
|
%% It may be distributed under the conditions of the
|
|
%% LaTeX Project Public License in the version distributed together
|
|
%% with KOMA-Script, see file `lppl.txt' or `lppl-de.txt'.
|
|
%%
|
|
%% This file may only be distributed together with a copy of the
|
|
%% KOMA-Script bundle. You may however distribute the
|
|
%% KOMA-Script bundle without all such generated files. See also
|
|
%% `lppl.txt' or `lppl-de.txt' for additional information.
|
|
%%
|
|
%% The list of files belonging to KOMA-Script distribution is given in
|
|
%% the file `manifest.txt'. See also `lppl.txt' or `lppl-de.txt' for
|
|
%% additional information.
|
|
%%
|
|
%% If this file is a beta version, you may not be allowed to distribute
|
|
%% it. Look at the comments below to see if this is the case.
|
|
%%
|
|
%% English and German manuals are part of KOMA-Script bundle.
|
|
%% ----------------------------------------------------------
|
|
%%
|
|
%% See `README'.
|
|
%%
|
|
%% The KOMA-Script bundle (but maybe not this file) was based upon the
|
|
%% LaTeX 2.09 Script family created by Frank Neukam 1993 and the LaTeX2e
|
|
%% standard classes created by The LaTeX3 Project 1994-1996. You can
|
|
%% find a complete unmodified copy of LaTeX2e at
|
|
%% <http://mirror.ctan.org/tex-archive/macros/latex/base/>.
|
|
%%
|
|
%%% From File: $Id: scrwfile.dtx 3453 2020-02-25 07:33:30Z kohm $
|
|
\NeedsTeXFormat{LaTeX2e}[1995/06/01]
|
|
\ProvidesPackage{scrwfile}
|
|
[2013/08/05 v0.1f-alpha KOMA-Script package (write and clone files)]
|
|
\PackageWarningNoLine{scrwfile}{%
|
|
THIS IS AN ALPHA VERSION!\MessageBreak
|
|
USAGE OF THIS VERSION IS ON YOUR OWN RISK!\MessageBreak
|
|
EVERYTHING MAY HAPPEN!\MessageBreak
|
|
EVERYTHING MAY CHANGE IN FUTURE!\MessageBreak
|
|
THERE IS NO SUPPORT, IF YOU USE THIS PACKAGE!\MessageBreak
|
|
Maybe, it would be better not to load this package.%
|
|
}
|
|
\RequirePackage{scrbase}[2010/09/17]
|
|
\RequirePackage{tocbasic}[2010/10/01]
|
|
\RequirePackage{scrlfile}[2010/09/30]
|
|
\newcommand*{\scrwfile@if@only}[1]{%
|
|
\begingroup
|
|
\scr@ifundefinedorrelax{scrwfile@only}{\@tempswatrue}{%
|
|
\@tempswafalse
|
|
\edef\reserved@b{#1}%
|
|
\@for\reserved@a:=\scrwfile@only\do
|
|
{\ifx\reserved@a\reserved@b\@tempswatrue\fi}%
|
|
}%
|
|
\if@tempswa
|
|
\scr@ifundefinedorrelax{scrwfile@never}{}{%
|
|
\edef\reserved@b{#1}%
|
|
\@for\reserved@a:=\scrwfile@only\do
|
|
{\ifx\reserved@a\reserved@b\@tempswafalse\fi}%
|
|
}%
|
|
\fi
|
|
\expandafter\endgroup
|
|
\if@tempswa
|
|
\expandafter\@firstoftwo
|
|
\else
|
|
\expandafter\@secondoftwo
|
|
\fi
|
|
}
|
|
\newcommand*{\scrwfile@starttoc}[1]{%
|
|
\scrwfile@if@only{#1}{\scrwfile@@starttoc}{\scrwfile@saved@starttoc}{#1}%
|
|
}
|
|
\newcommand*{\scrwfile@@starttoc}[1]{%
|
|
\typeout{Use my own \string\@starttoc\space for #1}%
|
|
\begingroup
|
|
\if@filesw
|
|
\xdef\scrwfile@writefilelist{\scrwfile@writefilelist,#1}%
|
|
\fi
|
|
\@fileswfalse
|
|
\scrwfile@saved@starttoc{#1}%
|
|
\endgroup
|
|
}
|
|
\newcommand*{\scrwfile@writefile}[1]{%
|
|
\scrwfile@if@only{#1}{\scrwfile@@writefile}{\scrwfile@saved@writefile}{#1}%
|
|
}
|
|
\newcommand{\scrwfile@@writefile}[2]{%
|
|
\typeout{Use my own \string\@writefile\space for #1}%
|
|
\ifnum\scrwfile@wrtout>0
|
|
\begingroup
|
|
\@temptokena{#2}%
|
|
\immediate\write\scrwfile@wrtout{%
|
|
\string\@writefile{#1}{\the\@temptokena}%
|
|
}%
|
|
\scrwfile@process@clones{#1}%
|
|
\endgroup
|
|
\fi
|
|
}
|
|
\chardef\scrwfile@wrtout\z@
|
|
\newcommand*{\scrwfile@writefilelist}{}
|
|
\newcommand*{\scrwfile@saved@writefile}{}
|
|
\BeforeClosingMainAux{%
|
|
\ifx\scrwfile@writefilelist\@empty\else
|
|
\let\scrwfile@saved@writefile\@writefile
|
|
\let\scrwfile@wrtout\@partaux
|
|
\immediate\openout\scrwfile@wrtout \jobname.wrt
|
|
\let\@writefile\scrwfile@writefile
|
|
\fi
|
|
}
|
|
\AfterReadingMainAux{%
|
|
\ifx\scrwfile@writefilelist\@empty\else
|
|
\immediate\closeout\scrwfile@wrtout
|
|
\chardef\scrwfile@wrtout\z@
|
|
\begingroup
|
|
\let\@writefile\scrwfile@saved@writefile
|
|
\@for\@currext:=\scrwfile@writefilelist\do{%
|
|
\begingroup
|
|
\ifx\@currext\@empty\else
|
|
\scr@ifundefinedorrelax{tf@\@currext}{%
|
|
\typeout{Process extension: `\@currext'}
|
|
\immediate\openout\@partaux \jobname.\@currext
|
|
\expandafter\let\csname tf@\@currext\endcsname\@partaux
|
|
\@input@{\jobname.wrt}%
|
|
\immediate\closeout\@partaux
|
|
}{}%
|
|
\fi
|
|
\endgroup
|
|
}%
|
|
\endgroup
|
|
\fi
|
|
}
|
|
\newcommand*{\scrwfile@saved@starttoc}{}
|
|
\AtBeginDocument{%
|
|
\begingroup
|
|
\@ifpackageloaded{hyperref}{%
|
|
\scr@ifundefinedorrelax{Hy@AtBeginDocument}{%
|
|
\PackageWarning{scrwfile}{%
|
|
Incompatible `hyperref` package detected!\MessageBreak
|
|
You are using a `hyperref` version, that\MessageBreak
|
|
doesn't provide `\string\Hy@AtBeginDocument`.\MessageBreak
|
|
This may or may not work.\MessageBreak
|
|
Using immediate redefinition%
|
|
}%
|
|
\aftergroup\@firstofone
|
|
}{%
|
|
\def\reserved@a{\AtBeginDocument}%
|
|
\ifx\Hy@AtBeginDocumentHook\@undefined
|
|
\PackageInfo{scrwfile}{%
|
|
Using immediate redefinition%
|
|
}%
|
|
\aftergroup\@firstofone
|
|
\else
|
|
\PackageInfo{scrwfile}{%
|
|
Using `\string\Hy@AtBeginDocument`%
|
|
}%
|
|
\aftergroup\Hy@AtBeginDocument
|
|
\fi
|
|
}%
|
|
}{%
|
|
\aftergroup\@firstofone
|
|
}%
|
|
\endgroup
|
|
{%
|
|
\PackageInfo{scrwfile}{%
|
|
Extending `\string\@starttoc`
|
|
}%
|
|
\let\scrwfile@saved@starttoc\@starttoc
|
|
\let\@starttoc\scrwfile@starttoc
|
|
}%
|
|
}
|
|
\newcommand*{\scrwfile@process@clones}[1]{%
|
|
\scr@ifundefinedorrelax{scrwfile@clone@#1}{}{%
|
|
\begingroup
|
|
\let\@@protect\protect\let\protect\@empty\afterassignment\restore@protect
|
|
\edef\reserved@b{\csname scrwfile@clone@#1\endcsname}%
|
|
\edef\reserved@c{,#1}%
|
|
\@for \reserved@a:=\reserved@b\do {%
|
|
\@tempswatrue
|
|
\@for \reserved@d:=\reserved@c\do {%
|
|
\ifx\reserved@d\reserved@a\@tempswafalse\fi
|
|
}%
|
|
\if@tempswa
|
|
\typeout{clone entry from `#1' to `\reserved@a'}%
|
|
\immediate\write\scrwfile@wrtout{%
|
|
\string\@writefile{\reserved@a}{\the\@temptokena}%
|
|
}%
|
|
\edef\reserved@c{\reserved@c,\reserved@a}%
|
|
\fi
|
|
}%
|
|
\endgroup
|
|
}%
|
|
}%
|
|
\newcommand*{\TOCclone}[3][]{%
|
|
\scr@ifundefinedorrelax{scrwfile@clone@#2}{%
|
|
\expandafter\protected@edef\csname scrwfile@clone@#2\endcsname{%
|
|
#3,\protect\csname scrwfile@clone@#3\endcsname
|
|
}%
|
|
}{%
|
|
\edef\reserved@b{\csname scrwfile@clone@#2\endcsname}%
|
|
\expandafter\protected@edef\csname scrwfile@clone@#2\endcsname{%
|
|
\csname scrwfile@clone@#2\endcsname,%
|
|
#3,%
|
|
\protect\csname scrwfile@clone@#3\endcsname
|
|
}%
|
|
}%
|
|
\scr@ifundefinedorrelax{scrwfile@clone@#3}{%
|
|
\expandafter\let\csname scrwfile@clone@#3\endcsname\@empty
|
|
}{}%
|
|
\Ifattoclist{#3}{%
|
|
\PackageWarning{scrwfile}{`#3' already under control of
|
|
tocbasic.\MessageBreak
|
|
Nevertheless features will be set%
|
|
}%
|
|
}{%
|
|
\addtotoclist[TOCclone]{#3}%
|
|
}%
|
|
\setuptoc{#3}{nobabel}%
|
|
\Ifstr{#1}{}{%
|
|
}{%
|
|
\@namedef{listof#3name}{#1}%
|
|
\@namedef{listof#3}{\listoftoc{#3}}%
|
|
\Iftocfeature{#2}{leveldown}{\setuptoc{#3}{leveldown}}{}%
|
|
\Iftocfeature{#2}{numbered}{\setuptoc{#3}{numbered}}{}%
|
|
\Iftocfeature{#2}{onecolumn}{\setuptoc{#3}{leveldownonecolumn}}{}%
|
|
\Iftocfeature{#2}{totoc}{\setuptoc{#3}{totoc}}{}%
|
|
}%
|
|
}
|
|
%%% From File: $Id: scrlogo.dtx 2640 2017-05-08 09:36:55Z kohm $
|
|
\@ifundefined{KOMAScript}{%
|
|
\DeclareRobustCommand{\KOMAScript}{\textsf{K\kern.05em O\kern.05em%
|
|
M\kern.05em A\kern.1em-\kern.1em Script}}}{}
|
|
\endinput
|
|
%%
|
|
%% End of file `scrwfile.sty'.
|
|
|