function Ohc_sourcework(){
//List of sources - for italicisiation
// copied from subscript1 and alpha-sorted
var table = [
'(Addis Fortune|Afghanistan Times Daily|Africa Confidential|American Free Press|Amrita Bazar Patrika|Armenian Mirror-Spectator|Armenian Weekly|Asia Times Online|Athens News|Atlantic Sun)',
'(Balochistan Post|Bangkok Post|Bermuda Sun|Bhutan Observer|Bhutan Times|Bhutan Today|Birmingham Mail|Borneo Bulletin|Borneo Post|Boston Globe|Boston Patriot|Bucharest Business Week|Bucharest Daily News|Budapest Week|Buenos Aires Herald|Business Day|Business Line|Business Recorder|Business Standard|Business Times)',
'(Caixin|Cape Argus|Cape Times|Chicago Sun-Times|Chicago Tribune|China Daily|China Digital Times|China Post|Chinese Courier|City Journal|City Press|City Vision|Columbus Dispatch|Contra Costa Times|Corante|Cyprus Mail|Cyprus Observer|Cyprus Today|Cyprus Weekly)',
'(Daily Dispatch|Daily Express|Daily Mail|The Mail on Sunday|Daily Maverick|Daily Mirror|Daily News Egypt|Daily News|Daily News and Analysis|Daily Record|Daily Star|The Daily Star|Daily Times|Daily Voice|Dallas Observer|Dawn|Deadline Hollywood|Deccan Chronicle|Deccan Herald|Den|Deseret News|Detroit Free Press|Diamond Fields Advertiser|Diario Sur)',
'(Eden|Edinburgh Courant|Education Update|Egypt News|Eleftherotypia|Elle|EUobserver|Europe Today|European Daily|Express & Star)',
'(False Bay Echo|Fast Company|Fiji Times|Financial Chronicle|Financial Mail|Financial Mirror|Financial Times|FINANCIAL|Foroyaa|Fort Worth Star-Telegram|Free Society|French News)',
'(Ghanaian Times|Gibraltar Chronicle|Global Times|Government Gazette of South Africa|Gringo Gazette|Gulf News)',
'(Hamodia|Hankook Ilbo|Hansard|Harakah|Helderberg Sun|Helix|Helsinki Times|Herald Sun|Hicky\'s Bengal Gazette|Highlands Herald|Highline Times|Hindustan Times|Houston Chronicle|Hundred Flowers|Hürriyet Daily News)',
'(Independent on Saturday|Independent Online|Information World Review|Inside Tucson Business|International Business Times|International Herald Tribune|International Times)',
'(Jakarta Globe|Japan Times|The Jewish Chronicle|Jewish Report|Kabul Times|Knoxville Daily Sun|Knoxville News Sentinel|Krakow Post|Kuensel|Kyiv Post)',
'(La Jerga: Periodismo Gonzo Independiente|La Nación|Labour Elector|Latin American Herald Tribune|Latin Opinion|Leadership|Leicester Mercury|Les Inrockuptibles|Lok News|London Evening Standard|Los Angeles Times)',
'(Mail & Guardian|Malaya|Malaysian Today|Manila Bulletin|Manila Chronicle|Manila Standard Today|Marianas Variety|Mid-Ocean News|Mindanao Times|Minivan Daily|Mmegi|Moonta Herald|My Paper)',
'(Nagaland Page|Namibia Economist|Namibian Sun|National Herald Tribune|National Post|Nepali Times|New Age|New Europe|New Poland Express|New Sabah Times|New Straits Times|New York Amsterdam News|New York Post|Newsday|Newswatch|Next Magazine|Nine O\'Clock|Nordstjernan|Norwich Post)',
'(Oakland Tribune|Off our backs|On the Media|Orbit Magazine|Orlando Sentinel|Ottawa Citizen|Our Neighborhood Times)',
'(Pakistan Observer|Palau Horizon|Panorama|People\'s Journal|People\'s Daily|Peoples Daily|Peterbrough Telegraph|Philadelphia Daily News|Philippine Daily Inquirer|Phuket Gazette|Pittsburgh Tribune-Review|Plainsman|Post|Pravasi Express|Pretoria News|Proletarian Era|Pulse St. Petersburg|Quami Ekta|Quan Doi Nhan Dan)',
'(República|Rome Daily American|Sai Gon Giai Phong|Saigon Times Daily|Saigon Times|Saipan Tribune|The San Diego Union-Tribune|Samoa Observer|San Francisco Chronicle|San Jose Mercury News|Santa Barbara Independent|Sarawak Tribune|Seattle Post-Intelligencer|Sentinel News|Shanghai Evening Post & Mercury|Shillong Observer|Singapore Free Press|SOMA Digest|South China Morning Post|Southeast Chicago Observer|Southeast European Times|Southeast Sun Online Edition|Southern Mail|Southern Suburbs Tatler|Star International|Star Tribune|Star|The Star|Streats|Sudan Tribune|Sun\\.Star|Sun-Sentinel|Sunday Independent|Sunday Mail|Sunday Times)',
'(Table Talk|Taipei Times|Taiwan Journal|Taiwan News|Tampa Bay Times|Tehran Times|Telegraph & Argus|Tenerife News|ThaiDay|Thanh Nien|TheFrenchPaper|Theweek|Times of Assam|Times of Indonesia|The Times of Israel|Times of Vietnam|Today|Today\'s Zaman|Toronto Star|Toronto Sun|Tripoli Post|Tunisia News|Tuoi Tre|Two Republics)',
'(The Age|The Arizona Republic|The Armenian Reporter|The Atlantic|The Australian|The Baltimore Sun|The Belfast Telegraph|The Botswana Gazette|The Brunei Times|The Business Journals|The Cambodia Daily|The Canberra Times|The Canton Register|The Caprivi Vision|The Chosun Ilbo|The Christian Post|The Christian Science Monitor|The Citizen|The Confidente|The Connexion|The Copenhagen Post|The Daily Observer|The (?:Daily|Sunday) Telegraph|The Dallas Morning News|The Denver Post|The Economic Times|The Edge|The Epoch Times|The European|the eXile|The Express Tribune|The Financial Express|The Financial Gazette|The Frontier Post|The Ghanaian Chronicle|The Globe and Mail|The Guardian|The Observer|The Herald(?: Mexico|)|The Himalayan Times|The Hindu|The Independent(?: on Sunday|)|The Indian Express|The Indian Nation|The Irish Independent|The Irish Times|The Jakarta Post|The Jerusalem Post|The Juba Post|The Kathmandu Post|The Kazan Herald|The Korea Herald|The Korea Times|The Madras Courier|The Malay Mail|The Manila Times|The Mercury|The Miami Herald|The Mongol Messenger|The Moscow News|The Moscow Times|The Namibian|The Nation(?:al)?|The National Herald|The National Student|The New Age|The New Indian Express|The New Leader|The New Orleans Bee|The New Paper|The New Times|The New York Observer|The New York Times(?: Book Review| Magazine)|The New Zealand Herald|The News International|The News Today|The News|The Oregonian|The Paintsville Herald|The Palm Beach Post|The Philadelphia Inquirer|The Philippine Star|The Phnom Penh Post|The Pink\'un|The Pioneer|The Plain Dealer|The Point|The Portugal News|The Prague Post|The Province|The Pyongyang Times|The Reporter|The Reykjavík Grapevine|The Rio Times|The Royal Gazette|The Salt Lake Tribune|The Santiago Times|The Scotsman|Scotland on Sunday|The Seattle Times|The Seoul Times|The Shanghai Herald|The Sikh Times|The Sofia Echo|The Southern Star|The Sowetan|The St. Petersburg Times|The Standard|The Star-Ledger|The Star|The Statesman|The Straits Times|The Sub-Saharan Informer|The Sun|The Sunday Times(?: Magazine|)|The Sydney Morning Herald|The Tampa Tribune|The Telegraph|The Tennessean|The Times of India|The Times(?: Literary Supplement|)|Times Higher Education|The Tribune|The Vancouver Sun|The Vienna Review|The Villager|The Voice|The Wall Street Journal|The Warsaw Voice|The Washington Post|The Washington Times|The Witness|The World|The World Factbook)',
'(University of Chicago Legal Forum|UB Post|USA Today|Vientiane Times|Việt Nam News|Warsaw Business Journal|Weekly Blitz|Winnipeg Free Press|Xavier Newswire|XPRESS|Yedioth Ahronoth|Yorkshire Factory Times|Zerkalo Nedeli|Zimbabwe Metro)',
'(A&F Quarterly|ABA Journal|Advertising Age|Aeon|Aesthetica|Africa-Asia Confidential|Ahlan!|Alberta Views|All About Jazz|All Music Guide to Jazz|Allure|Alternative Press|Alula|Amandla|American Alpine Journal|American Bar Association Journal|American Way|Americas Quarterly|Apollo|Arabian Business|Art & Antiques|Art and Architecture Journal|Art in America|Art Monthly|Art\\+Auction|Artforum|Artlink|ARTnews|ArtReview|Arts & Letters|Asia Literary Review|Aspen Magazine|Australasian Post|Australia\'s Surfing Life|Australian and New Zealand Wine Industry Journal|Australian Book Review|Auto Express|Autocar|Autosport|Aviation Week & Space Technology)',
'(Bards and Sages Quarterly|BBC Music Magazine|BBC [A-Z]\\w+|Bc magazine|Beijing Review|Billboard|Bioradiations|Biotech Week|Birth Control Review|Bloomberg BusinessWeek|BMJ|Bodos Power Systems|Bomb|Bookforum|Border Crossings|Brand Republic|Brandweek|Brick|Bright Lights Film Journal|British Birds|Business Mir)',
'(Cadence Magazine|Canadian Dimension|Canadian Notes & Queries|Canadian Woman Studies|Candid Austin Teen Magazine|Capital Ethiopia|Car Magazine|CERN Courier|Cha: An Asian Literary Journal|Chance Magazine|Chapman|China Economic Review|Chronicleworld|Civil Lines|Clash|Classical Recordings Quarterly|Close Up|Closer|Clutch|CODA|Coilhouse|Colonial Advocate|Colors|Comic Shop News|Commander\'s Digest|Commercial Motor|Communalism Combat|Computer Weekly|Computerworld|Contact Quarterly|Contemporary|Continuum|Cosmopolis: A Literary Review|CounterPunch|Current Archaeology|Current World Archaeology|Curry Club Magazine|Curve)',
'(Dancing Times|Descant|DETAIL|Deutsche Rundschau|Development Today|Dhaka Courier|Diesel Power|Dígame|Digital Spy|Dissent|Dodgem Logic|Down Beat|Drowned in Sound|Dunes Review)',
'(E!Sharp|Ebony|Editor & Publisher|Egypt Today|Empire|EMS Magazine|Encyclopædia Britannica|Engadget|Entertainment Weekly|Envío|Escapism Travel Magazine|Essence|E–The Environmental Magazine|Ethiopian Review|Ethos|EUobserver|European Coatings Journal|Ever Manifesto|Exclaim!)',
'(F1 Racing|FAE Magazine|Fairways \\+ Greens|Fanfare|Fantastic Man|Far Eastern Economic Review|Fast Car|FHM|Financial Engineering News|Fire Chief|Flash Art|Flaunt|Flight International|Flintshire Historical Society journal|Flying|Focus on Africa|Forbes|Fore Georgia|Foreign Affairs|Foreign Policy|forth|Fortnight Magazine|Fortune|Forward Magazine|Frequency: The Snowboarder\'s Journal|frieze|Frontline|FT Magazine|FutureClaw)',
'(Gangway|Geist|German Medical Journal|GHLL|Global Asia|Global Rhythm|Goldenseal|Golf Course News International|Golf Digest|Golf International Magazine|Golf Living|Golf Magazine|Golf Punk|Golf Today|Golf World|GolfStyles|Golfweek|Gothic Beauty|GQ|Grain|Gramophone|Granta|Griffith Review|Guide to Life)',
'(Harper\'s Magazine|Harvard Review|Hello!|Herald|Heso magazine|Hi-Fi News & Record Review|HK Golfer|HK Magazine|Hong Kong Island Magazine|Horizon|Hot Press|Human Events)',
'(Iceland Review|IEEE Microwave Magazine|Illustrated Life Rhodesia|InformationWeek|In the Family|India Today|Innovation|Inside Golf|Inside United|Insight|Instauration|Intelligent Life|Intercourse magazine|Intereconomics|International Language Review|International Review of Intellectual Property and Competition Law|Internationale Politik|Intersec|Investigate|Irish (?:Independent|Pages))',
'(Jadaliyya|Jakarta Expat|Jazz At Ronnie Scott\'s|Jazz Journal|Jazz Review|JazzTimes|Jazzwise|Journal of Electronic Defense|Journal of Strategic Studies|Jp|Juke Magazine|Juked)',
'(Kathimerini|Kawanku|Kerrang!|Kingdom magazine|Kirkus Reviews|Kmt|Kurmanci|Kyoto Journal)',
'(Labor\'s Heritage|Lapham\'s Quarterly|Lapidary Journal Jewelry Artist|Limelight|Links|Literary Review of Canada|Literary Review|Lobster|London Review of Books|Lumiere Magazine)',
'(M/E/A/N/I/N/G|Maclean\'s|MacWorld|Magill|Maisonneuve|Managing Intellectual Property|Marg|Marketing Week|Maxim|McKinsey Quarterly|Meanjin|Medical News Today|Melodic.net|Melody Maker|Microbe Magazine|Midnight Shambler|Military History Monthly|Mixmag|MMA Weekly|Modern Painters|Modern Poetry in Translation|Mojo|Monocle|Mother Earth Living|Mother Jones|Motor Sport|Mountain Path|Mud Life Magazine|Muse|musicOMH|MusicRadar|Music Week|Musicworks)',
'(n\\+1|Namibia Sport|National Club Golfer|National Geographic|National Lampoon|National Observer|National Review|Nature|Naval Review|New African|New England Review|New Internationalist Australia|New Internationalist|New Left Review|New Scientist|New South|New Statesman|New Welsh Review|New Zealand Listener|News Weekly|Newsline|Newsweek|Nictoglobe|NME|Non League Daily|North & South|Noseweek|Notices of the American Mathematical Society|Nuclear Physics News)',
'(Opera Canada|Opera News|Opera|Opus|Organic Farming Digest|Outlook|Overload|Oxford Poetry)',
'(Paaras|Pacific Standard|Patent Information News|Paste|Patent World|PC Magazine|PC World|Peer Review|People|Performance Car|Perini Journal|Perspectives on Work|Pink|Pitchfork|Playbill|Ploughshares|Pocket World|Poetry Ireland Review|Poetry Kanto|Poetry Life and Times|Poetry London|Poetry Salzburg Review|Poetry|Poets & Writers|POL Magazine|Policy Review|PopMatters|Post Magazine|Prabuddha Bharata|Preservation|Private Eye|Proceedings|Professional Pilot Magazine|Prospect|Publishers Weekly|Purple|Putt)',
'(Q|Quadrant|Quartz|Radio Times|Ray|Reason|Renditions|Revolutionart|Road & Track|Rolling Stone|Rubbish)',
'(Sai Kung & Clearwater Bay Magazine|Salon|Sayidaty|School Library Journal|Science|Scientific American|Scoregolf|Security and Human Rights|Senses of Cinema|Shave|Shook|Slate|Sound on Sound|Southerly|Spin|Sports Illustrated|Sport|Motor Sport|Sporting Life|Sputnikmusic|Standpoint|Stereophile|Straight No Chaser|Stylus Magazine|Swimming World Magazine)',
'(Tate Etc\\.|Teen Vogue|Tehelka|The Hill|The Week|This|Time Out(?: [A-Z][a-z]*|)|Time|Timothy McSweeney\'s Quarterly Concern|Tin House|Today\'s Golfer|Top Gear|TV Guide)',
'(The (?:Belfast|Edinburgh|London|Oxford) Gazette|The Absolute Sound|The American Poetry Review|The American Prospect|The American Spectator|The Antiquary|The Artist and Journal of Home Culture|The Artist|The Atlantic|The Believer|The Big Issue|The Brooklyn Rail|The Bulletin|The Burlington Magazine|The Caravan|The Comics Journal|The Common|The Contemporary Review|The Cortland Review|The Courier|The Current|The Cut|The Dawn|The Drouth|The Dublin Review|The Economist|The Fly|The Guardian Weekly|The Himalayan Beacon|The Hollywood Reporter|The Huffington Post|The Jerusalem Report|The Journal of International Security Affairs|The Lancet|The Lawyer|The Maud Powell Signature, Women in Music|The Middle East|The Minnesota Review|The Mississippi Rag|The Monthly|The Music Trades|The Nation|The National Student Magazine|The Navy|The New Republic|The New York Review of Books|The New Yorker|The Oldie|The Paris Review|The Phoenix|The Politic|The Progressive|The Public Ledger|The Reader|The Register|The Scientist|The Spectator|The Stage|The Star|The Stinging Fly|The Village Voice|The Walrus|The Week|The Weekly Standard|The Wire)',
'(U.S. News & World Report|Uncut|Us Weekly|Utne Reader|Vanity Fair|Variant|Variety|Vatan|Vibe|Village|Vogue(?: Paris|)|When Saturday Comes|Wilson Quarterly|Winding Road|Wired|Women\'s Wear Daily|Zoetrope: All-Story)',
//'Generic titles
'((?:The |)[A-Z][a-z]* (?:[Mm]agazine|Monthly|Weekly)|(?:The |)(?:Daily|Weekly) [A-Z][a-z]*|(?:The |)(?:[A-Z][a-z]*[- ]){0,3}(?:Advertiser|Chronicle|Daily|Echo|Evening News|Gazette|Guardian|Herald|Journal|Mail|Mirror|Observer|Post|Telegraph|Times|Tribune|Week(?:ly|)))',
//removed 'Review' as causing too many false positives
'((?:[A-Z][a-z]*[ ]){1,3}(?:Ilbo|Shimbun|Zeitung))',
'(20 Minute[ns]|Aargauer Zeitung|Aftonbladet|Al-Ahram|Algemeen Dagblad|Apple Daily|Asahi Shimbun|Asharq Al-Awsat|Avvenire)',
'(Basler Zeitung|Baslerstab|Beeld|Berlingske Tidende|Berner Zeitung|Bieler Tagblatt|Blesk|Blick|Brasil em Folhas)',
'(Cinco Días|Correio Braziliense|Corriere del Mezzogiorno|Corriere della Sera|Courrier International|Dagbladet|Dagbladet Arbejderen|Dagbladet Børsen|Dagbladet Information|Dagbladet Politiken|Dagen|Dagens Nyheter|De Pers|De Telegraaf|De Volkskrant|Der Spiegel|Der Tagesspiegel|Diário da Manhã|Diário Oficial da União|Die Burger|Die Son|Die Südostschweiz|die Tageszeitung|Die Welt|Die Zeit|Direct (?:Matin|Soir))',
'(Ekstra Bladet|El Correo|El Economista|El Mundo|El País|El Periódico|Estadio Deportivo|Estado de Minas|Expansión|Expressen)',
'(Fakt|Financial Times Deutschland|Folha de S. Paulo|France Soir|Frankfurter Allgemeine Zeitung|Frankfurter Rundschau|Gazeta Wyborcza|Göteborgs-Posten|Haaretz|Handelsblatt|Het Financieele Dagblad|Het Parool|Hospodářské noviny|Hürriyet)',
'(Il Fatto Quotidiano|Il Foglio|il Giornale|Il Giorno|il manifesto|Il Mattino|Il Messaggero|il Resto del Carlino|il Riformista|Il Secolo XIX|Il Tempo|Isolezwe|Izvestia)',
'(Jornal do Brasil|Junge Freiheit|Junge Welt|Jyllands-Posten)',
'(L\'Équipe|L\'Express|L\'Humanité|La Croix|La Gaceta de los Negocios|La Nazione|La Presse|La Razón|la Repubblica|La Stampa|La Tribune|La Vanguardia|La Voz de Galicia|Landbou-Burger|Le Canard enchaîné|Le Devoir|Le Figaro|Le Journal de Montréal|Le Journal de Québec|Le Monde(?: diplomatique|)|Le Nouvel Observateur|Le Point|Le Soleil|Les Échos|L\'espresso|Libération)',
'(Mainichi Shimbun|Marca|Marianne|Mediapart|Ming Pao|Minute|Mladá fronta DNES|Mundo Deportivo)',
'(Nederlands Dagblad|Negocio & Estilo de Vida|Neue Luzerner Zeitung|Neue Zürcher Zeitung|Neues Deutschland|Nihon Keizai Shimbun|Noticias Bolsa|NRC Handelsblad|NRC Next|Nuts)',
'(O Estado de S. Paulo|O Globo|Oriental Daily|Paris Match|Pravda|Právo|Przegląd Sportowy|Público|Puls Biznesu)',
'(Qué!|Reformatorisch Dagblad|Rzeczpospolita|Sankei Shimbun|Sing Pao|Sing Tao Daily|Søndagsavisen|Spits|St. Galler Tagblatt|Süddeutsche Zeitung|Super Deporte|Svenska Dagbladet|Sydsvenskan)',
'(Tages Anzeiger|TagesWoche|Télérama|Trouw|Tygertalk|Ukrayinska Pravda|Urban|Volksblad|Vukani|Wen Wei Po|Weekendavisen|Wirtschaftswoche|Yedioth Ahronoth|Yomiuri Shimbun|Zero Hora|Ziwaphi)',
'(zz eof placeholder)'
];
for (i=0; i<table.length; i++) {
var expr = [
//linked
['(?:author|agency|publisher|work)(\\s?=\\s?\\[\\[(?:[^\\|\\]]*\\||))', '(?: [Oo]nline|[Ww]ebsite|)(\\]\\])(?=[\\s\\.]*[\\|\\}])'], //rem "|title" - bug fix re |prev_title reported Nov 2018
//unlinked
['(?:author|agency|publisher|work)(\\s?=\\s?)', '(?: [Oo]nline|[Ww]ebsite|)([\\s\\.]*[\\|\\}])'], //rem "|title" - bug fix re |prev_title reported Nov 2018
];
for (j=0; j<expr.length; j++) {
try {
var re = new RegExp(expr[j][0] + table[i] + expr[j][1], 'g');
regex(re, 'work$1$2$3');
// to catch sources misplaced by reflinks preceded by spaced hyphens or "|" (disabling 3 June 2013 - false pos reported to "| people"
var re = new RegExp('\\s(?:<!-- || -->-)(\\s)' + table[i] + '(?: [Oo]nline|[Ww]ebsite|)([\\s\\.]*[\\|])', 'g');
regex(re, '|work=$1$2$3');
}
//**************************************************************************************************
// Need to add function to switch correctly-named sources into either italicised or non-italicised
//**************************************************************************************************
catch(err) {
txt="There was an error on function Ohc_sourcetype(), when changing '"+ expr[j][0] + table[i] + expr[j][1] + "' => '$1work$2$3'.\n\n";
txt+="Error: " + err.message + "\n\n";
txt+="Click OK to continue.\n\n";
alert(txt);
}
}
}
}
function Ohc_sourcepub(){
//List of broadcasters and stations, domain names -> non-italicisiation
var table = [
// '([-\\w]*\\.(?:com|gov|net|org|(?:com?|gov|org|)\\.\\w{2}))',
'(Amazon.com|American Broadcasting Company|Arutz Sheva|Australian Broadcasting Corporation|[C-Z]BC News|Al Jazeera|Al Arabiya|Box Office India|Capital (?:Radio|London)|Canadian Broadcasting Corporation|CBC\\/Radio-Canada|Channel [45]|Channel NewsAsia|CBS(?: News|)|China Central Television|Condé Nast Publications|CNBC|Country Music Television|Deutsche Welle|discogs|E!|ESPNcricinfo|ESPN|Fox (?:News(?: Channel|)|Business Network|Broadcasting Company)|France 24|Greenpeace International|iTunes Store|Internet Movie Database|MSNBC|NBC News|NPR|NRK|Press TV|Radio France Internationale|Radio Free Europe\\/Radio Liberty|Raidió Teilifís Éireann|RTÉ News(?: and Current Affairs|)|RT|Sina Corp|Sky News|Voice of America|Google (?:Books|Finance|Maps|News|Scholar|Trends)|Yahoo! (?:Finance|Green|Kids|Music|News)|YouTube|Ziff Davis)',
'([-\\w]* ?TV)',
'(CNN|Yahoo!|Google|LinkedIn)',
'(ESPN|MTV|Rediff.com|VH1)',
//other organisations
'(Amnesty International|Boeing|Canadian Hockey League|FI[BFN]A|Formula One|Human Rights Watch|International Olympic Committee|International Rugby Board|(?:Major|Minor) League Baseball|Metacritic|National Basketball Association|National (?:Football|Hockey) League|PGA Tour|Premier League|Professional Golfers\' Association(?: of America|)|Rec.Sport.Soccer Statistics Foundation|Royal National Theatre|Rugby Football Union|The Championships, Wimbledon|The Football (?:Association|League)|UEFA|United Nations|United States(?: Army| Navy| Air Force)|UNESCO|United Nations|World (?:Bank|Rugby))',
//Premier League clubs (current and relegated)
'((?:Arsenal|Aston Villa|Chelsea|Everton|Fulham|Liverpool|Manchester City|Manchester United|Newcastle United|Norwich City|Queens Park Rangers|Reading|Southampton|Stoke City|Tottenham Hotspur|West Bromwich Albion|West Ham United|Wigan Athletic) F\\.C\\.|(?:Sunderland|Swansea City) A\\.F\\.C\\.)',
'((?:Barnsley|Birmingham City|Blackburn Rovers|Blackpool|Bolton Wanderers|Burnley|Charlton Athletic|Coventry City|Crystal Palace|Derby County|Ipswich Town|Leicester City|Middlesbrough|Nottingham Forest|Portsmouth|Sheffield United|Sheffield Wednesday|Swindon Town|Watford|Wimbledon|Wolverhampton Wanderers) F\\.C\\.|(?:Bradford City|Hull City|Leeds United|Oldham Athletic) A\\.F\\.C\\.)',
'([A-Z]{1,4}-?TV)',
'((?:[A-Z][a-z]* ){1,3}Television|[KW][A-Z]{3})',
'((?:[A-Z][a-z]* ){1,3}(?:Agency|Hotels|Rugby (?:League|Sevens|Union)))',
//'Generic titles //disabled 20/6/2021 false positive with University of Chicago Legal Forum
// '((?:The |)(?:[A-Z][a-z]*[- ]){1,3}(?:Board|College|Committee|Company|Foundation|Institute|University)|(?:The |)(?:College|Company|Foundation|Institute|University) of(?:[- ][A-Z][a-z]*){1,3})' //no comma last line only
];
for (i=0; i<table.length; i++) {
var expr = [
['(?:author|agency|journal|newspaper|periodical|publisher|website|\\bwork)(\\s?=\\s?\\[\\[(?:[^\\|\\]]*\\||))', '(?: [Oo]nline|[Ww]ebsite|)(\\]\\])(?=[\\s\.]*[\\|\\}])'], //rem "|title" - bug fix re BP reported 18 april
['(?:author|agency|journal|newspaper|periodical|publisher|website|\\bwork)(\\s?=\\s?)', '(?: [Oo]nline|[Ww]ebsite|)([\\s\\.]*[\\|\\}])'],
];
for (j=0; j<expr.length; j++) {
try {
var re = new RegExp(expr[j][0] + table[i] + expr[j][1], 'g');
regex(re, 'publisher$1$2$3');
//code to strip italicisation where inappropriately applied
var re = new RegExp('(\\s+)\'\'' + table[i] + '(?: online|)\'\'([^\\w ][^\\]<]*?|)', 'g');
regex(re, '$1$2$3');
}
catch(err) {
txt="There was an error on function Ohc_sourcetype(), when changing '"+ expr[j][0] + table[i] + expr[j][1] + "' => '$1publisher$2$3'.\n\n";
txt+="Error: " + err.message + "\n\n";
txt+="Click OK to continue.\n\n";
alert(txt);
}
}
}
}
function Ohc_sourceagency(){
//List of broadcasters and stations - non-italicisiation
var table = [
'(Agence France-Presse|(?:Australian |)Associated Press|Bernama|Bulgarian Telegraph Agency|Indo-Asian News Service|Independent Balkan News Agency|Interfax(?:-Ukraine|)|IRIN|Kyodo News|Press Association|Press Trust of India|PR Newswire|Religion News Service|RIA Novosti|The Canadian Press|Ukrainian Independent Information Agency|Ukrinform|United Press International|(?:Athens-Macedonian|Islamic Republic|Ma\'an|Syrian Arab|Xinhua|[A-Z]\\w+) News Agency)',
'(Reuters [A-Z]\\w+)'
];
for (i=0; i<table.length; i++) {
var expr = [
['(?:author|agency|journal|newspaper|periodical|publisher|\\bwork)(\\s?=\\s?\\[\\[(?:[^\\|\\]]*\\||))', '(?: [Oo]nline|[Ww]ebsite|)(\\]\\])(?=[\\s\.]*[\\|\\}])'], //rem "|title" - bug fix |prev_title reported Nov 2018
['(?:author|agency|journal|newspaper|periodical|publisher|\\bwork)(\\s?=\\s?)', '(?: [Oo]nline|[Ww]ebsite|)([\\s\\.]*[\\|\\}])'], //rem "|title" - bug fix re |prev_title reported Nov 2018
];
for (j=0; j<expr.length; j++) {
try {
var re = new RegExp(expr[j][0] + table[i] + expr[j][1], 'g');
regex(re, 'agency$1$2$3');
//code to strip italicisation where inappropriately applied
var re = new RegExp('(\\s+)\'\'' + table[i] + '(?: online|)\'\'([^\\w ][^\\]<]*?|)', 'g');
regex(re, '$1$2$3');
}
catch(err) {
txt="There was an error on function Ohc_sourcetype(), when changing '"+ expr[j][0] + table[i] + expr[j][1] + "' => '$1publisher$2$3'.\n\n";
txt+="Error: " + err.message + "\n\n";
txt+="Click OK to continue.\n\n";
alert(txt);
}
}
}
}
