bibleref 1.08 (6feb10)

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

3 files changed, 1749 insertions, 10 deletions

diff --git a/Master/texmf-dist/source/latex/bibleref/bibleref.dtx b/Master/texmf-dist/source/latex/bibleref/bibleref.dtx
index 2c701c28b2b..8dc3359c8c9 100644
--- a/Master/texmf-dist/source/latex/bibleref/bibleref.dtx
+++ b/Master/texmf-dist/source/latex/bibleref/bibleref.dtx
@@ -8,11 +8,11 @@
 %   -src "(.+)\.(sty)=>\1.\2"
 %   -src "(.+)\.(tex)=>\1.\2"
 %   -src "bibleref.perl=>bibleref.perl"
-%   -doc "manual.tex"
+%   -doc "bibleref-manual.tex"
 %   -author "Nicola Talbot"
 %   -dir "source"
 %   bibleref
-% Created on 2007/8/20 13:29
+% Created on 2010/2/6 14:11
 %\fi
 %\iffalse
 %<*package>
@@ -35,7 +35,7 @@
 %\fi
 % \iffalse
 % Doc-Source file to use with LaTeX2e
-% Copyright (C) 2007 Nicola Talbot, all rights reserved.
+% Copyright (C) 2010 Nicola Talbot, all rights reserved.
 % \fi
 % \iffalse
 %<*driver>
@@ -88,7 +88,7 @@
 \end{document}
 %</driver>
 %\fi
-%\title{bibleref.sty v1.07: a \LaTeXe\ package for 
+%\title{bibleref.sty v1.08: a \LaTeXe\ package for 
 %typesetting bible references}
 %\author{Nicola Talbot\\[10pt]
 %School of Computing Sciences\\
@@ -96,7 +96,7 @@
 %Norwich. Norfolk. NR4 7TJ.\\
 %United Kingdom\\
 %\url{http://theoval.cmp.uea.ac.uk/~nlct/}}
-%\date{20 Aug 2007}
+%\date{6 Feb 2010}
 %\maketitle
 %\tableofcontents
 %
@@ -251,7 +251,7 @@
 % Declare package
 %    \begin{macrocode}
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{bibleref}[2007/08/20 1.07 (NLCT)]
+\ProvidesPackage{bibleref}[2010/02/06 1.08 (NLCT)]
 %    \end{macrocode}
 % Need to do some conditional stuff
 %    \begin{macrocode}
@@ -378,6 +378,7 @@
 %
 %\begin{macro}{\brfullname}
 % This will switch to using the full book title.
+%\changes{1.08}{2008/05/12}{fixed error in spelling of \cs{br@Jeremiah}}
 %    \begin{macrocode}
 \newcommand*{\brfullname}{%
 \def\br@Genesis{\BRbookof Genesis}%
@@ -409,7 +410,7 @@
 \def\br@Wisdom{\BRbookof Wisdom}%
 \def\br@Ecclesiasticus{\BRbookof Ecclesiasticus}%
 \def\br@Isaiah{\BRbookof Isaiah}%
-\def\br@Jeramiah{\BRbookof Jeremiah}%
+\def\br@Jeremiah{\BRbookof Jeremiah}%
 \def\br@Lamentations{\BRbookof Lamentations}%
 \def\br@Baruch{\BRbookof Baruch}%
 \def\br@Ezekiel{\BRbookof Ezekiel}%
@@ -1799,7 +1800,7 @@ $bookname{'SongofSongs'}='\BRbookof Song of Songs';
 $bookname{'Wisdom'}='\BRbookof Wisdom';
 $bookname{'Ecclesiasticus'}='\BRbookof Ecclesiasticus';
 $bookname{'Isaiah'}='\BRbookof Isaiah';
-$bookname{'Jeramiah'}='\BRbookof Jeremiah';
+$bookname{'Jeremiah'}='\BRbookof Jeremiah';
 $bookname{'Lamentations'}='\BRbookof Lamentations';
 $bookname{'Baruch'}='\BRbookof Baruch';
 $bookname{'Ezekiel'}='\BRbookof Ezekiel';
diff --git a/Master/texmf-dist/source/latex/bibleref/bibleref.ins b/Master/texmf-dist/source/latex/bibleref/bibleref.ins
index cbc20ed7895..82224879641 100644
--- a/Master/texmf-dist/source/latex/bibleref/bibleref.ins
+++ b/Master/texmf-dist/source/latex/bibleref/bibleref.ins
@@ -1,10 +1,10 @@
-% bibleref.ins generated using makedtx version 0.94b 2007/8/20 13:29
+% bibleref.ins generated using makedtx version 0.94b 2010/2/6 14:11
 \input docstrip
 
 \preamble
 
  bibleref.dtx
- Copyright 2007 Nicola Talbot
+ Copyright 2010 Nicola Talbot
 
  This work may be distributed and/or modified under the
  conditions of the LaTeX Project Public License, either version 1.3
diff --git a/Master/texmf-dist/source/latex/bibleref/bibleref.perl b/Master/texmf-dist/source/latex/bibleref/bibleref.perl
new file mode 100644
index 00000000000..8a7733f4750
--- /dev/null
+++ b/Master/texmf-dist/source/latex/bibleref/bibleref.perl
@@ -0,0 +1,1738 @@
+#!/usr/bin/perl
+# File   : bibleref.perl
+# Author : Nicola L.C. Talbot
+#          http://theoval.cmp.uea.ac.uk/~nlct/
+# This is a LaTeX2HTML style implementing the bibleref package, and
+# is distributed as part of that package.
+# Copyright 2007 Nicola L.C. Talbot
+# This work may be distributed and/or modified under the
+# conditions of the LaTeX Project Public License, either version 1.3
+# of this license of (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.
+#
+# This work has the LPPL maintenance status `maintained'.
+#
+# 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.
+
+ %bookfullname=();
+
+$synonym{'Gn'}='Gensis';
+$synonym{'Ex'}='Exodus';
+$synonym{'Lv'}='Leviticus';
+$synonym{'Nb'}='Numbers';
+$synonym{'Dt'}='Deuteronomy';
+$synonym{'Jos'}='Joshua';
+$synonym{'Jg'}='Judges';
+$synonym{'Rt'}='Ruth';
+$synonym{'IS'}='ISamuel';
+$synonym{'IIS'}='IISamuel';
+$synonym{'IK'}='IKings';
+$synonym{'IIK'}='IIKings';
+$synonym{'ICh'}='IChronicles';
+$synonym{'IICh'}='IIChronicles';
+$synonym{'Ezr'}='Ezra';
+$synonym{'Ne'}='Nehemiah';
+$synonym{'Tb'}='Tobit';
+$synonym{'Jdt'}='Judith';
+$synonym{'Est'}='Esther';
+$synonym{'IM'}='IMaccabees';
+$synonym{'IIM'}='IIMaccabees';
+$synonym{'Jb'}='Job';
+$synonym{'Ps'}='Psalms';
+$synonym{'Pr'}='Proverbs';
+$synonym{'Qo'}='Ecclesiastes';
+$synonym{'Sg'}='SongofSongs';
+$synonym{'Ws'}='Wisdom';
+$synonym{'Si'}='Ecclesiasticus';
+$synonym{'Is'}='Isaiah';
+$synonym{'Jr'}='Jeremiah';
+$synonym{'Lm'}='Lamentations';
+$synonym{'Ba'}='Baruch';
+$synonym{'Ezk'}='Ezekiel';
+$synonym{'Dn'}='Daniel';
+$synonym{'Ho'}='Hosea';
+$synonym{'Jl'}='Joel';
+$synonym{'Am'}='Amos';
+$synonym{'Ob'}='Obadiah';
+$synonym{'Jon'}='Jonah';
+$synonym{'Mi'}='Micah';
+$synonym{'Na'}='Nahum';
+$synonym{'Hab'}='Habakkuk';
+$synonym{'Zp'}='Zephaniah';
+$synonym{'Hg'}='Haggai';
+$synonym{'Zc'}='Zechariah';
+$synonym{'Ml'}='Malachi';
+$synonym{'Mt'}='Matthew';
+$synonym{'Mk'}='Mark';
+$synonym{'Lk'}='Luke';
+$synonym{'Jn'}='John';
+$synonym{'Ac'}='Acts';
+$synonym{'Rm'}='Romans';
+$synonym{'ICo'}='ICorinthians';
+$synonym{'IICo'}='IICorinthians';
+$synonym{'Ga'}='Galatians';
+$synonym{'Ep'}='Ephesians';
+$synonym{'Ph'}='Philippians';
+$synonym{'Col'}='Colossians';
+$synonym{'ITh'}='IThessalonians';
+$synonym{'IITh'}='IIThessalonians';
+$synonym{'ITm'}='ITimothy';
+$synonym{'IITm'}='IITimothy';
+$synonym{'Tt'}='Titus';
+$synonym{'Phm'}='Philemon';
+$synonym{'Heb'}='Hebrews';
+$synonym{'Jm'}='James';
+$synonym{'IP'}='IPeter';
+$synonym{'IIP'}='IIPeter';
+$synonym{'IJn'}='IJohn';
+$synonym{'IIJn'}='IIJohn';
+$synonym{'IIIJn'}='IIIJohn';
+$synonym{'Rv'}='Revelation';
+$synonym{'Gen'}='Gensis';
+$synonym{'Exod'}='Exodus';
+$synonym{'Lev'}='Leviticus';
+$synonym{'Num'}='Numbers';
+$synonym{'Deut'}='Deuteronomy';
+$synonym{'Josh'}='Joshua';
+$synonym{'Judg'}='Judges';
+$synonym{'ISam'}='ISamuel';
+$synonym{'IISam'}='IISamuel';
+$synonym{'IKgs'}='IKings';
+$synonym{'IIKgs'}='IIKings';
+$synonym{'IChr'}='IChronicles';
+$synonym{'IIChr'}='IIChronicles';
+$synonym{'Neh'}='Nehemiah';
+$synonym{'IM'}='IMaccabees';
+$synonym{'IIM'}='IIMaccabees';
+$synonym{'Ps'}='Psalms';
+$synonym{'Prov'}='Proverbs';
+$synonym{'Eccles'}='Ecclesiastes';
+$synonym{'SofS'}='SongofSongs';
+$synonym{'Wisd'}='Wisdom';
+$synonym{'Ecclus'}='Ecclesiasticus';
+$synonym{'Isa'}='Isaiah';
+$synonym{'Jer'}='Jeremiah';
+$synonym{'Lam'}='Lamentations';
+$synonym{'Ezek'}='Ezekiel';
+$synonym{'Dan'}='Daniel';
+$synonym{'Hos'}='Hosea';
+$synonym{'Obad'}='Obadiah';
+$synonym{'Mic'}='Micah';
+$synonym{'Nah'}='Nahum';
+$synonym{'Hab'}='Habakkuk';
+$synonym{'Zeph'}='Zephaniah';
+$synonym{'Hag'}='Haggai';
+$synonym{'Zech'}='Zechariah';
+$synonym{'Mal'}='Malachi';
+$synonym{'Matt'}='Matthew';
+$synonym{'Rom'}='Romans';
+$synonym{'ICor'}='ICorinthians';
+$synonym{'IICor'}='IICorinthians';
+$synonym{'Gal'}='Galatians';
+$synonym{'Eph'}='Ephesians';
+$synonym{'Phil'}='Philippians';
+$synonym{'Col'}='Colossians';
+$synonym{'IThess'}='IThessalonians';
+$synonym{'IIThess'}='IIThessalonians';
+$synonym{'ITim'}='ITimothy';
+$synonym{'IITim'}='IITimothy';
+$synonym{'Tit'}='Titus';
+$synonym{'Philem'}='Philemon';
+$synonym{'Heb'}='Hebrews';
+$synonym{'Jas'}='James';
+$synonym{'IPet'}='IPeter';
+$synonym{'IIPet'}='IIPeter';
+$synonym{'IJohn'}='IJohn';
+$synonym{'IIJohn'}='IIJohn';
+$synonym{'IIIJohn'}='IIIJohn';
+$synonym{'Rev'}='Revelation';
+
+&do_cmd_brfullname;
+
+sub do_cmd_BRbooknumberstyle{
+   local($_) = @_;
+   local($num);
+
+   $num = &missing_braces unless
+               s/$next_pair_pr_rx/$num=$2;''/eo;
+
+   "$num " . $_;
+}
+
+sub do_cmd_BRepistlenumberstyle{
+   local($_) = @_;
+   local($num);
+
+   $num = &missing_braces unless
+               s/$next_pair_pr_rx/$num=$2;''/eo;
+
+   "$num " . $_;
+}
+
+sub do_cmd_BRbooknumberstyleI{
+   local($_)=@_;
+   local($id)=++$global{'max_id'};
+
+   join('',
+   &translate_commands("\\BRbooknumberstyle$OP$id${CP}1$OP$id$CP"),$_);
+}
+
+sub do_cmd_BRbooknumberstyleII{
+   local($_)=@_;
+   local($id)=++$global{'max_id'};
+
+   join('',
+   &translate_commands("\\BRbooknumberstyle$OP$id${CP}2$OP$id$CP"),$_);
+}
+
+sub do_cmd_BRepistlenumberstyleI{
+   local($_)=@_;
+   local($id)=++$global{'max_id'};
+
+   join('',
+   &translate_commands("\\BRepistlenumberstyle$OP$id${CP}1$OP$id$CP"),$_);
+}
+
+sub do_cmd_BRepistlenumberstyleII{
+   local($_)=@_;
+   local($id)=++$global{'max_id'};
+
+   join('',
+   &translate_commands("\\BRepistlenumberstyle$OP$id${CP}2$OP$id$CP"),$_);
+}
+
+sub do_cmd_BRepistlenumberstyleIII{
+   local($_)=@_;
+   local($id)=++$global{'max_id'};
+
+   join('',
+   &translate_commands("\\BRepistlenumberstyle$OP$id${CP}3$OP$id$CP"),$_);
+}
+
+sub do_cmd_BRbookof{
+   local($_)=@_;
+
+   $_;
+}
+
+sub do_cmd_BRgospel{
+   local($_)=@_;
+
+   $_;
+}
+
+sub do_cmd_BRepistleto{
+   local($_)=@_;
+
+   $_;
+}
+
+sub do_cmd_BRepistletothe{
+   local($_)=@_;
+
+   $_;
+}
+
+sub do_cmd_BRepistleof{
+   local($_)=@_;
+
+   $_;
+}
+
+sub do_cmd_BRbooktitlestyle{
+   local($_)=@_;
+   local($title);
+
+   $title = &missing_braces unless
+              s/$next_pair_pr_rx/$title=$2;''/eo;
+
+   $title . $_;
+}
+
+sub do_cmd_BRchapterstyle{
+   local($_)=@_;
+   local($num);
+
+   $num = &missing_braces unless
+              s/$next_pair_pr_rx/$num=$2;''/eo;
+
+   $num . $_;
+}
+
+sub do_cmd_BRversestyle{
+   local($_)=@_;
+   local($num);
+
+   $num = &missing_braces unless
+              s/$next_pair_pr_rx/$num=$2;''/eo;
+
+   $num . $_;
+}
+
+sub do_cmd_BRbkchsep{
+   local($_)=@_;
+
+   " " . $_;
+}
+
+sub do_cmd_BRchvsep{
+   local($_)=@_;
+
+   ":" . $_;
+}
+
+sub do_cmd_BRchsep{
+   local($_)=@_;
+
+   ';' . $_;
+}
+
+sub do_cmd_BRvrsep{
+   local($_)=@_;
+
+   &translate_commands("--") . $_;
+}
+
+sub do_cmd_BRvsep{
+   local($_)=@_;
+
+   "," . $_;
+}
+
+sub do_cmd_BRperiod{
+   local($_)=@_;
+   $_;
+}
+
+sub do_cmd_brfullname{
+local($_) = @_;
+$bookname{'Genesis'}='\BRbookof Genesis';
+$bookname{'Exodus'}='\BRbookof Exodus';
+$bookname{'Leviticus'}='\BRbookof Leviticus';
+$bookname{'Numbers'}='\BRbookof Numbers';
+$bookname{'Deuteronomy'}='\BRbookof Deuteronomy';
+$bookname{'Joshua'}='\BRbookof Joshua';
+$bookname{'Judges'}='\BRbookof Judges';
+$bookname{'Ruth'}='\BRbookof Ruth';
+$bookname{'ISamuel'}='\BRbooknumberstyleI \BRbookof Samuel';
+$bookname{'IISamuel'}='\BRbooknumberstyleII \BRbookof Samuel';
+$bookname{'IKings'}='\BRbooknumberstyleI \BRbookof Kings';
+$bookname{'IIKings'}='\BRbooknumberstyleII \BRbookof Kings';
+$bookname{'IChronicles'}='\BRbooknumberstyleI \BRbookof Chronicles';
+$bookname{'IIChronicles'}='\BRbooknumberstyleII \BRbookof Chronicles';
+$bookname{'Ezra'}='\BRbookof Ezra';
+$bookname{'Nehemiah'}='\BRbookof Nehemiah';
+$bookname{'Tobit'}='\BRbookof Tobit';
+$bookname{'Judith'}='\BRbookof Judith';
+$bookname{'Esther'}='\BRbookof Esther';
+$bookname{'IMaccabees'}='\BRbooknumberstyleI \BRbookof Maccabees';
+$bookname{'IIMaccabees'}='\BRbooknumberstyleII \BRbookof Maccabees';
+$bookname{'Job'}='\BRbookof Job';
+$bookname{'Psalms'}='\BRbookof Psalms';
+$bookname{'Proverbs'}='\BRbookof Proverbs';
+$bookname{'Ecclesiastes'}='\BRbookof Ecclesiastes';
+$bookname{'SongofSongs'}='\BRbookof Song of Songs';
+$bookname{'Wisdom'}='\BRbookof Wisdom';
+$bookname{'Ecclesiasticus'}='\BRbookof Ecclesiasticus';
+$bookname{'Isaiah'}='\BRbookof Isaiah';
+$bookname{'Jeremiah'}='\BRbookof Jeremiah';
+$bookname{'Lamentations'}='\BRbookof Lamentations';
+$bookname{'Baruch'}='\BRbookof Baruch';
+$bookname{'Ezekiel'}='\BRbookof Ezekiel';
+$bookname{'Daniel'}='\BRbookof Daniel';
+$bookname{'Hosea'}='\BRbookof Hosea';
+$bookname{'Joel'}='\BRbookof Joel';
+$bookname{'Amos'}='\BRbookof Amos';
+$bookname{'Obadiah'}='\BRbookof Obadiah';
+$bookname{'Jonah'}='\BRbookof Jonah';
+$bookname{'Micah'}='\BRbookof Micah';
+$bookname{'Nahum'}='\BRbookof Nahum';
+$bookname{'Habakkuk'}='\BRbookof Habakkuk';
+$bookname{'Zephaniah'}='\BRbookof Zephaniah';
+$bookname{'Haggai'}='\BRbookof Haggai';
+$bookname{'Zechariah'}='\BRbookof Zechariah';
+$bookname{'Malachi'}='\BRbookof Malachi';
+$bookname{'Matthew'}='\BRgospel Matthew';
+$bookname{'Mark'}='\BRgospel Mark';
+$bookname{'Luke'}='\BRgospel Luke';
+$bookname{'John'}='\BRgospel John';
+$bookname{'Acts'}='Acts';
+$bookname{'Romans'}='\BRepistletothe Romans';
+$bookname{'ICorinthians'}='\BRepistlenumberstyleI \BRepistletothe Corinthians';
+$bookname{'IICorinthians'}='\BRepistlenumberstyleII \BRepistletothe Corinthians';
+$bookname{'Galatians'}='\BRepistletothe Galatians';
+$bookname{'Ephesians'}='\BRepistletothe Ephesians';
+$bookname{'Philippians'}='\BRepistletothe Philippians';
+$bookname{'Colossians'}='\BRepistletothe Colossians';
+$bookname{'IThessalonians'}='\BRepistlenumberstyleI \BRepistletothe Thessalonians';
+$bookname{'IIThessalonians'}='\BRepistlenumberstyleII \BRepistletothe Thessalonians';
+$bookname{'ITimothy'}='\BRepistlenumberstyleI \BRepistleto Timothy';
+$bookname{'IITimothy'}='\BRepistlenumberstyleII \BRepistletoTimothy';
+$bookname{'Titus'}='\BRepistleto Titus';
+$bookname{'Philemon'}='\BRepistleto Philemon';
+$bookname{'Hebrews'}='\BRepistletothe Hebrews';
+$bookname{'James'}='\BRepistleof James';
+$bookname{'IPeter'}='\BRepistlenumberstyleI \BRepistleof Peter';
+$bookname{'IIPeter'}='\BRepistlenumberstyleII \BRepistleof Peter';
+$bookname{'IJohn'}='\BRepistlenumberstyleI \BRepistleof John';
+$bookname{'IIJohn'}='\BRepistlenumberstyleII \BRepistleof John';
+$bookname{'IIIJohn'}='\BRepistlenumberstyleIII \BRepistleof John';
+$bookname{'Jude'}='\BRepistleof Jude';
+$bookname{'Revelation'}='\BRbookof Revelation';
+$_;
+}
+
+sub do_cmd_brabbrvname{
+local($_)=@_;
+$bookname{'Gensis'}='Gn\BRperiod ';
+$bookname{'Exodus'}='Ex\BRperiod ';
+$bookname{'Leviticus'}='Lv\BRperiod ';
+$bookname{'Numbers'}='Nb\BRperiod ';
+$bookname{'Deuteronomy'}='Dt\BRperiod ';
+$bookname{'Joshua'}='Jos\BRperiod ';
+$bookname{'Judges'}='Jg\BRperiod ';
+$bookname{'Ruth'}='Rt\BRperiod ';
+$bookname{'ISamuel'}='\BRbooknumberstyleI S\BRperiod ';
+$bookname{'IISamuel'}='\BRbooknumberstyleII S\BRperiod ';
+$bookname{'IKings'}='\BRbooknumberstyleI K\BRperiod ';
+$bookname{'IIKings'}='\BRbooknumberstyleII K\BRperiod ';
+$bookname{'IChronicles'}='\BRbooknumberstyleI Ch\BRperiod ';
+$bookname{'IIChronicles'}='\BRbooknumberstyleII Ch\BRperiod ';
+$bookname{'Ezra'}='Ezr\BRperiod ';
+$bookname{'Nehemiah'}='Ne\BRperiod ';
+$bookname{'Tobit'}='Tb\BRperiod ';
+$bookname{'Judith'}='Jdt\BRperiod ';
+$bookname{'Esther'}='Est\BRperiod ';
+$bookname{'IMaccabees'}='\BRbooknumberstyleI M\BRperiod ';
+$bookname{'IIMaccabees'}='\BRbooknumberstyleII M\BRperiod ';
+$bookname{'Job'}='Jb\BRperiod ';
+$bookname{'Psalms'}='Ps\BRperiod ';
+$bookname{'Proverbs'}='Pr\BRperiod ';
+$bookname{'Ecclesiastes'}='Qo\BRperiod ';
+$bookname{'SongofSongs'}='Sg\BRperiod ';
+$bookname{'Wisdom'}='Ws\BRperiod ';
+$bookname{'Ecclesiasticus'}='Si\BRperiod ';
+$bookname{'Isaiah'}='Is\BRperiod ';
+$bookname{'Jeremiah'}='Jr\BRperiod ';
+$bookname{'Lamentations'}='Lm\BRperiod ';
+$bookname{'Baruch'}='Ba\BRperiod ';
+$bookname{'Ezekiel'}='Ezk\BRperiod ';
+$bookname{'Daniel'}='Dn\BRperiod ';
+$bookname{'Hosea'}='Ho\BRperiod ';
+$bookname{'Joel'}='Jl\BRperiod ';
+$bookname{'Amos'}='Am\BRperiod ';
+$bookname{'Obadiah'}='Ob\BRperiod ';
+$bookname{'Jonah'}='Jon\BRperiod ';
+$bookname{'Micah'}='Mi\BRperiod ';
+$bookname{'Nahum'}='Na\BRperiod ';
+$bookname{'Habakkuk'}='Hab\BRperiod ';
+$bookname{'Zephaniah'}='Zp\BRperiod ';
+$bookname{'Haggai'}='Hg\BRperiod ';
+$bookname{'Zechariah'}='Zc\BRperiod ';
+$bookname{'Malachi'}='Ml\BRperiod ';
+$bookname{'Matthew'}='Mt\BRperiod ';
+$bookname{'Mark'}='Mk\BRperiod ';
+$bookname{'Luke'}='Lk\BRperiod ';
+$bookname{'John'}='Jn\BRperiod ';
+$bookname{'Acts'}='Ac\BRperiod ';
+$bookname{'Romans'}='Rm\BRperiod ';
+$bookname{'ICorinthians'}='\BRepistlenumberstyleI Co\BRperiod ';
+$bookname{'IICorinthians'}='\BRepistlenumberstyleII Co\BRperiod ';
+$bookname{'Galatians'}='Ga\BRperiod ';
+$bookname{'Ephesians'}='Ep\BRperiod ';
+$bookname{'Philippians'}='Ph\BRperiod ';
+$bookname{'Colossians'}='Col\BRperiod ';
+$bookname{'IThessalonians'}='\BRepistlenumberstyleI Th\BRperiod ';
+$bookname{'IIThessalonians'}='\BRepistlenumberstyleII Th\BRperiod ';
+$bookname{'ITimothy'}='\BRepistlenumberstyleI Tm\BRperiod ';
+$bookname{'IITimothy'}='\BRepistlenumberstyleII Tm\BRperiod ';
+$bookname{'Titus'}='Tt\BRperiod ';
+$bookname{'Philemon'}='Phm\BRperiod ';
+$bookname{'Hebrews'}='Heb\BRperiod ';
+$bookname{'James'}='Jm\BRperiod ';
+$bookname{'IPeter'}='\BRepistlenumberstyleI P\BRperiod ';
+$bookname{'IIPeter'}='\BRepistlenumberstyleII P\BRperiod ';
+$bookname{'IJohn'}='\BRepistlenumberstyleI Jn\BRperiod ';
+$bookname{'IIJohn'}='\BRepistlenumberstyleII Jn\BRperiod ';
+$bookname{'IIIJohn'}='\BRepistlenumberstyleIII Jn\BRperiod ';
+$bookname{'Jude'}='Jude';
+$bookname{'Revelation'}='Rv\BRperiod ';
+$_;
+}
+
+sub do_cmd_braltabbrvname{
+local($_)=@_;
+$bookname{'Gensis'}='Gen\BRperiod ';
+$bookname{'Exodus'}='Exod\BRperiod ';
+$bookname{'Leviticus'}='Lev\BRperiod ';
+$bookname{'Numbers'}='Num\BRperiod ';
+$bookname{'Deuteronomy'}='Deut\BRperiod ';
+$bookname{'Joshua'}='Josh\BRperiod ';
+$bookname{'Judges'}='Judg\BRperiod ';
+$bookname{'Ruth'}='Ruth';
+$bookname{'ISamuel'}='\BRbooknumberstyleI Sam\BRperiod ';
+$bookname{'IISamuel'}='\BRbooknumberstyleII Sam\BRperiod ';
+$bookname{'IKings'}='\BRbooknumberstyleI Kgs\BRperiod ';
+$bookname{'IIKings'}='\BRbooknumberstyleII Kgs\BRperiod ';
+$bookname{'IChronicles'}='\BRbooknumberstyleI Chr\BRperiod ';
+$bookname{'IIChronicles'}='\BRbooknumberstyleII Chr\BRperiod ';
+$bookname{'Ezra'}='Ezra';
+$bookname{'Nehemiah'}='Neh\BRperiod ';
+$bookname{'Tobit'}='Tobit';
+$bookname{'Judith'}='Judith';
+$bookname{'Esther'}='Esther';
+$bookname{'IMaccabees'}='\BRbooknumberstyleI M\BRperiod ';
+$bookname{'IIMaccabees'}='\BRbooknumberstyleII M\BRperiod ';
+$bookname{'Job'}='Job';
+$bookname{'Psalms'}='Ps\BRperiod ';
+$bookname{'Proverbs'}='Prov\BRperiod ';
+$bookname{'Ecclesiastes'}='Eccles\BRperiod ';
+$bookname{'SongofSongs'}='S\BRperiod \ of S\BRperiod ';
+$bookname{'Wisdom'}='Wisd\BRperiod ';
+$bookname{'Ecclesiasticus'}='Ecclus\BRperiod ';
+$bookname{'Isaiah'}='Isa\BRperiod ';
+$bookname{'Jeremiah'}='Jer\BRperiod ';
+$bookname{'Lamentations'}='Lam\BRperiod ';
+$bookname{'Baruch'}='Baruch';
+$bookname{'Ezekiel'}='Ezek\BRperiod ';
+$bookname{'Daniel'}='Dan\BRperiod ';
+$bookname{'Hosea'}='Hos\BRperiod ';
+$bookname{'Joel'}='Joel';
+$bookname{'Amos'}='Amos';
+$bookname{'Obadiah'}='Obad';
+$bookname{'Jonah'}='Jonah';
+$bookname{'Micah'}='Mic\BRperiod ';
+$bookname{'Nahum'}='Nah\BRperiod ';
+$bookname{'Habakkuk'}='Hab\BRperiod ';
+$bookname{'Zephaniah'}='Zeph\BRperiod ';
+$bookname{'Haggai'}='Hag\BRperiod ';
+$bookname{'Zechariah'}='Zech\BRperiod ';
+$bookname{'Malachi'}='Mal\BRperiod ';
+$bookname{'Matthew'}='Matt\BRperiod ';
+$bookname{'Mark'}='Mark';
+$bookname{'Luke'}='Luke';
+$bookname{'John'}='John';
+$bookname{'Acts'}='Acts';
+$bookname{'Romans'}='Rom\BRperiod ';
+$bookname{'ICorinthians'}='\BRepistlenumberstyleI Cor\BRperiod ';
+$bookname{'IICorinthians'}='\BRepistlenumberstyleII Cor\BRperiod ';
+$bookname{'Galatians'}='Gal\BRperiod ';
+$bookname{'Ephesians'}='Eph\BRperiod ';
+$bookname{'Philippians'}='Phil\BRperiod ';
+$bookname{'Colossians'}='Col\BRperiod ';
+$bookname{'IThessalonians'}='\BRepistlenumberstyleI Thess\BRperiod ';
+$bookname{'IIThessalonians'}='\BRepistlenumberstyleII Thess\BRperiod ';
+$bookname{'ITimothy'}='\BRepistlenumberstyleI Tim\BRperiod ';
+$bookname{'IITimothy'}='\BRepistlenumberstyleII Tim\BRperiod ';
+$bookname{'Titus'}='Tit\BRperiod ';
+$bookname{'Philemon'}='Philem\BRperiod ';
+$bookname{'Hebrews'}='Heb\BRperiod ';
+$bookname{'James'}='Jas\BRperiod ';
+$bookname{'IPeter'}='\BRepistlenumberstyleI Pet\BRperiod ';
+$bookname{'IIPeter'}='\BRepistlenumberstyleII Pet\BRperiod ';
+$bookname{'IJohn'}='\BRepistlenumberstyleI John';
+$bookname{'IIJohn'}='\BRepistlenumberstyleII John';
+$bookname{'IIIJohn'}='\BRepistlenumberstyleIII John';
+$bookname{'Jude'}='Jude';
+$bookname{'Revelation'}='Rev\BRperiod ';
+$_;
+}
+
+sub brs_default{
+   local($tmp)='';
+   &do_cmd_brfullname;
+
+   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   "$num " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   "$num " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbookof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRgospel{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleto{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistletothe{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($title);';
+   $tmp .= '   $title = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
+   $tmp .= '   $title . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchapterstyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   $num . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRversestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   $num . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbkchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   " " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   ":" . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   \';\' . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvrsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   &translate_commands("--") . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "," . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRperiod{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+}
+
+sub brs_jerusalem{
+   local($tmp)='';
+   &do_cmd_brabbrvname;
+
+   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   "$num " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   "$num " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbookof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRgospel{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleto{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistletothe{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($title);';
+   $tmp .= '   $title = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
+   $tmp .= '   $title . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchapterstyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   $num . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRversestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   $num . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbkchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   " " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   ":" . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   \'; \' . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvrsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   &translate_commands("--") . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "," . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRperiod{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+}
+
+sub brs_anglosaxon{
+   local($tmp)='';
+   &do_cmd_braltabbrvname;
+
+   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   join(" ", &fRoman($num), $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   join(" ", &fRoman($num), $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbookof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRgospel{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleto{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistletothe{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($title);';
+   $tmp .= '   $title = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
+   $tmp .= '   $title . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchapterstyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   $num . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRversestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   $num . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbkchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   " " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "." . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   \'; \' . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvrsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   &translate_commands("--") . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "," . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRperiod{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   ".$_";';
+   $tmp .= '}';
+}
+
+sub brs_JEH{
+   local($tmp)='';
+   &do_cmd_braltabbrvname;
+
+   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   join(" ", $num, $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   join(" ", $num, $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbookof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRgospel{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleto{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistletothe{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($title);';
+   $tmp .= '   $title = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
+   $tmp .= '   $title . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchapterstyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   &froman($num) . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRversestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   $num . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbkchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   " " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   join(" ", ".", $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   \'; \' . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvrsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   &translate_commands("--") . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "," . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRperiod{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   ".$_";';
+   $tmp .= '}';
+}
+
+sub brs_MHRA{
+   local($tmp)='';
+   &do_cmd_brfullname;
+
+   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num,$id);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;$id=$1;\'\'/eo;';
+   $tmp .= '   $num = &froman($num);';
+   $tmp .= '   $num = &translate_commands("\\\\textsc${OP}$id${CP}$num${OP}$id${CP}");';
+   $tmp .= '   join(" ", $num, $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num,$id);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;$id=$1;\'\'/eo;';
+   $tmp .= '   $num = &froman($num);';
+   $tmp .= '   $num = &translate_commands("\\\\textsc${OP}$id${CP}$num${OP}$id${CP}");';
+   $tmp .= '   join(" ", $num, $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbookof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRgospel{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleto{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistletothe{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($title);';
+   $tmp .= '   $title = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
+   $tmp .= '   $title . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchapterstyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   &froman($num) . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRversestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   $num . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbkchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   " " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   join(" ", ".", $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "; " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvrsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   &translate_commands("--") . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "," . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRperiod{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+}
+
+sub brs_NTG{
+   local($tmp)='';
+   &do_cmd_braltabbrvname;
+
+   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   join(" ", $num, $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   join(" ", $num, $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbookof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRgospel{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleto{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistletothe{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($title);';
+   $tmp .= '   $title = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
+   $tmp .= '   $title . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchapterstyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   &froman($num) . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRversestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   $num . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbkchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   " " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   join("", ",", $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "; " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvrsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   &translate_commands("--") . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "," . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRperiod{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+}
+
+sub brs_MLA{
+   local($tmp)='';
+   &do_cmd_braltabbrvname;
+
+   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   join(" ", $num, $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   join(" ", $num, $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbookof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRgospel{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleto{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistletothe{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($title);';
+   $tmp .= '   $title = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
+   $tmp .= '   $title . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchapterstyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   &froman($num) . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRversestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   $num . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbkchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   " " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   join("", ".", $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "; " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvrsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   &translate_commands("--") . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "," . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRperiod{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   ".$_";';
+   $tmp .= '}';
+}
+
+sub brs_chicago{
+   local($tmp)='';
+   &do_cmd_braltabbrvname;
+
+   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   join(" ", $num, $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   join(" ", $num, $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbookof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRgospel{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleto{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistletothe{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($title);';
+   $tmp .= '   $title = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
+   $tmp .= '   $title . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchapterstyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   &froman($num) . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRversestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
+   $tmp .= '   $num . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbkchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   " " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   join("", ":", $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "; " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvrsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   &translate_commands("--") . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   "," . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRperiod{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   ".$_";';
+   $tmp .= '}';
+}
+
+sub brs_long{
+   local($tmp)='';
+   &do_cmd_brfullname;
+
+   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num,$id);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;$id=$1;\'\'/eo;';
+   $tmp .= '   "\\Ordinalstringnum$OP$id$CP$num$OP$id$CP " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
+   $tmp .= '   local($_) = @_;';
+   $tmp .= '   local($num,$id);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '               s/$next_pair_pr_rx/$num=$2;$id=$1;\'\'/eo;';
+   $tmp .= '   "\\Ordinalstringnum$OP$id$CP$num$OP$id$CP " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbookof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   join(" ", "Book of",$_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRgospel{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   join(" ", "Gospel according to St",$_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleto{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   join(" ", "Epistle to",$_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistletothe{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   join(" ", "Epistle to the", $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRepistleof{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   join(" ", "Epistle of",$_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($title);';
+   $tmp .= '   $title = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
+   $tmp .= '   $title . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchapterstyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num,$id);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;$id=$1;\'\'/eo;';
+   $tmp .= '   join(" ", "chapter \\numberstring$OP$id$CP$num$OP$id$CP", $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRversestyle{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   local($num,$id);';
+   $tmp .= '   $num = &missing_braces unless';
+   $tmp .= '              s/$next_pair_pr_rx/$num=$2;$id=$1;\'\'/eo;';
+   $tmp .= '   join(" ", "chapter \\numberstring$OP$id$CP$num$OP$id$CP", $_);';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRbkchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   ", " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   " verse " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRchsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   \', \' . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvrsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   " to " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRvsep{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   ", " . $_;';
+   $tmp .= '}';
+   eval($tmp);
+   $tmp='';
+   $tmp .= 'sub do_cmd_BRperiod{';
+   $tmp .= '   local($_)=@_;';
+   $tmp .= '   $_;';
+   $tmp .= '}';
+}
+
+sub do_bibleref_default{
+   &brs_default;
+}
+
+sub do_bibleref_jerusalem{
+   &brs_jerusalem;
+}
+
+sub do_bibleref_anglosaxon{
+   &brs_anglosaxon;
+}
+
+sub do_bibleref_JEH{
+   &brs_JEH;
+}
+
+sub do_bibleref_MHRA{
+   &brs_MHRA;
+}
+
+sub do_bibleref_NTG{
+   &brs_NTG;
+}
+
+sub do_bibleref_MLA{
+   &brs_MLA;
+}
+
+sub do_bibleref_chicago{
+   &brs_chicago;
+}
+
+sub do_bibleref_text{
+   &brs_chicago;
+}
+
+sub do_cmd_newbiblerefstyle{
+   local($_)=@_;
+   local($style,$cmds);
+   $style = &missing_braces unless
+              s/$next_pair_pr_rx/$style=$2;''/eo;
+
+   &write_warnings("\n\\newbiblerefstyle not implemented");
+
+   $_;
+}
+
+sub do_cmd_setbooktitle{
+   local($_)=@_;
+   local($name,$title);
+
+   $name = &missing_braces unless
+              s/$next_pair_pr_rx/$name=$2;''/eo;
+   $title = &missing_braces unless
+              s/$next_pair_pr_rx/$title=$2;''/eo;
+
+   if (defined $bookname{$name})
+   {
+      $bookname{$name}=$title;
+   }
+   else
+   {
+      &write_warnings("\nUnknown book '$name'");
+   }
+
+   $_;
+}
+
+sub do_cmd_biblerefstyle{
+   local($_)=@_;
+   local($style);
+   $style = &missing_braces unless
+               s/$next_pair_pr_rx/$style=$2;''/eo;
+
+   if (defined "&brs_$style")
+   {
+      eval("&brs_$style");
+   }
+   else
+   {
+      &write_warnings("\nUnknown biblerefstyle '$style'");
+   }
+   $_;
+}
+
+sub do_cmd_bibleverse{
+   local($_)=@_;
+   local($book,$id);
+   local($bibleverse)='';
+   $book = &missing_braces unless
+              s/$next_pair_pr_rx/$book=$2;$id=$1;''/eo;
+
+   if (defined $bookname{$book} or defined $synonym{$book})
+   {
+      $book = $synonym{$book} unless defined $bookname{$book};
+
+      $book = $bookname{$book};
+      $book = "\\BRbooktitlestyle$OP$id$CP$book$OP$id$CP";
+      $bibleverse .= $book;
+      $first=1;
+
+      while (s/^(-?)\(([^:]*):([^\)]*)\)//)
+      {
+         if ($1 eq '-')
+         {
+            $bibleverse .= "\\BRvrsep ";
+         }
+         else
+         {
+            $bibleverse .= ($first ? "\\BRbkchsep " : "\\BRchsep ");
+         }
+         $first=0;
+         $id = ++$global{'max_id'};
+         $bibleverse .= "\\BRchapterstyle$OP$id$CP$2$OP$id$CP" if ($2);
+         $verses = $3;
+         if ($verses)
+         {
+            $bibleverse .= "\\BRchvsep ";
+            @verses = split /,/, $verses;
+
+            for (my $i = 0; $i <=$#verses; $i++)
+            {
+               $verse = $verses[$i];
+
+               $bibleverse .= "\\BRvsep " if ($i > 0);
+
+               if ($verse=~m/(\d+)-(\d+)/)
+               {
+                  $id = ++$global{'max_id'};
+                  $bibleverse .= "\\BRversestyle$OP$id$CP$1$OP$id$CP";
+                  $bibleverse .= "\\BRvrsep ";
+                  $id = ++$global{'max_id'};
+                  $bibleverse .= "\\BRversestyle$OP$id$CP$2$OP$id$CP";
+               }
+               else
+               {
+                  $id = ++$global{'max_id'};
+                  $bibleverse .= "\\BRversestyle$OP$id$CP$verse$OP$id$CP";
+               }
+            }
+         }
+      }
+
+      $bibleverse = &translate_commands($bibleverse);
+   }
+   else
+   {
+      &write_warnings("\nUnknown book '$book'");
+   }
+   join('', $bibleverse, $_);
+}
+
+1;