bibarts (21mar16)

git-svn-id: svn://tug.org/texlive/trunk@40096 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 180 insertions, 103 deletions

diff --git a/Master/texmf-dist/tex/latex/bibarts/bibarts.sty b/Master/texmf-dist/tex/latex/bibarts/bibarts.sty
index c465025b071..a43b1127c53 100644
--- a/Master/texmf-dist/tex/latex/bibarts/bibarts.sty
+++ b/Master/texmf-dist/tex/latex/bibarts/bibarts.sty
@@ -1,6 +1,5 @@
-%%  BibArts 2.0 assists you to write LaTeX texts in arts and humanities.
-%%  This file BIBARTS.STY, and BIBSORT.C/.EXE, are parts of BibArts 2.0.
-%%  Copyright (C) 2015  Timo Baumann  bibarts[at]gmx.de  (11-29-2015)
+%%  BibArts 2.1 assists you to write LaTeX texts in arts and humanities.
+%%  Copyright (C) 2016  Timo Baumann  bibarts[at]gmx.de  (2016/03/19)
 %%
 %%  This program is free software; you can redistribute it and/or modify
 %%  it under the terms of the GNU General Public License as published by
@@ -18,46 +17,23 @@
 
 
 
-%%  INTRODUCTION
-%%  \usepackage{bibarts} in your file, and e. g. set \bacaptionsenglish;
-%%  use \footnote{\vli{FirstName}{LastName}{The \ktit{Title} Pub}[Pg].};
-%%  start LaTeX + BIBSORT + LaTeX and \printvli your list of literature.
-%%  After having introduced literature in a full v-cite, you cite short:
-%%  Use \footnote{\kli{LastName}{Title}[Pg].} for your short cites.  Use
-%%  \vqu and \kqu the same way; then \printvqu published documents.  Use
-%%  \per{Journal}|Vol|[Pg], and \arq{Document}{Arcive File}_Vol_(Folio);
-%%  \printper your Periodicals and \printarq your List of Archive Files.
-%%  Spaces are forbidden before OptArgs [Pg], (Foilo), |Vol|, and _Vol_.
-%%  \printnumvkc an index of Names + short Titles used in v- and k-cmds.
-%%
-%%  SWITCHES
-%%  Set \conferize, and get cross references from \kli to \vli (essays).
-%%  If you are never using k-cmds, \notannouncektit them in your v-cmds.
-%%  No historian?  Set \notprinthints; you are never using \vqu or \kqu.
-%%
-%%  IBIDEMIZATION AND INNER CITATIONS
-%%  In a \footnote, BibArts 2.0 prints 'ibidem' instead of the arguments 
-%%  of \kli, \kqu, \per, and \arq, WHEN you are repeating your citation.
-%%  To cite books from teams, set x-cmds, and type co-authors in *-Args:
-%%  \xvli{FirstName}{LastName} *{\vauthor{coFN}{coLN}}{The \ktit{T} Pub}
-%%  and \xkli{LastName}*{\kauthor{coLN}}{T} are making the ibidemization
-%%  (further authors: \midvauthor-\midkauthor BEFORE \vauthor-\kauthor).
-%%  For essays in journals, use \per INSIDE the last v-Arg.  If an essay
-%%  is in an edition, also use a v- or k-cmd INSIDE a last v-Arg.  After
-%%  \vli{FN1}{LN1}{The \ktit{T1}, in: \vli{iFN}{iLN}{The \ktit{iT} Pub}}
-%%  \printvli will print the entry of that title with the inner title as
-%%  short title, and the full inner title appears as SEPARATE list item.
-%%  To use further essays from the same book, you may short-cite inside:
-%%  \vli{FN2}{LN2}{The \ktit{T2}, in: \kli{iLN}{iT}[PgBegin-PgEnd]}*[Pg]
-%%  That - in the very next footnote! - will set an INNER IBIDEMIZATION,
-%%  whereas \footnote{\kli{LN1}{T1}[Pg].} can do an OUTER IBIDEMIZATION.
-%%  \vli{FN1}{LN1}{The \ktit{T1}, in: \ntvauthor{FN}{LN} Full Title Pub}
-%%  instead will do NO INNER IBIDEMIZATION and \printvli a single entry.
-%%
+%%  FILES OF THE PACKAGE AND DOCUMENTATION
+%%  CTAN mirrors > BibArts > bibarts.zip
+%%    bibarts.sty   This file (a LaTeX style)
+%%    ba-short.pdf  Short documentation (English)
+%%    ba-short.tex  Source of ba-short.pdf
+%%    bibarts.pdf   Full documentation (German)
+%%    bibarts.tex   Source of bibarts.pdf
+%%    bibsort.exe   Binary to create the lists
+%%    bibsort.c     Source of bibsort.exe
+%%    COPYING       The license of the package
+
+
+
 %%  COMPATIBILITY
-%%  Change \DeclareRobustCommand into \def HERE when you use LaTeX 2.09.
+%%  Change \DeclareRobustCommand into \def before using LaTeX 2.09.
 %%  Then, you still NOT have to \protect BibArts-cmds in args of v-cmds.
-%%  BibArts 2.0 ONLY has an EMULATION for 1.3 texts: Keep copies of 1.x?
+%%  BibArts 2.1 ONLY has an EMULATION for 1.3 texts:  Keep copies of 1.x?
 
 
 
@@ -96,7 +72,7 @@
 
 \def\errmessage@ba#1{{\protectchars@active\errmessage{#1.^^J \space. . . . . . . . . . . }}}
 
-\typeout@ba{Style Option BibArts, Version 2.0 [2015] ...}
+\typeout@ba{Style Option BibArts, Version 2.1 [2016] ...}
 
 \def\msg@bafontsubst#1#2{\typeout@ba{{\string#1 ...} is unknown; I'll substitute {\string#2 ...}.}}
 
@@ -659,7 +635,7 @@
 \def\ggrrtitlename{Ortsregister}          %%
 \def\gprrtitlename{Personenregister}      %%
 \def\gsrrtitlename{Sachregister}          %%
-\def\gannouncektitname{ (\kern 0.015em im folgenden \baupcorr}
+\def\gannouncektitname{\bastrut\ (\kern 0.015em im Folgenden \baupcorr}  %% changed in 2.1
 \def\gannouncekendname{)}
 \def\grefvbegname{(}
 \def\grefverbname{siehe}
@@ -738,7 +714,7 @@
 \def\fgrrtitlename{Registre g\'eo\-graphique} %%
 \def\fprrtitlename{Registre des personnes}    %%
 \def\fsrrtitlename{Registre des sujets}       %%
-\def\fannouncektitname{ (\kern 0.02em par la suite \baupcorr}
+\def\fannouncektitname{\bastrut\ (\kern 0.02em par la suite \baupcorr}  %% 2.1: \bastrut\
 \def\fannouncekendname{)}
 \def\frefvbegname{(}
 \def\frefverbname{voir}
@@ -749,8 +725,8 @@
 \def\ferscheditionname{\fupskip \'edi\-tion,}   %% -> \fordinal=\fordinalf
 \def\ferschvolumename{vol.,}
 \def\ferschvolumepname{vol.,}
-\def\ferschnohousename{sans maison d'{}\'edi\-tion,}
-\def\ferschnoyearname{sans an\-n\'ee} %%... de publication
+\def\ferschnohousename{s.\kern 0.15em l\kern 0.02em.,}  %% sans lieu new in 2.1
+\def\ferschnoyearname{s.\kern 0.13em d.\bahasdot}  %% sans date new in 2.1
 \def\ffolpagename{\badelspacebefore\ sq.\bahasdot}
 \def\fxfolpagename{\badelspacebefore\ sqq.\bahasdot}
 
@@ -782,11 +758,11 @@
 \def\ehinttovquname{[D]}                  %% -> [D] Printed Sources
 \def\epertitlename{Periodicals}           %%
 \def\earqtitlename{Unpublished Documents} %%
-\def\evkctitlename{Short Titles}          %%
+\def\evkctitlename{Shortened References}  %%  changed in 2.1
 \def\egrrtitlename{Geographical index}    %%
 \def\eprrtitlename{Person index}          %%
 \def\esrrtitlename{Subject index}         %%
-\def\eannouncektitname{ (\kern -0.02em cited as \baupcorr}
+\def\eannouncektitname{\bastrut\ (\kern -0.02em cited as \baupcorr}  %% 2.1: \bastrut\
 \def\eannouncekendname{)}
 \def\erefvbegname{[\nobreak \hskip 1pt plus 0pt}
 \def\erefverbname{see}
@@ -797,8 +773,8 @@
 \def\eerscheditionname{\fupskip edition,}
 \def\eerschvolumename{vol.,}
 \def\eerschvolumepname{vols.,}
-\def\eerschnohousename{no publishing house,}
-\def\eerschnoyearname{no exact year\kern -0.04em} %%... of publication
+\def\eerschnohousename{n.\kern 0.15em p.,}  %% no place new in 2.1
+\def\eerschnoyearname{n.\kern 0.13em d.\bahasdot}  %% no date new in 2.1
 \def\efolpagename{\badelspacebefore\,f\kern -0.1pt.\bahasdot}
 \def\exfolpagename{\badelspacebefore\,ff\kern -0.1pt.\bahasdot}
 
@@ -868,6 +844,7 @@
    \def\3{\string\3}%
    \def\k{\protect\k}%
    \def\r{\protect\r}%
+    \def\mathring{\protect\mathring}%   %% new in 2.1 %%
    \def\t{\protect\t}%
    \def\u{\protect\u}%
     \def\breve{\protect\breve}%
@@ -904,7 +881,23 @@
    \def\label{\protect\label}%  %% 2.09 und 2e wohl unterschiedlich %%
    \def\index{\protect\index}%
    \def\glossary{\protect\glossary}%
-   \def\omicron{\protect\omicron}%
+   \def\Alpha{\protect\Alpha}%   %% Missing big Greek letters new in 2.1 %%
+   \def\Beta{\protect\Beta}%
+   \def\Epsilon{\protect\Epsilon}%
+   \def\Zeta{\protect\Zeta}%
+   \def\Eta{\protect\Eta}%
+   \def\Iota{\protect\Iota}%
+   \def\Kappa{\protect\Kappa}%
+   \def\Mu{\protect\Mu}%
+   \def\Nu{\protect\Nu}%
+   \def\Rho{\protect\Rho}%
+   \def\Tau{\protect\Tau}%
+   \def\Chi{\protect\Chi}%
+   \def\Omicron{\protect\Omicron}%
+   \def\omicron{\protect\omicron}%   %% 2.0 %%
+   \def\backslash{\protect\backslash}%   %% new in 2.1 %%
+   \def\sz{\protect\sz}%   %% new in 2.1 %%
+   \def\SZ{\protect\SZ}%   %% new in 2.1 %%
    \def\selectlanguage{\protect\selectlanguage}%
    \def\sethyphenation{\protect\sethyphenation}%
    \def\frac{\protect\frac}%
@@ -2525,6 +2518,7 @@
 
 \def\@printnumvkclist#1{\resetcorr@ba{\@kxxbatrue\def\vkcitentry{\@vkcitentry}%
        \makeXcorrcmd@ba{\kxxemph}{\bakxxcorr}%
+       \makecorrcmd@ba{}{\balistcorr}%   %% new in 2.1 (always corr at hints) %%
   \@baindexlist
   \@balist{vkc}{#1}}}
  \def\printnumvkclist{\ba@textmode\@printnumvkclist{\@baitemdefs}}
@@ -2590,7 +2584,7 @@
 \def\info@emptyba#1{\typeout@ba{BibArts Warning: No ...entries in \jobname.#1 on input line \line@ba.}%
     {\item{}\BibArts: File \jobname.#1 was empty. Did you start
      \LaTeX\ only once\string? Or did you forget to command
-     \string`BIBSORT \jobname\string'\string?}}
+     \string`bibsort \jobname\string'\string?}}
 
 
 \def\ignore@unused#1{\type@bawarn{Can't `addto' \string#1}}
@@ -2626,12 +2620,12 @@
                  ^^J \space\space I can't reproduce DOUBLEQUOTE in line \line@ba\space of the current BibArts file.
                  ^^J \space\space The catcode of that character has been #1 in your LaTeX file, instead
                  ^^J \space\space of \the\catcode\grave@ba\", which is - and remains - the value here in the BibArts list.
-                 ^^J \space\space If you use [N]GERMAN.STY: DID YOU START bibsort USING OPTION -x ??
+                 ^^J \space\space If you use [n]german.sty: DID YOU START bibsort USING OPTION -x ??
                  ^^J \space\space If you've used e.g. \string\"a instead of "a there, you may ignore that warning.
                  ^^J}%
    \fi}
 
-%% No \message without GERMAN.STY: %%
+%% No \message without german.sty: %%
 \def\bagermanTeX#1{%
   \expandafter\ifx\csname  ngermanTeX\endcsname\relax\else \ngermanTeX{#1}\message{(new)}\fi
   \expandafter\ifx\csname   germanTeX\endcsname\relax\else  \germanTeX{#1}\message{(old)}\fi}
@@ -2649,6 +2643,7 @@
    \addxadd@ba#5\relax\relax\relax
    \language@barep{#8}{#9}%
    \activech@barep{#7}{#9}%
+   \gdef\balistcorr{}%   %% new in 2.1 (filled *arg and empty title) %%
    \item{}\@printvname{#1}{\listlnfnsep}{#2}{1}%
  \if@baaddx\@printoptarg{#3}{\nsep}\else\@printoptarg{#3}{}\fi
    {\reprint@batrue \@printlastarg{#4}{}}\if@banonum{\fromnopagevxxsep}\fi\@reportbaupfalse\ignorespaces}
@@ -2657,6 +2652,11 @@
    \addxadd@ba#5\relax\relax\relax
    \language@barep{#8}{#9}%
    \activech@barep{#7}{#9}%
+   \if@printhint
+    %% see (always corr at hints)
+   \else
+    \gdef\balistcorr{}%   %% new in 2.1 (filled *arg and empty title) %%
+   \fi
    \item{}\@printkname{#1}%
    \if@baaddx\@printoptarg{#2}{\nsep}\else\@printoptarg{#2}{}\fi
    \@printlastarg{#3}{\kxxemph}\@initprinthint{#4}%
@@ -3482,9 +3482,9 @@
 \def\gonext@hy{\let\txen@hy=\next@hy \let\next@hy=\acckorr@hy}
 \def\goact@hy{\let\txen@hy=\next@hy \let\next@hy=\aktacckorr@hy}
 
-{\catcode`\"=13%
- \catcode`\`=12%
- \catcode`\'=12%
+{\catcode\grave@ba\"=13%
+ \catcode\grave@ba\`=12%
+ \catcode\grave@ba\'=12%
 \gdef\hykorr@hy{%
  \if@hyko
  \ifx\next@hy A\kern -0.06em\fi
@@ -3553,8 +3553,36 @@
 \def\ko{\protect\pko}
 
 
-\expandafter\ifx\csname omicron\endcsname\relax
-\def\omicron{o}
+\expandafter\ifx\csname omicron\endcsname\relax\def\omicron{o}\fi
+
+%% new in 2.1 %%
+\def\pbasimgl{\normalfont} %{\normalfont\rule[.3ex]{.02em}{.5ex}\kern-.02em}
+\def\basimgreeklatin{\protect\pbasimgl}
+\expandafter\ifx\csname Alpha\endcsname\relax\def\Alpha{\mbox{\basimgreeklatin A}}\fi
+\expandafter\ifx\csname Beta\endcsname\relax\def\Beta{\mbox{\basimgreeklatin B}}\fi
+\expandafter\ifx\csname Epsilon\endcsname\relax\def\Epsilon{\mbox{\basimgreeklatin E}}\fi
+\expandafter\ifx\csname Zeta\endcsname\relax\def\Zeta{\mbox{\basimgreeklatin Z}}\fi
+\expandafter\ifx\csname Eta\endcsname\relax\def\Eta{\mbox{\basimgreeklatin H}}\fi
+\expandafter\ifx\csname Iota\endcsname\relax\def\Iota{\mbox{\basimgreeklatin I}}\fi
+\expandafter\ifx\csname Kappa\endcsname\relax\def\Kappa{\mbox{\basimgreeklatin K}}\fi
+\expandafter\ifx\csname Mu\endcsname\relax\def\Mu{\mbox{\basimgreeklatin M}}\fi
+\expandafter\ifx\csname Nu\endcsname\relax\def\Nu{\mbox{\basimgreeklatin N}}\fi
+\expandafter\ifx\csname Omicron\endcsname\relax\def\Omicron{\mbox{\basimgreeklatin O}}\fi
+\expandafter\ifx\csname Rho\endcsname\relax\def\Rho{\mbox{\basimgreeklatin P}}\fi
+\expandafter\ifx\csname Tau\endcsname\relax\def\Tau{\mbox{\basimgreeklatin T}}\fi
+\expandafter\ifx\csname Chi\endcsname\relax\def\Chi{\mbox{\basimgreeklatin X}}\fi
+
+
+\expandafter\ifx\csname sz\endcsname\relax
+\def\sz{sz}%   %% new in 2.1 %%
+\else
+\typeout{\string\sz-command used. I do not redefine.}%
+\fi
+
+\expandafter\ifx\csname SZ\endcsname\relax
+\def\SZ{SZ}%   %% new in 2.1 %%
+\else
+\typeout{\string\SZ-command used. I do not redefine.}%
 \fi
 
 
@@ -3568,31 +3596,54 @@
 \def\escb@ba{\ifvmode\leavevmode\lower -1ex\hbox{\strut}\else\nulskip@ba\fi}
 
 \def\babbrack#1{\escb@ba\textup{%
-   \lower 0.25ex\hbox{\tiny[}\hbox{#1}%
-   \lower 0.25ex\hbox{\tiny]}\kern 0.02em{}}}
+   \lower 0.25ex\hbox{\tiny [}\hbox{#1}%
+   \lower 0.25ex\hbox{\tiny ]}\kern 0.02em{}}}
 
 \def\bambrack#1{\iflasthasdot@ba{}{\@baupcorr}\escb@ba\textup{%
-   \lower -0.5ex\hbox{\lower 1.5pt\hbox{\tiny[}}\hbox{#1}%
-   \lower -0.5ex\hbox{\lower 1.5pt\hbox{\tiny]}}\kern 0.02em{}}}
+   \lower -0.5ex\hbox{\lower 1.5pt\hbox{\tiny [}}\hbox{#1}%
+   \lower -0.5ex\hbox{\lower 1.5pt\hbox{\tiny ]}}\kern 0.02em{}}}
 
 \def\batbrack#1{\iflasthasdot@ba{}{\@baupcorr}\escb@ba\textup{%
-   \lower -1.4ex\hbox{\lower 3pt\hbox{\tiny[}}\hbox{#1}%
-   \lower -1.4ex\hbox{\lower 3pt\hbox{\tiny]}}}{\@baendcorr}\kern 0.02em{}}
+   \lower -1.4ex\hbox{\lower 3pt\hbox{\tiny [}}\hbox{#1}%
+   \lower -1.4ex\hbox{\lower 3pt\hbox{\tiny ]}}}{\@baendcorr}\kern 0.02em{}}
 
 
-{\expandafter\ifx\csname dq\endcsname\relax
- \catcode\grave@ba\"=12%
- \gdef\dq{"}%
+{\catcode\grave@ba\"=12%
+ \expandafter\ifx\csname dq\endcsname\relax
+  \gdef\dq{"}%   %% Compatibility to BibArts 2.0 %%
  \fi
- \catcode\grave@ba\"=13%
+ \gdef\dq@bapas{\dq}}
+
+{\catcode\grave@ba\"=13%
  \catcode\grave@ba\'=12%
  \catcode\grave@ba\`=12%
-\gdef\@abra#1{{\errorcontextlines=-1%
+ \gdef\rqq@baakt{"'}%
+ \gdef\lqq@baakt{"`}%
+ \catcode\grave@ba\'=13%
+ \catcode\grave@ba\`=13%
+ \gdef\rqq@baaaa{"'}%
+ \gdef\lqq@baaaa{"`}}
+
+{\catcode\grave@ba\'=12%
+ \gdef\c@bapas{'}%
+ \gdef\cc@bapas{''}%
+ \gdef\cp@bapas{\active@dq\dq@prtct{'}}}
+{\catcode\grave@ba\'=13%
+ \gdef\c@baakt{'}%
+ \gdef\cc@baakt{''}%
+ \gdef\cp@baakt{\active@dq\dq@prtct{'}}}
+
+{\catcode\grave@ba\`=12%
+ \gdef\o@bapas{`}%
+ \gdef\oo@bapas{``}%
+ \gdef\op@bapas{\active@dq\dq@prtct{`}}}
+{\catcode\grave@ba\`=13%
+ \gdef\o@baakt{`}
+ \gdef\oo@baakt{``}%
+ \gdef\op@baakt{\active@dq\dq@prtct{`}}}
+
+\def\@abra#1{{\errorcontextlines=-1%
    \def\@testa{#1}%
-   \def\testS{``}%
-   \def\testT{''}%
-   \def\tests{`}%
-   \def\testt{'}%
    \def\testk{,}%
    \def\testp{.}%
    \def\testm{$-$}%
@@ -3600,35 +3651,61 @@
    \def\testH{--}%
    \def\testL{---}%
    \def\testl{\glq}%
+   \def\teatl{\@glq}%   %% Those commands did appear in old versions of german.sty,
    \def\testr{\grq}%
+   \def\teatr{\@grq}%   %% but you can not use german.sty 2.4a (released 92/04/12),
    \def\testO{\glqq}%
+   \def\teatO{\@glqq}%  %% because BibArts there does not center the marks
    \def\testC{\grqq}%
-   \def\testQ{\dq}%
-   \def\testo{"`}%
-   \def\testc{"'}%
+   \def\teatC{\@grqq}%  %% appropriate into the angular brackets.
    \def\testd{...}%
    \def\testD{\dots}%
-   \ifx\@testa\testS\batbrack{\if@batone{\kern 0.04em``\kern -0.06em}{\kern -0.11em``}}\else
-   \ifx\@testa\testT\batbrack{\if@batone{\kern 0.03em''\kern -0.05em}{\kern 0.01em''\kern -0.12em}}\else
-   \ifx\@testa\tests\batbrack{\kern -0.02em`\kern -0.02em}\else
-   \ifx\@testa\testt\batbrack{\kern -0.02em'\kern -0.02em}\else
-   \ifx\@testa\testk\babbrack{\kern -0.02em,\kern -0.02em}\else
-   \ifx\@testa\testp\babbrack{\kern -0.02em.\kern -0.02em}\else
-   \ifx\@testa\testm\bambrack{\kern -0.03em$-$\kern -0.035em}\else
-   \ifx\@testa\testh\bambrack{\kern -0.01em-\kern -0.05em}\else
-   \ifx\@testa\testH\bambrack{\kern 0.03em--\kern 0.03em}\else
-   \ifx\@testa\testL\bambrack{\kern 0.03em---\kern 0.03em}\else
-   \ifx\@testa\testl\babbrack{\if@batone{\kern -0.02em\glq\kern -0.1034em}{\kern -0.02em\glq\kern 0.02em}}\else
-   \ifx\@testa\testr\batbrack{\if@batone{\kern -0.02em\grq\kern -0.02em}{\kern -0.01em\grq\kern -0.0875em}}\else
-   \ifx\@testa\testO\babbrack{\if@batone{\kern 0.03em\glqq\kern -0.05em}{\kern 0.01em\glqq\kern -0.08em}}\else
-   \ifx\@testa\testC\batbrack{\if@batone{\kern 0.04em\grqq\kern -0.06em}{\kern -0.04em\grqq\kern -0.07em}}\else
-   \ifx\@testa\testo\babbrack{\if@batone{\kern 0.03em\glqq\kern -0.05em}{\kern 0.01em\glqq\kern -0.08em}}\else
-   \ifx\@testa\testc\batbrack{\if@batone{\kern 0.04em\grqq\kern -0.06em}{\kern -0.04em\grqq\kern -0.07em}}\else
-   \ifx\@testa\testQ\batbrack{\if@batone{\kern -0.043em\dq\kern -0.06em}{\kern 0.01em\dq\kern -0.12em}}\else
-   \ifx\@testa\testd\babbrack{\kern -0.01em...\kern -0.03em}\else
-   \ifx\@testa\testD\babbrack{\kern 0.12em\dots\kern -0.08em}\else
-   \iflasthasdot@ba{}{\@baupcorr}\ifhmode\nulskip@ba\fi\textup{[{#1}]}\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}}%
-}
+   \ifx\@testa\oo@bapas \oo@abra{\oo@bapas}\else
+   \ifx\@testa\oo@baakt \oo@abra{\oo@baakt}\else
+   \ifx\@testa\cc@bapas \cc@abra{\cc@bapas}\else
+   \ifx\@testa\cc@baakt \cc@abra{\cc@baakt}\else
+   \ifx\@testa\cp@bapas\rqq@abra{\cp@bapas}\else
+   \ifx\@testa\cp@baakt\rqq@abra{\cp@baakt}\else
+   \ifx\@testa\op@bapas\lqq@abra{\op@bapas}\else
+   \ifx\@testa\op@baakt\lqq@abra{\op@baakt}\else
+   \ifx\@testa\o@bapas   \o@abra{\o@bapas}\else
+   \ifx\@testa\o@baakt   \o@abra{\o@baakt}\else
+   \ifx\@testa\c@bapas   \c@abra{\c@bapas}\else
+   \ifx\@testa\c@baakt   \c@abra{\c@baakt}\else
+   \ifx\@testa\testk    \babbrack{\kern -0.02em{\testk}\kern -0.02em}\else
+   \ifx\@testa\testp    \babbrack{\kern -0.02em{\testp}\kern -0.02em}\else
+   \ifx\@testa\testm    \bambrack{\kern -0.03em{\testm}\kern -0.035em}\else
+   \ifx\@testa\testh    \bambrack{\kern -0.01em{\testh}\kern -0.05em}\else
+   \ifx\@testa\testH    \bambrack{\kern  0.03em{\testH}\kern  0.03em}\else
+   \ifx\@testa\testL    \bambrack{\kern  0.03em{\testL}\kern  0.03em}\else
+   \ifx\@testa\testl    \lq@abra{\testl}\else
+   \ifx\@testa\teatl    \lq@abra{\teatl}\else
+   \ifx\@testa\testr    \rq@abra{\testr}\else
+   \ifx\@testa\teatr    \rq@abra{\teatr}\else
+   \ifx\@testa\testO    \lqq@abra{\testO}\else
+   \ifx\@testa\teatO    \lqq@abra{\teatO}\else
+   \ifx\@testa\testC    \rqq@abra{\testC}\else
+   \ifx\@testa\teatC    \rqq@abra{\teatC}\else
+   \ifx\@testa\lqq@baakt\lqq@abra{\lqq@baakt}\else
+   \ifx\@testa\lqq@baaaa\lqq@abra{\lqq@baaaa}\else
+   \ifx\@testa\rqq@baakt\rqq@abra{\rqq@baakt}\else
+   \ifx\@testa\rqq@baaaa\rqq@abra{\rqq@baaaa}\else
+   \ifx\@testa\dq        \dq@abra{\dq}\else
+   \ifx\@testa\dq@bapas  \dq@abra{\dq@bapas}\else
+   \ifx\@testa\testd    \babbrack{\kern -0.01em{\testd}\kern -0.03em}\else
+   \ifx\@testa\testD    \babbrack{\kern  0.12em{\testD}\kern -0.08em}\else
+   \iflasthasdot@ba{}{\@baupcorr}\ifhmode\nulskip@ba\fi\textup{[{#1}]}\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
+   }}
+
+ \def\oo@abra#1{\batbrack{\if@batone{\kern  0.04em{#1}\kern -0.06em}{\kern -0.11em{#1}}}}
+ \def\cc@abra#1{\batbrack{\if@batone{\kern  0.03em{#1}\kern -0.05em}{\kern  0.01em{#1}\kern -0.12em}}}
+  \def\o@abra#1{\batbrack{\kern -0.02em{#1}\kern -0.02em}}
+ \def\lq@abra#1{\babbrack{\if@batone{\kern -0.02em{#1}\kern -0.1034em}{\kern -0.02em{#1}\kern 0.02em}}}
+  \def\c@abra#1{\batbrack{\kern -0.02em{#1}\kern -0.02em}}
+\def\lqq@abra#1{\babbrack{\if@batone{\kern  0.03em{#1}\kern -0.05em}{\kern 0.01em{#1}\kern -0.08em}}}
+\def\rqq@abra#1{\batbrack{\if@batone{\kern  0.04em{#1}\kern -0.06em}{\kern -0.04em{#1}\kern -0.07em}}}
+ \def\dq@abra#1{\batbrack{\if@batone{\kern -0.043em{#1}\kern -0.06em}{\kern 0.01em{#1}\kern -0.12em}}}
+ \def\rq@abra#1{\batbrack{\if@batone{\kern -0.02em{#1}\kern -0.02em}{\kern -0.01em{#1}\kern -0.0875em}}}
 
 \def\pabra#1{\@abra{#1}{\hskip 0pt plus 0pt}}
 \def\abra{\protect\pabra}
@@ -3654,7 +3731,7 @@
 \def\footnoterule{\bakorr@fnr\vfill\fnrbasave}
 %% \vfill INSTEAD OF \flushbottom %%
 
-\footnotesep=2ex
+%\footnotesep=2ex   %% new in 2.1 %%
 
 \def\bibsortargs{unknown (no BibArts list printed yet)}
 
@@ -3667,7 +3744,7 @@
   \item{}\rule{5pt}{0pt}\nopagebreak
     \@baposvskip\rule{5pt}{0pt}\pagebreak[3]%    
   \item{}\@banegvskip\@banegvskip\@banegvskip
-    {\large\bfseries\sffamily{#1}}\nopagebreak
+    {\normalfont\large\bfseries\sffamily{#1}}\nopagebreak
   }
 \def\do@onecolumnbsh#1{%
   \nopagebreak\@baposvskip\@baposvskip\pagebreak[3]\@banegvskip\item{}{\large\bfseries\sffamily{#1}}\nopagebreak
@@ -3691,14 +3768,14 @@
 
 
 
-                %% Kompatibilitaet zu BibArts 3.1 %%
+                %% Compatibility to BibArts 3.1 %%
 
 \def\bib{\arq{}}
 \def\printonlybib{\printonlyarq{}}
 \def\addtobib{\addtoarq{}}
 \newif\if@oldba\@oldbafalse
 \def\makebar{\typeout@ba{ \space ***** \space That is obviously a file based on BibArts 1.x \space *****
-   ^^J \space ***** \space BibArts 2.0 starts compatibility mode for 1.3 \space *****}%
+   ^^J \space ***** \space BibArts 2.1 starts compatibility mode for 1.3 \space *****}%
   \def\bibarts{\BibArts}%
   \def\schrift{}%
   \def\barschrift{}%
@@ -3719,7 +3796,7 @@
 \def\pstressing#1{\@bsphack\def\authoremph{\upshape\csname #1\endcsname}\@esphack}
  \def\stressing{\protect\pstressing}
 
-\def\gbibmarkname{im folgenden: }
+\def\gbibmarkname{im Folgenden: }  %% changed in 2.1
 \def\fbibmarkname{par la suite: }
 \def\ebibmarkname{cited as: }
 \def\pbibref#1{{#1} {\ba@varstringtrue\ba@varref{}{BIB}{#1}}}