new latex package bracketkey 1.0 (24sep09)

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

6 files changed, 190 insertions, 1 deletions

diff --git a/Master/texmf-dist/doc/latex/bracketkey/Malva.tex b/Master/texmf-dist/doc/latex/bracketkey/Malva.tex
new file mode 100644
index 00000000000..ae42ab02211
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/bracketkey/Malva.tex
@@ -0,0 +1,46 @@
+%% Malva.tex
+%
+% An example for the bracketkey package (C. Heibl)
+%
+\documentclass[11pt, spanish]{article}
+\usepackage[a5paper]{geometry} 
+\usepackage{bracketkey} % load bracketkey.sty
+%
+%%% BEGIN DOCUMENT
+\begin{document}
+%
+\pagestyle{empty} 
+%
+% header of key (alternatively you could use: \keytitle{Malva})
+\vspace{3ex}
+\noindent\textbf{Clave para las especies chilenas de \textit{Malva}}\footnote{A. Marticorena, Malvaceae. In: C. Marticorena \& R. Rodr\'iguez (eds.). Flora de Chile 2(3): 22-105, Editorial Universidad de Concepci\'on, Chile.} 
+\vspace{1ex}
+%
+% the key environment:
+\begin{key}{M.~} 
+\leadONE{}{Br\'acteas del cal\'iculo unidas}
+\name{}{2}{}
+\leadTWO{Br\'acteas del cal\'iculo libres}
+\name{}{3}{}
+\leadONE{}{Br\'acteas lanceoladas, m\'as cortas que el c\'aliz; flores en general solitarias, raro 2-3}
+\name{}{assurgentiflora}{(Kellogg) M.F.Ray}
+\leadTWO{Br\'acteas del cal\'iculo anchas, ovadas, excediendo el c\'aliz; flores usualmente agrupadas}
+\name{}{dendromorpha}{M.F.Ray}
+\leadONE{1}{Hojas superiores laciniadas}
+\name{}{moschata}{L.}
+\leadTWO{Hojas superiores lobadas}
+\name{}{4}{}
+\leadONE{}{Br\'acteas del cal\'iculo lineares}
+\name{}{5}{}
+\leadTWO{Br\'acteas del cal\'iculo ovadas}
+\name{}{6}{}
+\leadONE{}{Mericarpos lisos}
+\name{}{neglecta}{Wallr.}
+\leadTWO{Mericarpos rugosos }
+\name{}{parviflora}{L.}
+\leadONE{4}{P\'etalos de 5-15 mm de largo, pedicelos de casi el largo del c\'aliz }
+\name{}{nicaeensis}{All.}
+\leadTWO{P\'etalos de 16-25 mm de largo, pedicelos 3-4 veces m\'as largos que el c\'aliz}
+\name{}{sylvestris}{L.}
+\end{key}
+\end{document}
\ No newline at end of file
diff --git a/Master/texmf-dist/doc/latex/bracketkey/README b/Master/texmf-dist/doc/latex/bracketkey/README
new file mode 100644
index 00000000000..d5638e7ae47
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/bracketkey/README
@@ -0,0 +1,45 @@
+bracketkey 1.0 -- A LaTeX class for producing bracketed identication keys
+
+This work may be distributed and/or modified under the
+conditions of the LaTeX Project Public License, either version 1.3
+of this license or (at your option) any later version.
+The latest version of this license is in
+    http://www.latex-project.org/lppl.txt
+and version 1.3 or later is part of all distributions of LaTeX
+version 2005/12/01 or later.
+
+The use of bracketkey is explained below. See also the example in 
+Malva.tex for how to use bracketkey. 
+
+1. Use \begin{key}{<text>} and \end{key} to define the 
+   bracketkey environment.
+
+2. The second argument of \begin key can be used to pass 
+   an abbreveated (genus) name to the 'name' command.
+
+3. The two alternatives of each couplet are defined by:
+
+        \leadONE{<backref>}{<text>} and 
+
+   	\leadTWO{<text>}. 
+
+   <backref> is an integer which refers to the previous couplet 
+   number, in case that the current and the previouos couplet
+   numbers are not consecutive.
+
+4. Each 'lead' command is followed by a 'name' command:
+
+	\name{<text>}{<text|integer>}{<text>}
+	
+   <text> in the first argument is set in boldface. It can be used 
+   for taxon ranks which do not require italized writing.
+
+   <text> in the second argument is set in italics. It typically 
+   takes names of genus rank and below. Alternatively, <integer> 
+   refers to the next couplet.
+
+   <text> in the third argument is set "as is". It can be used to provide 
+   authority names.
+
+
+Please email commentaries, questions, etc. to heibl at lmu.de.
diff --git a/Master/texmf-dist/tex/latex/bracketkey/bracketkey.sty b/Master/texmf-dist/tex/latex/bracketkey/bracketkey.sty
new file mode 100644
index 00000000000..83806db2289
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/bracketkey/bracketkey.sty
@@ -0,0 +1,96 @@
+%% bracketkey.sty
+%% Copyright 2009 C. Heibl	
+%
+% This work may be distributed and/or modified under the conditions of the LaTeX 
+% Project Public License, either version 1.3 of this license or (at your option) any later % version. The latest version of this license is in
+%   http://www.latex-project.org/lppl.txt
+% and version 1.3 or later is part of all distributions of LaTeX version 2005/12/01 or
+% later.
+%
+% For a description of how to use bracketkey, see the files README and 
+% Malva.txt
+%
+% Load required packages
+\usepackage{calc}
+\usepackage{xifthen}
+\usepackage{coolstr}
+\usepackage{hyperref}
+\hypersetup{backref, pdfpagemode=FullScreen, colorlinks=true}
+%
+%\let\HyperRaiseLinkHook\@empty
+%\def\HyperRaiseLinkDefault{\baselineskip}
+%
+\def\hang{\hangindent\parindent}
+\newcounter{index}%
+\newcounter{backindex}%
+\newcounter{key}\setcounter{key}{0}
+\newboolean{named}% 
+\newboolean{back}%    
+\newboolean{nameornumber}%         true if alternative results in a name
+\newsavebox{\gprefix}%         Abbreviation of genus name, parameter for key
+\newlength{\altindent}%        additional indentation of each key level
+\setlength{\altindent}{0mm}
+\newlength{\keylabelwidth}%    width of label of each key step
+\setlength{\keylabelwidth}{2em}%
+\newlength{\oldparindent}
+%
+% define command 'keytitle'
+\newcommand{\keytitle}[2][it]{
+	\vspace{2pt}
+	\ifthenelse{\equal{#1}{it}}
+		{\noindent\textbf{Key to \textit{#2}}} % taxonname in italis
+		{\noindent\textbf{Key to #2}} % normal taxonname
+	\vspace{2pt}
+}
+%
+% define environment 'key'
+\newenvironment{key}[1]%
+  {\setcounter{index}{0}
+  \stepcounter{key}
+   \setboolean{nameornumber}{true}%
+   \sbox{\gprefix}{\textit{\textbf{#1}}}%
+   \setlength{\oldparindent}{\parindent}%
+   \setlength{\hangindent}{0pt}%
+   \setlength{\parindent}{0pt}%
+  }
+  {\par\setlength{\parindent}{\oldparindent}}
+% 
+% define command 'name'
+\newcommand{\name}[4][\usebox{\gprefix}]%
+ {\unskip\nobreak\hfil
+  \penalty 150
+  \leaders\hbox{\thinspace.\thinspace}\hskip 12pt plus 1fill
+  \vadjust{}\hfil
+   \isint{#3}{nameornumber}
+   \ifthenelse{\boolean{nameornumber}}
+	{#2\hspace{6pt}\textbf{\mbox{ \hyperlink{\thekey:#3}{#3}}}} %
+   	{\hbox{\textbf{#2}\hspace{4pt}\textit{\textbf{#1}\textit{\textbf{\mbox{#3}}}}}\hspace{4pt}#4}%
+  {\parfillskip=0pt\par}}
+%
+% define command 'leadONE'
+\newcommand{\leadONE}[2]%
+  {\par%
+  \stepcounter{index}%
+  \setcounter{backindex}{\theindex-1}
+     \hspace*{-\keylabelwidth}\hspace*{-2mm}%
+   %\parbox[t]{\keylabelwidth}{\hfill{\textbf{\hypertarget{\thekey:\theindex}{\theindex}}}}%
+   %\parbox[t]{\keylabelwidth}{\hfill{\textbf{ \raisebox{\baselineskip}[0pt]{\hypertarget         
+   %	{\thekey:\theindex}{}}\theindex}}}%
+   \parbox[t]{\keylabelwidth}{\hfill{\textbf{\raisebox{\baselineskip}[0pt]{\hypertarget         
+   	{\thekey:\theindex}{}}\hyperlink{\thekey:\thebackindex}{\theindex}}}}%
+  \ifthenelse{\isempty{#1}}
+   {\hspace*{2mm}#2}
+  {\hspace*{1.4pt}\textbf{(\hyperlink{\thekey:#1}{#1})}\hspace*{2pt}#2}
+}
+%
+% Anker nach oben verschieben:
+% Instead of '\hypertarget{abc}{def}' you can also use
+% '\raisebox{\baselineskip}[0pt]{\hypertarget{abc}{}}def'
+%
+% define command 'leadTWO'
+\newcommand{\leadTWO}%
+  {\par
+   \hspace*{-\keylabelwidth}\hspace{-4mm}
+   \parbox[t]{2em}{\hfill{\textbf{-}}}% die indexe eine Textbox
+   \hspace*{2.7mm}% hier kommt der Text % \leadTWO
+}%
diff --git a/Master/tlpkg/bin/tlpkg-ctan-check b/Master/tlpkg/bin/tlpkg-ctan-check
index 5f5c90e12ea..b730e0612b7 100755
--- a/Master/tlpkg/bin/tlpkg-ctan-check
+++ b/Master/tlpkg/bin/tlpkg-ctan-check
@@ -43,7 +43,8 @@ my @WorkingTLP = qw(
           bibunits bidi bigfoot binomexp bizcard blacklettert1 blindtext
           blockdraw_mp blowup boisik
           boites boldtensors bookest booklet booktabs boolexpr bophook bosisio
-          boxhandler bpchem breakurl bullcntr bussproofs bytefield 
+          boxhandler bpchem
+          bracketkey breakurl bullcntr bussproofs bytefield 
         calctab calligra calrsfs captcont caption carlisle casyl
           catechis carolmin-ps 
           cbcoptic cbfonts cc-pl ccaption cclicenses cd cdpbundl cell cellspace
diff --git a/Master/tlpkg/tlpsrc/bracketkey.tlpsrc b/Master/tlpkg/tlpsrc/bracketkey.tlpsrc
new file mode 100644
index 00000000000..e69de29bb2d
--- /dev/null
+++ b/Master/tlpkg/tlpsrc/bracketkey.tlpsrc
diff --git a/Master/tlpkg/tlpsrc/collection-latexextra.tlpsrc b/Master/tlpkg/tlpsrc/collection-latexextra.tlpsrc
index c54add112ca..ef61d053420 100644
--- a/Master/tlpkg/tlpsrc/collection-latexextra.tlpsrc
+++ b/Master/tlpkg/tlpsrc/collection-latexextra.tlpsrc
@@ -45,6 +45,7 @@ depend booklet
 depend boolexpr
 depend bophook
 depend boxhandler
+depend bracketkey
 depend breakurl
 depend bullcntr
 depend bussproofs