<?php

//
// Last modified: 30/06/2004
//
// These filters are for anglicising the ESV online American text.
//
// Note:
//  (1) They are not general-purpose and deal only with the relevant
//      Bible words.
//  (2) Some marginal choices have been made.  UK english is evolving
//      and is heavily influenced by US english, so changes become
//      less necessary.  For example, I've converted the US "judgment"
//      to the English "judgement", although the former seems acceptable
//      now.  On the whole I've been guided by the printed anglicised
//      ESV, but note that even that is not completely accurate (eg.
//      Obadiah verse 21 has "Saviors" in my copy).

function anglicise($out) {

    $from = array(
                  "/(\W)([Ss])avior(s)?(\W)/",
                  "/(\W)neighbor(s|ing)?(\W)/",
                  "/(\W)favor(able|ite|s|ed|itism)?(\W)/",
                  "/(\W)Favor(\W)/",
                  "/(\W)labor(ed|s)?(\W)/",
                  "/(\W)(vap|vig)or(\W)/",
                  "/(\W)clamor(\W)/",
                  "/(\W)([Ss])plendor(\W)/",
                  "/(\W)color(s|ed)?(\W)/",
                  "/(\W)([Hh])onor(s|able|ing|ed)?(\W)/",
                  "/(\W)dishonor(s|able|ing|ed)?(\W)/",
                  "/(\W)travel(ed|er|ers|ing)(\W)/",
                  "/(\W)marvel(ous|ously|ed|ing)(\W)/",
                  "/(\W)([Cc])ounsel(or|ors|ed)(\W)/",
                  "/(\W)plow(s|ed|ers|ing|man|men|share|shares)?(\W)/",
                  "/(\W)judgment(s)?(\W)/",
                  "/(\W)(recogn|[Rr]eal|[Oo]rgan|[Ss]ymbol|bapt|critic|apolog|sympath)iz(e|ed|es|ing)?(\W)/",
                  "/(\W)(un)?authorized(\W)/",
                  "/(\W)(centi)?meters(\W)/",
                  "/(\W)liter(s)?(\W)/",
                  "/(\W)scepter(s)?(\W)/",
                  "/(\W)worship(ed|er|ers|ing)(\W)/",
                  "/(\W)quarrel(ed|ing)(\W)/",
                  "/(\W)benefited(\W)/",
                  "/(\W)signaled(\W)/",
                  "/(\W)paralyzed(\W)/",
                  "/(\W)fulfill(s|ment)?(\W)/",
                  "/(\W)skillful(ly)?(\W)/",
                  "/(\W)jewelry(\W)/",
                  "/(\W)(De|de|of)fense(s|less)?(\W)/",
                  "/(\W)([Ss])ulfur?(\W)/",
                  );

    $to = array(
                "$1$2aviour$3$4",
                "$1neighbour$2$3",
                "$1favour$2$3",
                "$1Favour$2",
                "$1labour$2$3",
                "$1$2our$3",
                "$1clamour$2",
                "$1$2plendour$3",
                "$1colour$2$3",
                "$1$2onour$3$4",
                "$1dishonour$2$3",
                "$1travell$2$3",
                "$1marvell$2$3",
                "$1$2ounsell$3$4",
                "$1plough$2$3",
                "$1judgement$2$3",
                "$1$2is$3$4",
                "$1$2authorised$3",
                "$1$2metres$3",
                "$1litre$2$3",
                "$1sceptre$2$3",
                "$1worshipp$2$3",
                "$1quarrell$2$3",
                "$1benefitted$2",
                "$1signalled$2",
                "$1paralysed$2",
                "$1fulfil$2$3",
                "$1skilful$2$3",
                "$1jewellery$2",
                "$1$2fence$3$4",
                "$1$2ulphur$3",
                );

    return preg_replace($from, $to, $out);
  }

?>