summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/latex/koma-script/scrjura.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/source/latex/koma-script/scrjura.dtx')
-rw-r--r--Master/texmf-dist/source/latex/koma-script/scrjura.dtx109
1 files changed, 67 insertions, 42 deletions
diff --git a/Master/texmf-dist/source/latex/koma-script/scrjura.dtx b/Master/texmf-dist/source/latex/koma-script/scrjura.dtx
index 77ab25d5914..b906cb9559d 100644
--- a/Master/texmf-dist/source/latex/koma-script/scrjura.dtx
+++ b/Master/texmf-dist/source/latex/koma-script/scrjura.dtx
@@ -1,4 +1,4 @@
-% \CheckSum{1934}
+% \CheckSum{1938}
% \iffalse meta-comment
% ======================================================================
% scrjura.dtx
@@ -60,11 +60,11 @@
% Right brace \} Tilde \~}
%
% \iffalse
-%%% From File: $Id: scrjura.dtx 2649 2017-05-29 09:39:43Z kohm $
+%%% From File: $Id: scrjura.dtx 2847 2017-12-19 09:38:00Z kohm $
%<*dtx>
\begingroup
\def\filedate$#1: #2-#3-#4 #5${\gdef\filedate{#2/#3/#4}}
- \filedate$Date: 2017-05-29 11:39:43 +0200 (Mon, 29 May 2017) $
+ \filedate$Date: 2017-12-19 10:38:00 +0100 (Tue, 19 Dec 2017) $
\def\filerevision$#1: #2 ${\gdef\filerevision{r#2}}
\filerevision$Revision: 1962 $
\endgroup
@@ -741,43 +741,52 @@
\@onlypreamble\DeclareNewJuraEnvironment
% \end{macrocode}
% \begin{macro}{\@defjuraenvironment}
-% \changes{v0.9}{2014/11/04}{Neue (interne) Anweisung}
-% Diese Anweisunge soll irgendwann einmal dazu dienen, weitere
-% Umgebungen einfach definieren zu können. Allerdings wird das vor Version 1.0
-% offiziell nichts werden. Bis dahin funktioniert die Anweisung bzw. die damit
-% definierten Umgebungen nicht korrekt und sollten nicht verwendet werden!
+% \changes{v0.9}{2014/11/04}{Neue (interne) Anweisung}^^A
+% \changes{v3.25}{2017/12/08}{neue Option \texttt{ClauseFont}}^^A
+% \changes{v3.25}{2017/12/08}{\cs{reserved@defjuraenvironment} wird wieder
+% \cs{relax}}^^A
+% \changes{v3.25}{2017/12/08}{Umstellung von globalen auf lokale Optionen}^^A
+% Diese Anweisung dient dazu, weitere Umgebungen einfach definieren zu können.
+% Dabei werden optional diverse Optionen unterstützt. Näheres ist der
+% Anleitung zu entnehmen.
% \begin{macrocode}
\DefineFamily{KOMAarg}
\DefineFamilyMember{KOMAarg}
-\DefineFamilyKey{KOMAarg}{Clause}{%
- \expandafter\gdef\csname \scrjura@env@type @Clause\endcsname{#1}%
-}
-\DefineFamilyKey{KOMAarg}{SubClause}{%
- \expandafter\gdef\csname \scrjura@env@type @SubClause\endcsname{#1}%
-}
-\DefineFamilyKey{KOMAarg}{Sentence}{%
- \expandafter\gdef\csname \scrjura@env@type @Sentence\endcsname{#1}%
-}
-\DefineFamilyKey{KOMAarg}{ClauseNumberFormat}{%
- \expandafter\gdef\csname \scrjura@env@type @Clauseformat \endcsname
- ##1{#1{##1}}
- \expandafter\xdef\csname \scrjura@env@type @Clauseformat\endcsname{%
- \noexpand\protect\expandafter\noexpand
- \csname \scrjura@env@type @Clauseformat \endcsname
- }%
-}
\newcommand{\@defjuraenvironment}{}
\long\def\@defjuraenvironment#1[#2]#3#4{%
+ \let\reserved@defjuraenvironment\relax
% \end{macrocode}
% Die Zähler definieren:
% \begin{macrocode}
\newcounter{#1Clause}%
\newcounter{#1AbsoluteClause}%
\newcounter{#1SubClause}%
- \begingroup
- \edef\scrjura@env@type{#1}%
- \FamilyExecuteOptions[.scrjura.sty]{KOMAarg}{#2}%
- \endgroup
+ \FamilyCSKey[.scrjura.sty]{KOMAarg}{Clause}{#1@Clause}%
+ \FamilyCSKey[.scrjura.sty]{KOMAarg}{SubClause}{#1@SubClause}%
+ \FamilyCSKey[.scrjura.sty]{KOMAarg}{Sentence}{#1@Sentence}%
+ \DefineFamilyKey[.scrjura.sty]{KOMAarg}{ClauseNumberFormat}{%
+ \expandafter\def\csname #1@Clauseformat \endcsname####1{##1{####1}}%
+ \expandafter\edef\csname #1@Clauseformat\endcsname{%
+ \noexpand\protect\expandafter\noexpand\csname #1@Clauseformat \endcsname
+ }%
+ \FamilyKeyStateProcessed
+ }
+ \DefineFamilyKey[.scrjura.sty]{KOMAarg}{ClauseFont}{%
+ \IfExistskomafont{#1.Clause}{%
+ \IfIsAliaskomafont{#1.Clause}{%
+ \expandafter\let\csname scr@fnt@instead@#1.Clause\endcsname\relax
+ \newkomafont{#1.Clause}{##1}%
+ }{\setkomafont{#1.Clause}{##1}}%
+ }{%
+ \newkomafont{#1.Clause}{##1}%
+ }%
+ }
+ \FamilyExecuteOptions[.scrjura.sty]{KOMAarg}{#2}%
+ \RelaxFamilyKey[.scrjura.sty]{KOMAarg}{ClauseFont}%
+ \RelaxFamilyKey[.scrjura.sty]{KOMAarg}{ClauseNumberFormat}%
+ \RelaxFamilyKey[.scrjura.sty]{KOMAarg}{Sentence}%
+ \RelaxFamilyKey[.scrjura.sty]{KOMAarg}{SubClause}%
+ \RelaxFamilyKey[.scrjura.sty]{KOMAarg}{Clause}%
\@ifundefined{#1@Clauseformat}{%
\expandafter\DeclareRobustCommand\expandafter*%
\csname #1@Clauseformat\endcsname[1]{\Clauseformat{##1}}%
@@ -825,11 +834,17 @@
\csname \scrjura@env@type @everypar\endcsname
\contract@everypar
}{}%
- \@ifundefined{scr@fnt@#1}{%
- \@ifundefined{scr@fnt@instead@#1}{%
- \aliaskomafont{Clause}{contract.Clause}%
+% \end{macrocode}
+% Jetzt wird noch ein Font-Alias für \texttt{Clause} gesetzt. Ist kein Font
+% und kein Alias-Font für die neue Umgebung definiert, so wird
+% \texttt{contract.Clause} verwendet.
+% \changes{v3.25}{2017/12/08}{Fontalias korrigiert}^^A
+% \begin{macrocode}
+ \IfExistskomafont{#1.Clause}{%
+ \IfIsAliaskomafont{#1.Clause}{%
+ \aliaskomafont{Clause}{\csname scr@fnt@instead@#1.Clause\endcsname}%
}{%
- \aliaskomafont{Clause}{\csname scr@fnt@instead@#1\endcsname}%
+ \aliaskomafont{Clause}{#1.Clause}%
}%
}{%
\aliaskomafont{Clause}{contract.Clause}%
@@ -941,11 +956,15 @@
% \end{macro}
% \end{option}
% \begin{macro}{\contract@paragraph@font}
-% Das muss noch auf die Element-Schnittstelle von \KOMAScript{} umgestellt
-% werden!
+% \changes{v3.25}{2017/12/08}{Es wird Element \texttt{Clause} statt
+% \texttt{contract.Clause} verwendet}^^A
+% Eigentlich müsste die Anweisung \cs{contract@paragraph@format} heißen. Da
+% sie jedoch für irgendwelche Tricks verwendet wurde. will ich das ungern
+% ändern. Ebenso müsste die Anweisung eigentlich je nach Vertragsumgebung
+% neu definiert und dann jene Defintion verwendet werden.
% \begin{macrocode}
\newkomafont{contract.Clause}{\sffamily\bfseries\large}
-\newcommand*{\contract@paragraph@font}{\usekomafont{contract.Clause}%
+\newcommand*{\contract@paragraph@font}{\usekomafont{Clause}%
\@hangfrom}
% \end{macrocode}
% \end{macro}
@@ -1318,18 +1337,20 @@
% \begin{macro}{\contract@everypar}
% |\scrjura@everpar| für Verträge.
% \begin{macro}{\ifparnumber}
-% \changes{v0.6}{2011/09/29}{Definition des Schalters in die Definition der
-% Option verschoben}
+% \changes{v0.6}{2011/09/29}{Definition des Schalters in die Definition der
+% Option verschoben}^^A
% \begin{Counter}{par}
% \begin{macro}{\thepar}
% \begin{macro}{\theHpar}
% \begin{macro}{\parformat}
-% \changes{v0.7}{2013/06/07}{neues Font-Element \texttt{parnumber}}
+% \changes{v0.7}{2013/06/07}{neues Font-Element \texttt{parnumber}}^^A
% \begin{macro}{\parformatseparation}
-% \changes{v0.9f}{2016/02/06}{neue Anweisung}
+% \changes{v0.9f}{2016/02/06}{neue Anweisung}^^A
% \begin{macro}{\p@par}
-% \changes{v0.5d}{2010/04/28}{\cs{jura@usetype} mit Argument
-% \cs{jura@env@type} eingefügt}
+% \changes{v0.5d}{2010/04/28}{\cs{jura@usetype} mit Argument
+% \cs{jura@env@type} eingefügt}^^A
+% \begin{macro}{\withoutparnumber}
+% \changes{v3.25}{2017/12/19}{neu}^^A
% Der Schalter gibt an, ob überhaupt mit Absatznummern gearbeitet werden
% soll. Sind Absatznummern deaktiviert, werden auch keine manuellen
% Absatznummern gesetzt. Die Absätze werden dann auch nicht gezählt. Ansonsten
@@ -1347,12 +1368,14 @@
\renewcommand*\p@par{{\scrjura@usetype{\scrjura@env@type}\theSubClause\scrjura@separator{\nobreakspace}}}
\@addtoreset{par}{Clause}
\@addtoreset{par}{SubClause}
+\newcommand*{\withoutparnumber}{}
% \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
+% \end{macro}
% \end{Counter}
% \end{macro}
% \changes{v0.5c}{2010/04/26}{erstes Argument von \cs{newmaxpar} und zweites
@@ -1414,12 +1437,14 @@
\else
\def\reserved@a{\relax}%
\ifx\@tempa\reserved@a
+ \withoutparnumber
\else
{\usekomafont{parnumber}{\parformat\parformatseparation}}%
\fi
\fi
\endgroup
\else
+ \begingroup\withoutparnumber\endgroup
\setcounter{sentence}{-1}\refstepcounter{sentence}%
\fi
}