From fc9af029ad8683806201fc8c5e8daced875f73ed Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 27 Apr 2010 00:58:54 +0000 Subject: bibleref 1.09 (26apr10) git-svn-id: svn://tug.org/texlive/trunk@18014 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/bibleref/bibleref.sty | 28 +++++++++++++++++++---- 1 file changed, 24 insertions(+), 4 deletions(-) (limited to 'Master/texmf-dist/tex/latex/bibleref') diff --git a/Master/texmf-dist/tex/latex/bibleref/bibleref.sty b/Master/texmf-dist/tex/latex/bibleref/bibleref.sty index 47e0a6960a8..106a78854f0 100644 --- a/Master/texmf-dist/tex/latex/bibleref/bibleref.sty +++ b/Master/texmf-dist/tex/latex/bibleref/bibleref.sty @@ -21,7 +21,7 @@ %% %% The Current Maintainer of this work is Nicola Talbot. %% -%% This work consists of the files bibleref.dtx and bibleref.ins and the derived files bibleref.sty, sample.tex, bibleref.perl. +%% This work consists of the files bibleref.dtx and bibleref.ins and the derived files bibleref.sty, sample-multind.tex, sample.tex, bibleref.perl. %% %% \CharacterTable %% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z @@ -39,7 +39,7 @@ %% Grave accent \` Left brace \{ Vertical bar \| %% Right brace \} Tilde \~} \NeedsTeXFormat{LaTeX2e} -\ProvidesPackage{bibleref}[2010/02/06 1.08 (NLCT)] +\ProvidesPackage{bibleref}[2010/04/26 1.09 (NLCT)] \RequirePackage{ifthen} \RequirePackage{fmtcount} \newcommand*{\BRbooknumberstyle}[1]{#1 } @@ -591,9 +591,18 @@ chapter \numberstringnum{##1}}% \PackageError{bibleref}{bible ref style '#1' already defined}{}}} \newcommand*{\setbooktitle}[2]{% -\@ifundefined{br@#1}{\PackageError{biberef}{Unknown +\@ifundefined{br@#1}{\PackageError{bibleref}{Unknown book `#1'}{}}{% \expandafter\def\csname br@#1\endcsname{#2}}} +\newcommand*{\addbiblebook}[2]{% + \@ifundefined{br@#1}% + {% + \expandafter\def\csname br@#1\endcsname{#2}% + }% + {% + \PackageError{bibleref}{Book `#1' already defined}{}% + }% +} \newcommand*{\biblerefstyle}[1]{% \@ifundefined{brs@#1}{\PackageError{bibleref}{% Unknown biblerefstyle '#1'}{}}{\csname brs@#1\endcsname}} @@ -636,10 +645,21 @@ Unknown biblerefstyle '#1'}{}}{\csname brs@#1\endcsname}} {\@ifnextchar-{\@bv@do{\BRvrsep}\@bibleverser}{\@end@@bibleverse}}} \newcommand*{\@end@@bibleverse}{% \if@bv@idx -\index{\@@bv@idxsort\relax @\@bv@idxentry|\@bv@idxpgformat}% + \expandafter\@do@bibleref@map\@@bv@idxsort\relax + \biblerefindex{\@@bv@idxsort\relax @\@bv@idxentry|\@bv@idxpgformat}% \@bv@idxfalse \fi } +\newcommand*{\biblerefindex}{\index} +\newcommand*{\biblerefmap}[2]{% + \expandafter\def\csname @bibleref@map@#1\endcsname{#2}% +} +\def\@do@bibleref@map#1\relax{% + \@ifundefined{@bibleref@map@#1}{}{% + \expandafter\let\expandafter\@@bv@idxsort + \csname @bibleref@map@#1\endcsname + }% +} \newcommand{\@bv@do}[1]{#1\@bv@addtoidx{#1}} \newtoks\@bv@tmpa \newtoks\@bv@tmpb -- cgit v1.2.3