CINXE.COM
Module:Citation/CS1 - Wikipedia
<!DOCTYPE html> <html class="client-nojs vector-feature-language-in-header-enabled vector-feature-language-in-main-page-header-disabled vector-feature-sticky-header-disabled vector-feature-page-tools-pinned-disabled vector-feature-toc-pinned-clientpref-1 vector-feature-main-menu-pinned-disabled vector-feature-limited-width-clientpref-1 vector-feature-limited-width-content-enabled vector-feature-custom-font-size-clientpref-1 vector-feature-appearance-pinned-clientpref-1 vector-feature-night-mode-disabled skin-theme-clientpref-day vector-toc-not-available" lang="haw" dir="ltr"> <head> <meta charset="UTF-8"> <title>Module:Citation/CS1 - Wikipedia</title> <script>(function(){var className="client-js vector-feature-language-in-header-enabled vector-feature-language-in-main-page-header-disabled vector-feature-sticky-header-disabled vector-feature-page-tools-pinned-disabled vector-feature-toc-pinned-clientpref-1 vector-feature-main-menu-pinned-disabled vector-feature-limited-width-clientpref-1 vector-feature-limited-width-content-enabled vector-feature-custom-font-size-clientpref-1 vector-feature-appearance-pinned-clientpref-1 vector-feature-night-mode-disabled skin-theme-clientpref-day vector-toc-not-available";var cookie=document.cookie.match(/(?:^|; )hawwikimwclientpreferences=([^;]+)/);if(cookie){cookie[1].split('%2C').forEach(function(pref){className=className.replace(new RegExp('(^| )'+pref.replace(/-clientpref-\w+$|[^\w-]+/g,'')+'-clientpref-\\w+( |$)'),'$1'+pref+'$2');});}document.documentElement.className=className;}());RLCONF={"wgBreakFrames":false,"wgSeparatorTransformTable":["",""],"wgDigitTransformTable":["",""],"wgDefaultDateFormat": "dmy","wgMonthNames":["","Ianuali","Pepeluali","Malaki","'Apelila","Mei","Iune","Iulai","'Aukake","Kepakemapa","'Okakopa","Nowemapa","Kekemapa"],"wgRequestId":"3e809833-68b4-4c38-b97e-b34ac57f336c","wgCanonicalNamespace":"Module","wgCanonicalSpecialPageName":false,"wgNamespaceNumber":828,"wgPageName":"Module:Citation/CS1","wgTitle":"Citation/CS1","wgCurRevisionId":70467,"wgRevisionId":70467,"wgArticleId":5723,"wgIsArticle":true,"wgIsRedirect":false,"wgAction":"view","wgUserName":null,"wgUserGroups":["*"],"wgCategories":[],"wgPageViewLanguage":"haw","wgPageContentLanguage":"haw","wgPageContentModel":"Scribunto","wgRelevantPageName":"Module:Citation/CS1","wgRelevantArticleId":5723,"wgIsProbablyEditable":true,"wgRelevantPageIsProbablyEditable":true,"wgRestrictionEdit":[],"wgRestrictionMove":[],"wgNoticeProject":"wikipedia","wgCiteReferencePreviewsActive":true,"wgMediaViewerOnClick":true,"wgMediaViewerEnabledByDefault":true,"wgPopupsFlags":0,"wgVisualEditor":{"pageLanguageCode":"en", "pageLanguageDir":"ltr","pageVariantFallbacks":"en"},"wgMFDisplayWikibaseDescriptions":{"search":true,"watchlist":true,"tagline":true,"nearby":true},"wgWMESchemaEditAttemptStepOversample":false,"wgWMEPageLength":90000,"wgRelatedArticlesCompat":[],"wgCentralAuthMobileDomain":false,"wgEditSubmitButtonLabelPublish":true,"wgULSPosition":"interlanguage","wgULSisCompactLinksEnabled":false,"wgVector2022LanguageInHeader":true,"wgULSisLanguageSelectorEmpty":false,"wgWikibaseItemId":"Q15403807","wgCheckUserClientHintsHeadersJsApi":["brands","architecture","bitness","fullVersionList","mobile","model","platform","platformVersion"],"GEHomepageSuggestedEditsEnableTopics":true,"wgGETopicsMatchModeEnabled":false,"wgGEStructuredTaskRejectionReasonTextInputEnabled":false,"wgGELevelingUpEnabledForUser":false,"wgSiteNoticeId":"2.0"};RLSTATE={"ext.globalCssJs.user.styles":"ready","site.styles":"ready","user.styles":"ready","ext.globalCssJs.user":"ready","user":"ready","user.options":"loading", "ext.pygments":"ready","skins.vector.search.codex.styles":"ready","skins.vector.styles":"ready","skins.vector.icons":"ready","ext.wikimediamessages.styles":"ready","ext.visualEditor.desktopArticleTarget.noscript":"ready","ext.uls.interlanguage":"ready","wikibase.client.init":"ready","ext.wikimediaBadges":"ready","ext.dismissableSiteNotice.styles":"ready"};RLPAGEMODULES=["ext.pygments.view","site","mediawiki.page.ready","skins.vector.js","ext.centralNotice.geoIP","ext.centralNotice.startUp","ext.urlShortener.toolbar","ext.centralauth.centralautologin","ext.popups","ext.visualEditor.desktopArticleTarget.init","ext.visualEditor.targetLoader","ext.echo.centralauth","ext.eventLogging","ext.wikimediaEvents","ext.navigationTiming","ext.uls.interface","ext.cx.eventlogging.campaigns","wikibase.client.vector-2022","ext.checkUser.clientHints","wikibase.sidebar.tracking","ext.dismissableSiteNotice"];</script> <script>(RLQ=window.RLQ||[]).push(function(){mw.loader.impl(function(){return["user.options@12s5i",function($,jQuery,require,module){mw.user.tokens.set({"patrolToken":"+\\","watchToken":"+\\","csrfToken":"+\\"}); }];});});</script> <link rel="stylesheet" href="/w/load.php?lang=haw&modules=ext.dismissableSiteNotice.styles%7Cext.pygments%2CwikimediaBadges%7Cext.uls.interlanguage%7Cext.visualEditor.desktopArticleTarget.noscript%7Cext.wikimediamessages.styles%7Cskins.vector.icons%2Cstyles%7Cskins.vector.search.codex.styles%7Cwikibase.client.init&only=styles&skin=vector-2022"> <script async="" src="/w/load.php?lang=haw&modules=startup&only=scripts&raw=1&skin=vector-2022"></script> <meta name="generator" content="MediaWiki 1.44.0-wmf.4"> <meta name="referrer" content="origin"> <meta name="referrer" content="origin-when-cross-origin"> <meta name="robots" content="max-image-preview:standard"> <meta name="format-detection" content="telephone=no"> <meta name="viewport" content="width=1120"> <meta property="og:title" content="Module:Citation/CS1 - Wikipedia"> <meta property="og:type" content="website"> <link rel="alternate" media="only screen and (max-width: 640px)" href="//haw.m.wikipedia.org/wiki/Module:Citation/CS1"> <link rel="alternate" type="application/x-wiki" title="E ho‘opololei" href="/w/index.php?title=Module:Citation/CS1&action=edit"> <link rel="apple-touch-icon" href="/static/apple-touch/wikipedia.png"> <link rel="icon" href="/static/favicon/wikipedia.ico"> <link rel="search" type="application/opensearchdescription+xml" href="/w/rest.php/v1/search" title="Wikipedia (haw)"> <link rel="EditURI" type="application/rsd+xml" href="//haw.wikipedia.org/w/api.php?action=rsd"> <link rel="canonical" href="https://haw.wikipedia.org/wiki/Module:Citation/CS1"> <link rel="license" href="https://creativecommons.org/licenses/by-sa/4.0/deed.haw"> <link rel="alternate" type="application/atom+xml" title="Hānaīke Atom o Wikipedia" href="/w/index.php?title=Papa_nui:N%C4%81LoliHou&feed=atom"> <link rel="dns-prefetch" href="//meta.wikimedia.org" /> <link rel="dns-prefetch" href="//login.wikimedia.org"> </head> <body class="skin--responsive skin-vector skin-vector-search-vue mediawiki ltr sitedir-ltr mw-hide-empty-elt ns-828 ns-subject mw-editable page-Module_Citation_CS1 rootpage-Module_Citation skin-vector-2022 action-view"><a class="mw-jump-link" href="#bodyContent">Jump to content</a> <div class="vector-header-container"> <header class="vector-header mw-header"> <div class="vector-header-start"> <nav class="vector-main-menu-landmark" aria-label="Site"> <div id="vector-main-menu-dropdown" class="vector-dropdown vector-main-menu-dropdown vector-button-flush-left vector-button-flush-right" > <input type="checkbox" id="vector-main-menu-dropdown-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-vector-main-menu-dropdown" class="vector-dropdown-checkbox " aria-label="Main menu" > <label id="vector-main-menu-dropdown-label" for="vector-main-menu-dropdown-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet cdx-button--icon-only " aria-hidden="true" ><span class="vector-icon mw-ui-icon-menu mw-ui-icon-wikimedia-menu"></span> <span class="vector-dropdown-label-text">Main menu</span> </label> <div class="vector-dropdown-content"> <div id="vector-main-menu-unpinned-container" class="vector-unpinned-container"> <div id="vector-main-menu" class="vector-main-menu vector-pinnable-element"> <div class="vector-pinnable-header vector-main-menu-pinnable-header vector-pinnable-header-unpinned" data-feature-name="main-menu-pinned" data-pinnable-element-id="vector-main-menu" data-pinned-container-id="vector-main-menu-pinned-container" data-unpinned-container-id="vector-main-menu-unpinned-container" > <div class="vector-pinnable-header-label">Main menu</div> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-pin-button" data-event-name="pinnable-header.vector-main-menu.pin">move to sidebar</button> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-unpin-button" data-event-name="pinnable-header.vector-main-menu.unpin">hide</button> </div> <div id="p-navigation" class="vector-menu mw-portlet mw-portlet-navigation" > <div class="vector-menu-heading"> Ka papa huli mea </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="n-mainpage-description" class="mw-list-item"><a href="/wiki/Ka_papa_kinohi" title="Kele i ka papa kinohi [z]" accesskey="z"><span>Papa Kinohi</span></a></li><li id="n-portal" class="mw-list-item"><a href="/wiki/Wikipedia:Ka_hui_kaiaulu" title="No ka papahana, nā hana hiki, nāhi no ka loaʻa ʻana"><span>Ka hui kaiaulu</span></a></li><li id="n-currentevents" class="mw-list-item"><a href="/wiki/Wikipedia:Ka_n%C5%AB_hou" title="Loaʻa nā ʻike kūmole e pili ana i nā nūhou"><span>Ka nū hou</span></a></li><li id="n-recentchanges" class="mw-list-item"><a href="/wiki/Papa_nui:N%C4%81LoliHou" title="Nā loli hou ma ka wiki [r]" accesskey="r"><span>Nā loli hou</span></a></li><li id="n-randompage" class="mw-list-item"><a href="/wiki/Papa_nui:Kaulele" title="Hoʻouka i kekahi ʻaoʻao kaulele [x]" accesskey="x"><span>He mo‘olelo kaulele</span></a></li><li id="n-help" class="mw-list-item"><a href="https://www.mediawiki.org/wiki/Special:MyLanguage/Help:Contents" title="Kahi e aʻo mai"><span>Kōkua</span></a></li> </ul> </div> </div> </div> </div> </div> </div> </nav> <a href="/wiki/Ka_papa_kinohi" class="mw-logo"> <img class="mw-logo-icon" src="/static/images/icons/wikipedia.png" alt="" aria-hidden="true" height="50" width="50"> <span class="mw-logo-container skin-invert"> <img class="mw-logo-wordmark" alt="Wikipedia" src="/static/images/mobile/copyright/wikipedia-wordmark-haw.svg" style="width: 7.5em; height: 1.125em;"> <img class="mw-logo-tagline" alt="" src="/static/images/mobile/copyright/wikipedia-tagline-haw.svg" width="120" height="12" style="width: 7.5em; height: 0.75em;"> </span> </a> </div> <div class="vector-header-end"> <div id="p-search" role="search" class="vector-search-box-vue vector-search-box-collapses vector-search-box-show-thumbnail vector-search-box-auto-expand-width vector-search-box"> <a href="/wiki/Papa_nui:Huli" class="cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet cdx-button--icon-only search-toggle" title="Huli iā Wikipedia [f]" accesskey="f"><span class="vector-icon mw-ui-icon-search mw-ui-icon-wikimedia-search"></span> <span>Huli</span> </a> <div class="vector-typeahead-search-container"> <div class="cdx-typeahead-search cdx-typeahead-search--show-thumbnail cdx-typeahead-search--auto-expand-width"> <form action="/w/index.php" id="searchform" class="cdx-search-input cdx-search-input--has-end-button"> <div id="simpleSearch" class="cdx-search-input__input-wrapper" data-search-loc="header-moved"> <div class="cdx-text-input cdx-text-input--has-start-icon"> <input class="cdx-text-input__input" type="search" name="search" placeholder="Huli" aria-label="Huli" autocapitalize="sentences" title="Huli iā Wikipedia [f]" accesskey="f" id="searchInput" > <span class="cdx-text-input__icon cdx-text-input__start-icon"></span> </div> <input type="hidden" name="title" value="Papa_nui:Huli"> </div> <button class="cdx-button cdx-search-input__end-button">Huli</button> </form> </div> </div> </div> <nav class="vector-user-links vector-user-links-wide" aria-label="Hāmeʻa ponoʻī"> <div class="vector-user-links-main"> <div id="p-vector-user-menu-preferences" class="vector-menu mw-portlet emptyPortlet" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> </ul> </div> </div> <div id="p-vector-user-menu-userpage" class="vector-menu mw-portlet emptyPortlet" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> </ul> </div> </div> <nav class="vector-appearance-landmark" aria-label="Appearance"> <div id="vector-appearance-dropdown" class="vector-dropdown " title="Change the appearance of the page's font size, width, and color" > <input type="checkbox" id="vector-appearance-dropdown-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-vector-appearance-dropdown" class="vector-dropdown-checkbox " aria-label="Appearance" > <label id="vector-appearance-dropdown-label" for="vector-appearance-dropdown-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet cdx-button--icon-only " aria-hidden="true" ><span class="vector-icon mw-ui-icon-appearance mw-ui-icon-wikimedia-appearance"></span> <span class="vector-dropdown-label-text">Appearance</span> </label> <div class="vector-dropdown-content"> <div id="vector-appearance-unpinned-container" class="vector-unpinned-container"> </div> </div> </div> </nav> <div id="p-vector-user-menu-notifications" class="vector-menu mw-portlet emptyPortlet" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> </ul> </div> </div> <div id="p-vector-user-menu-overflow" class="vector-menu mw-portlet" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="pt-sitesupport-2" class="user-links-collapsible-item mw-list-item user-links-collapsible-item"><a data-mw="interface" href="//donate.wikimedia.org/wiki/Special:FundraiserRedirector?utm_source=donate&utm_medium=sidebar&utm_campaign=C13_haw.wikipedia.org&uselang=haw" class=""><span>E lūlū mai</span></a> </li> <li id="pt-createaccount-2" class="user-links-collapsible-item mw-list-item user-links-collapsible-item"><a data-mw="interface" href="/w/index.php?title=Papa_nui:K%C4%81inoa&returnto=Module%3ACitation%2FCS1" title="You are encouraged to create an account and log in; however, it is not mandatory" class=""><span>Kāinoa</span></a> </li> <li id="pt-login-2" class="user-links-collapsible-item mw-list-item user-links-collapsible-item"><a data-mw="interface" href="/w/index.php?title=Papa_nui:%CA%BBE%CA%BBe&returnto=Module%3ACitation%2FCS1" title="Pai ‘ia ‘oe e ‘e‘e, akā, ‘a‘ole ia he koina [o]" accesskey="o" class=""><span>ʻEʻe</span></a> </li> </ul> </div> </div> </div> <div id="vector-user-links-dropdown" class="vector-dropdown vector-user-menu vector-button-flush-right vector-user-menu-logged-out" title="More options" > <input type="checkbox" id="vector-user-links-dropdown-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-vector-user-links-dropdown" class="vector-dropdown-checkbox " aria-label="Hāmeʻa ponoʻī" > <label id="vector-user-links-dropdown-label" for="vector-user-links-dropdown-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet cdx-button--icon-only " aria-hidden="true" ><span class="vector-icon mw-ui-icon-ellipsis mw-ui-icon-wikimedia-ellipsis"></span> <span class="vector-dropdown-label-text">Hāmeʻa ponoʻī</span> </label> <div class="vector-dropdown-content"> <div id="p-personal" class="vector-menu mw-portlet mw-portlet-personal user-links-collapsible-item" title="User menu" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="pt-sitesupport" class="user-links-collapsible-item mw-list-item"><a href="//donate.wikimedia.org/wiki/Special:FundraiserRedirector?utm_source=donate&utm_medium=sidebar&utm_campaign=C13_haw.wikipedia.org&uselang=haw"><span>E lūlū mai</span></a></li><li id="pt-createaccount" class="user-links-collapsible-item mw-list-item"><a href="/w/index.php?title=Papa_nui:K%C4%81inoa&returnto=Module%3ACitation%2FCS1" title="You are encouraged to create an account and log in; however, it is not mandatory"><span class="vector-icon mw-ui-icon-userAdd mw-ui-icon-wikimedia-userAdd"></span> <span>Kāinoa</span></a></li><li id="pt-login" class="user-links-collapsible-item mw-list-item"><a href="/w/index.php?title=Papa_nui:%CA%BBE%CA%BBe&returnto=Module%3ACitation%2FCS1" title="Pai ‘ia ‘oe e ‘e‘e, akā, ‘a‘ole ia he koina [o]" accesskey="o"><span class="vector-icon mw-ui-icon-logIn mw-ui-icon-wikimedia-logIn"></span> <span>ʻEʻe</span></a></li> </ul> </div> </div> <div id="p-user-menu-anon-editor" class="vector-menu mw-portlet mw-portlet-user-menu-anon-editor" > <div class="vector-menu-heading"> Pages for logged out editors <a href="/wiki/K%C5%8Dkua:Introduction" aria-label="Learn more about editing"><span>learn more</span></a> </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="pt-anoncontribs" class="mw-list-item"><a href="/wiki/Papa_nui:Ka%CA%BBuHa%CA%BBawina" title="A list of edits made from this IP address [y]" accesskey="y"><span>Contributions</span></a></li><li id="pt-anontalk" class="mw-list-item"><a href="/wiki/Papa_nui:Ka%CA%BBuWala%CA%BBau" title="Discussion about edits from this IP address [n]" accesskey="n"><span>Ke kūkākūkā no kēia IP</span></a></li> </ul> </div> </div> </div> </div> </nav> </div> </header> </div> <div class="mw-page-container"> <div class="mw-page-container-inner"> <div class="vector-sitenotice-container"> <div id="siteNotice"><div id="mw-dismissablenotice-anonplace"></div><script>(function(){var node=document.getElementById("mw-dismissablenotice-anonplace");if(node){node.outerHTML="\u003Cdiv class=\"mw-dismissable-notice\"\u003E\u003Cdiv class=\"mw-dismissable-notice-close\"\u003E[\u003Ca tabindex=\"0\" role=\"button\"\u003Edismiss\u003C/a\u003E]\u003C/div\u003E\u003Cdiv class=\"mw-dismissable-notice-body\"\u003E\u003C!-- CentralNotice --\u003E\u003Cdiv id=\"localNotice\" data-nosnippet=\"\"\u003E\u003Cdiv class=\"sitenotice\" lang=\"haw\" dir=\"ltr\"\u003E\u003Cp\u003E\u003Cbig\u003EDo you speak \u003Ca href=\"/wiki/%E2%80%98%C5%8Clelo_Hawai%E2%80%98i\" class=\"mw-redirect\" title=\"‘Ōlelo Hawai‘i\"\u003E‘Ōlelo Hawai‘i\u003C/a\u003E? \u003Cb\u003EHelp us to revive the Hawaiian Wikipedia!\u003C/b\u003E Discuss the future of this project on \u003Ca href=\"/wiki/Wikipedia:Ka_hui_kaiaulu\" title=\"Wikipedia:Ka hui kaiaulu\"\u003EWikipedia:Ka hui kaiaulu\u003C/a\u003E.\u003C/big\u003E\n\u003C/p\u003E\u003C/div\u003E\u003C/div\u003E\u003C/div\u003E\u003C/div\u003E";}}());</script></div> </div> <div class="vector-column-start"> <div class="vector-main-menu-container"> <div id="mw-navigation"> <nav id="mw-panel" class="vector-main-menu-landmark" aria-label="Site"> <div id="vector-main-menu-pinned-container" class="vector-pinned-container"> </div> </nav> </div> </div> </div> <div class="mw-content-container"> <main id="content" class="mw-body"> <header class="mw-body-header vector-page-titlebar"> <h1 id="firstHeading" class="firstHeading mw-first-heading"><span class="mw-page-title-namespace">Module</span><span class="mw-page-title-separator">:</span><span class="mw-page-title-main">Citation/CS1</span></h1> <div id="p-lang-btn" class="vector-dropdown mw-portlet mw-portlet-lang" > <input type="checkbox" id="p-lang-btn-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-p-lang-btn" class="vector-dropdown-checkbox mw-interlanguage-selector" aria-label="Go to an article in another language. Available in 234 languages" > <label id="p-lang-btn-label" for="p-lang-btn-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet cdx-button--action-progressive mw-portlet-lang-heading-234" aria-hidden="true" ><span class="vector-icon mw-ui-icon-language-progressive mw-ui-icon-wikimedia-language-progressive"></span> <span class="vector-dropdown-label-text">234 languages</span> </label> <div class="vector-dropdown-content"> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li class="interlanguage-link interwiki-ab mw-list-item"><a href="https://ab.wikipedia.org/wiki/%D0%90%D0%BC%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Амодуль:Citation/CS1 – Abkhazian" lang="ab" hreflang="ab" data-title="Амодуль:Citation/CS1" data-language-autonym="Аԥсшәа" data-language-local-name="Abkhazian" class="interlanguage-link-target"><span>Аԥсшәа</span></a></li><li class="interlanguage-link interwiki-ace mw-list-item"><a href="https://ace.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Acehnese" lang="ace" hreflang="ace" data-title="Modul:Citation/CS1" data-language-autonym="Acèh" data-language-local-name="Acehnese" class="interlanguage-link-target"><span>Acèh</span></a></li><li class="interlanguage-link interwiki-af mw-list-item"><a href="https://af.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Afrikaans" lang="af" hreflang="af" data-title="Module:Citation/CS1" data-language-autonym="Afrikaans" data-language-local-name="Afrikaans" class="interlanguage-link-target"><span>Afrikaans</span></a></li><li class="interlanguage-link interwiki-ak mw-list-item"><a href="https://ak.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Akan" lang="ak" hreflang="ak" data-title="Module:Citation/CS1" data-language-autonym="ak:Module:Citation/CS1" data-language-local-name="Akan" class="interlanguage-link-target"><span>ak:Module:Citation/CS1</span></a></li><li class="interlanguage-link interwiki-am mw-list-item"><a href="https://am.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Amharic" lang="am" hreflang="am" data-title="Module:Citation/CS1" data-language-autonym="አማርኛ" data-language-local-name="Amharic" class="interlanguage-link-target"><span>አማርኛ</span></a></li><li class="interlanguage-link interwiki-ami mw-list-item"><a href="https://ami.wikipedia.org/wiki/%E6%A8%A1%E7%B5%84:Citation/CS1" title="模組:Citation/CS1 – Amis" lang="ami" hreflang="ami" data-title="模組:Citation/CS1" data-language-autonym="Pangcah" data-language-local-name="Amis" class="interlanguage-link-target"><span>Pangcah</span></a></li><li class="interlanguage-link interwiki-ang mw-list-item"><a href="https://ang.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Old English" lang="ang" hreflang="ang" data-title="Module:Citation/CS1" data-language-autonym="Ænglisc" data-language-local-name="Old English" class="interlanguage-link-target"><span>Ænglisc</span></a></li><li class="interlanguage-link interwiki-anp mw-list-item"><a href="https://anp.wikipedia.org/wiki/%E0%A4%AE%E0%A5%8B%E0%A4%A1%E0%A5%8D%E0%A4%AF%E0%A5%82%E0%A4%B2:Citation/CS1" title="मोड्यूल:Citation/CS1 – Angika" lang="anp" hreflang="anp" data-title="मोड्यूल:Citation/CS1" data-language-autonym="अंगिका" data-language-local-name="Angika" class="interlanguage-link-target"><span>अंगिका</span></a></li><li class="interlanguage-link interwiki-ar mw-list-item"><a href="https://ar.wikipedia.org/wiki/%D9%88%D8%AD%D8%AF%D8%A9:Citation/CS1" title="وحدة:Citation/CS1 – ʻAlapia" lang="ar" hreflang="ar" data-title="وحدة:Citation/CS1" data-language-autonym="العربية" data-language-local-name="ʻAlapia" class="interlanguage-link-target"><span>العربية</span></a></li><li class="interlanguage-link interwiki-arc mw-list-item"><a href="https://arc.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Aramaic" lang="arc" hreflang="arc" data-title="Module:Citation/CS1" data-language-autonym="ܐܪܡܝܐ" data-language-local-name="Aramaic" class="interlanguage-link-target"><span>ܐܪܡܝܐ</span></a></li><li class="interlanguage-link interwiki-ary mw-list-item"><a href="https://ary.wikipedia.org/wiki/%D9%85%D9%88%D8%AF%D9%88%D9%84:Citation/CS1" title="مودول:Citation/CS1 – Moroccan Arabic" lang="ary" hreflang="ary" data-title="مودول:Citation/CS1" data-language-autonym="الدارجة" data-language-local-name="Moroccan Arabic" class="interlanguage-link-target"><span>الدارجة</span></a></li><li class="interlanguage-link interwiki-arz mw-list-item"><a href="https://arz.wikipedia.org/wiki/%D9%88%D8%AD%D8%AF%D8%A9:Citation/CS1" title="وحدة:Citation/CS1 – Egyptian Arabic" lang="arz" hreflang="arz" data-title="وحدة:Citation/CS1" data-language-autonym="مصرى" data-language-local-name="Egyptian Arabic" class="interlanguage-link-target"><span>مصرى</span></a></li><li class="interlanguage-link interwiki-as mw-list-item"><a href="https://as.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Assamese" lang="as" hreflang="as" data-title="Module:Citation/CS1" data-language-autonym="অসমীয়া" data-language-local-name="Assamese" class="interlanguage-link-target"><span>অসমীয়া</span></a></li><li class="interlanguage-link interwiki-ast mw-list-item"><a href="https://ast.wikipedia.org/wiki/M%C3%B3dulu:Cites/CS1" title="Módulu:Cites/CS1 – Asturian" lang="ast" hreflang="ast" data-title="Módulu:Cites/CS1" data-language-autonym="Asturianu" data-language-local-name="Asturian" class="interlanguage-link-target"><span>Asturianu</span></a></li><li class="interlanguage-link interwiki-av mw-list-item"><a href="https://av.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Avaric" lang="av" hreflang="av" data-title="Модуль:Citation/CS1" data-language-autonym="Авар" data-language-local-name="Avaric" class="interlanguage-link-target"><span>Авар</span></a></li><li class="interlanguage-link interwiki-awa mw-list-item"><a href="https://awa.wikipedia.org/wiki/%E0%A4%85%E0%A4%A8%E0%A5%81%E0%A4%96%E0%A4%82%E0%A4%A1:Citation/CS1" title="अनुखंड:Citation/CS1 – Awadhi" lang="awa" hreflang="awa" data-title="अनुखंड:Citation/CS1" data-language-autonym="अवधी" data-language-local-name="Awadhi" class="interlanguage-link-target"><span>अवधी</span></a></li><li class="interlanguage-link interwiki-ay mw-list-item"><a href="https://ay.wikipedia.org/wiki/M%C3%B3dulo:Citation/CS1" title="Módulo:Citation/CS1 – Aymara" lang="ay" hreflang="ay" data-title="Módulo:Citation/CS1" data-language-autonym="Aymar aru" data-language-local-name="Aymara" class="interlanguage-link-target"><span>Aymar aru</span></a></li><li class="interlanguage-link interwiki-az mw-list-item"><a href="https://az.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Azerbaijani" lang="az" hreflang="az" data-title="Modul:Citation/CS1" data-language-autonym="Azərbaycanca" data-language-local-name="Azerbaijani" class="interlanguage-link-target"><span>Azərbaycanca</span></a></li><li class="interlanguage-link interwiki-azb mw-list-item"><a href="https://azb.wikipedia.org/wiki/%D9%85%D8%A7%DA%98%D9%88%D9%84:Citation/CS1" title="ماژول:Citation/CS1 – South Azerbaijani" lang="azb" hreflang="azb" data-title="ماژول:Citation/CS1" data-language-autonym="تۆرکجه" data-language-local-name="South Azerbaijani" class="interlanguage-link-target"><span>تۆرکجه</span></a></li><li class="interlanguage-link interwiki-ba mw-list-item"><a href="https://ba.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Bashkir" lang="ba" hreflang="ba" data-title="Модуль:Citation/CS1" data-language-autonym="Башҡортса" data-language-local-name="Bashkir" class="interlanguage-link-target"><span>Башҡортса</span></a></li><li class="interlanguage-link interwiki-ban mw-list-item"><a href="https://ban.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Balinese" lang="ban" hreflang="ban" data-title="Modul:Citation/CS1" data-language-autonym="Basa Bali" data-language-local-name="Balinese" class="interlanguage-link-target"><span>Basa Bali</span></a></li><li class="interlanguage-link interwiki-bar mw-list-item"><a href="https://bar.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Bavarian" lang="bar" hreflang="bar" data-title="Modul:Citation/CS1" data-language-autonym="Boarisch" data-language-local-name="Bavarian" class="interlanguage-link-target"><span>Boarisch</span></a></li><li class="interlanguage-link interwiki-bcl mw-list-item"><a href="https://bcl.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Central Bikol" lang="bcl" hreflang="bcl" data-title="Module:Citation/CS1" data-language-autonym="Bikol Central" data-language-local-name="Central Bikol" class="interlanguage-link-target"><span>Bikol Central</span></a></li><li class="interlanguage-link interwiki-be mw-list-item"><a href="https://be.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Belarusian" lang="be" hreflang="be" data-title="Модуль:Citation/CS1" data-language-autonym="Беларуская" data-language-local-name="Belarusian" class="interlanguage-link-target"><span>Беларуская</span></a></li><li class="interlanguage-link interwiki-bg mw-list-item"><a href="https://bg.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB:Citation/CS1" title="Модул:Citation/CS1 – Bulgarian" lang="bg" hreflang="bg" data-title="Модул:Citation/CS1" data-language-autonym="Български" data-language-local-name="Bulgarian" class="interlanguage-link-target"><span>Български</span></a></li><li class="interlanguage-link interwiki-bh mw-list-item"><a href="https://bh.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Bhojpuri" lang="bh" hreflang="bh" data-title="Module:Citation/CS1" data-language-autonym="भोजपुरी" data-language-local-name="Bhojpuri" class="interlanguage-link-target"><span>भोजपुरी</span></a></li><li class="interlanguage-link interwiki-bi mw-list-item"><a href="https://bi.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Bislama" lang="bi" hreflang="bi" data-title="Module:Citation/CS1" data-language-autonym="Bislama" data-language-local-name="Bislama" class="interlanguage-link-target"><span>Bislama</span></a></li><li class="interlanguage-link interwiki-bjn mw-list-item"><a href="https://bjn.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Banjar" lang="bjn" hreflang="bjn" data-title="Modul:Citation/CS1" data-language-autonym="Banjar" data-language-local-name="Banjar" class="interlanguage-link-target"><span>Banjar</span></a></li><li class="interlanguage-link interwiki-blk mw-list-item"><a href="https://blk.wikipedia.org/wiki/%E1%80%99%E1%80%B1%E1%80%AC%E1%80%BA%E1%80%82%E1%80%BB%E1%80%B0%E1%80%B8:Citation/CS1" title="မော်ဂျူး:Citation/CS1 – Pa'O" lang="blk" hreflang="blk" data-title="မော်ဂျူး:Citation/CS1" data-language-autonym="ပအိုဝ်ႏဘာႏသာႏ" data-language-local-name="Pa'O" class="interlanguage-link-target"><span>ပအိုဝ်ႏဘာႏသာႏ</span></a></li><li class="interlanguage-link interwiki-bm mw-list-item"><a href="https://bm.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Bambara" lang="bm" hreflang="bm" data-title="Module:Citation/CS1" data-language-autonym="Bamanankan" data-language-local-name="Bambara" class="interlanguage-link-target"><span>Bamanankan</span></a></li><li class="interlanguage-link interwiki-bn mw-list-item"><a href="https://bn.wikipedia.org/wiki/%E0%A6%AE%E0%A6%A1%E0%A6%BF%E0%A6%89%E0%A6%B2:%E0%A6%89%E0%A6%A6%E0%A7%8D%E0%A6%A7%E0%A7%83%E0%A6%A4%E0%A6%BF" title="মডিউল:উদ্ধৃতি – Bangla" lang="bn" hreflang="bn" data-title="মডিউল:উদ্ধৃতি" data-language-autonym="বাংলা" data-language-local-name="Bangla" class="interlanguage-link-target"><span>বাংলা</span></a></li><li class="interlanguage-link interwiki-bo mw-list-item"><a href="https://bo.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Tibetan" lang="bo" hreflang="bo" data-title="Module:Citation/CS1" data-language-autonym="བོད་ཡིག" data-language-local-name="Tibetan" class="interlanguage-link-target"><span>བོད་ཡིག</span></a></li><li class="interlanguage-link interwiki-br mw-list-item"><a href="https://br.wikipedia.org/wiki/Modulenn:Citation/CS1" title="Modulenn:Citation/CS1 – Breton" lang="br" hreflang="br" data-title="Modulenn:Citation/CS1" data-language-autonym="Brezhoneg" data-language-local-name="Breton" class="interlanguage-link-target"><span>Brezhoneg</span></a></li><li class="interlanguage-link interwiki-bs mw-list-item"><a href="https://bs.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Bosnian" lang="bs" hreflang="bs" data-title="Modul:Citation/CS1" data-language-autonym="Bosanski" data-language-local-name="Bosnian" class="interlanguage-link-target"><span>Bosanski</span></a></li><li class="interlanguage-link interwiki-bug mw-list-item"><a href="https://bug.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Buginese" lang="bug" hreflang="bug" data-title="Modul:Citation/CS1" data-language-autonym="Basa Ugi" data-language-local-name="Buginese" class="interlanguage-link-target"><span>Basa Ugi</span></a></li><li class="interlanguage-link interwiki-bxr mw-list-item"><a href="https://bxr.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Russia Buriat" lang="bxr" hreflang="bxr" data-title="Модуль:Citation/CS1" data-language-autonym="Буряад" data-language-local-name="Russia Buriat" class="interlanguage-link-target"><span>Буряад</span></a></li><li class="interlanguage-link interwiki-ca mw-list-item"><a href="https://ca.wikipedia.org/wiki/M%C3%B2dul:Citation/CS1" title="Mòdul:Citation/CS1 – Catalan" lang="ca" hreflang="ca" data-title="Mòdul:Citation/CS1" data-language-autonym="Català" data-language-local-name="Catalan" class="interlanguage-link-target"><span>Català</span></a></li><li class="interlanguage-link interwiki-cbk-zam mw-list-item"><a href="https://cbk-zam.wikipedia.org/wiki/M%C3%B3dulo:Citation/CS1" title="Módulo:Citation/CS1 – Chavacano" lang="cbk" hreflang="cbk" data-title="Módulo:Citation/CS1" data-language-autonym="Chavacano de Zamboanga" data-language-local-name="Chavacano" class="interlanguage-link-target"><span>Chavacano de Zamboanga</span></a></li><li class="interlanguage-link interwiki-cdo mw-list-item"><a href="https://cdo.wikipedia.org/wiki/%E6%A8%A1%E7%B5%84:Citation/CS1" title="模組:Citation/CS1 – Mindong" lang="cdo" hreflang="cdo" data-title="模組:Citation/CS1" data-language-autonym="閩東語 / Mìng-dĕ̤ng-ngṳ̄" data-language-local-name="Mindong" class="interlanguage-link-target"><span>閩東語 / Mìng-dĕ̤ng-ngṳ̄</span></a></li><li class="interlanguage-link interwiki-ce mw-list-item"><a href="https://ce.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Chechen" lang="ce" hreflang="ce" data-title="Модуль:Citation/CS1" data-language-autonym="Нохчийн" data-language-local-name="Chechen" class="interlanguage-link-target"><span>Нохчийн</span></a></li><li class="interlanguage-link interwiki-ceb mw-list-item"><a href="https://ceb.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Cebuano" lang="ceb" hreflang="ceb" data-title="Module:Citation/CS1" data-language-autonym="Cebuano" data-language-local-name="Cebuano" class="interlanguage-link-target"><span>Cebuano</span></a></li><li class="interlanguage-link interwiki-ch mw-list-item"><a href="https://ch.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Chamorro" lang="ch" hreflang="ch" data-title="Module:Citation/CS1" data-language-autonym="Chamoru" data-language-local-name="Chamorro" class="interlanguage-link-target"><span>Chamoru</span></a></li><li class="interlanguage-link interwiki-chr mw-list-item"><a href="https://chr.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Cherokee" lang="chr" hreflang="chr" data-title="Module:Citation/CS1" data-language-autonym="ᏣᎳᎩ" data-language-local-name="Cherokee" class="interlanguage-link-target"><span>ᏣᎳᎩ</span></a></li><li class="interlanguage-link interwiki-ckb mw-list-item"><a href="https://ckb.wikipedia.org/wiki/%D9%85%DB%86%D8%AF%DB%8C%D9%88%D9%88%D9%84:Citation/CS1" title="مۆدیوول:Citation/CS1 – Central Kurdish" lang="ckb" hreflang="ckb" data-title="مۆدیوول:Citation/CS1" data-language-autonym="کوردی" data-language-local-name="Central Kurdish" class="interlanguage-link-target"><span>کوردی</span></a></li><li class="interlanguage-link interwiki-co mw-list-item"><a href="https://co.wikipedia.org/wiki/Modulo:Citation/CS1" title="Modulo:Citation/CS1 – Corsican" lang="co" hreflang="co" data-title="Modulo:Citation/CS1" data-language-autonym="Corsu" data-language-local-name="Corsican" class="interlanguage-link-target"><span>Corsu</span></a></li><li class="interlanguage-link interwiki-crh mw-list-item"><a href="https://crh.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Crimean Tatar" lang="crh" hreflang="crh" data-title="Modul:Citation/CS1" data-language-autonym="Qırımtatarca" data-language-local-name="Crimean Tatar" class="interlanguage-link-target"><span>Qırımtatarca</span></a></li><li class="interlanguage-link interwiki-cv mw-list-item"><a href="https://cv.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Chuvash" lang="cv" hreflang="cv" data-title="Модуль:Citation/CS1" data-language-autonym="Чӑвашла" data-language-local-name="Chuvash" class="interlanguage-link-target"><span>Чӑвашла</span></a></li><li class="interlanguage-link interwiki-cy mw-list-item"><a href="https://cy.wikipedia.org/wiki/Modiwl:Citation/CS1" title="Modiwl:Citation/CS1 – Wale" lang="cy" hreflang="cy" data-title="Modiwl:Citation/CS1" data-language-autonym="Cymraeg" data-language-local-name="Wale" class="interlanguage-link-target"><span>Cymraeg</span></a></li><li class="interlanguage-link interwiki-da mw-list-item"><a href="https://da.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Kenemaka" lang="da" hreflang="da" data-title="Modul:Citation/CS1" data-language-autonym="Dansk" data-language-local-name="Kenemaka" class="interlanguage-link-target"><span>Dansk</span></a></li><li class="interlanguage-link interwiki-dag mw-list-item"><a href="https://dag.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Dagbani" lang="dag" hreflang="dag" data-title="Module:Citation/CS1" data-language-autonym="Dagbanli" data-language-local-name="Dagbani" class="interlanguage-link-target"><span>Dagbanli</span></a></li><li class="interlanguage-link interwiki-din mw-list-item"><a href="https://din.wikipedia.org/wiki/Muk%C3%A4%C3%A4c%C3%ABt%C3%B6k:Citation/CS1" title="Mukääcëtök:Citation/CS1 – Dinka" lang="din" hreflang="din" data-title="Mukääcëtök:Citation/CS1" data-language-autonym="Thuɔŋjäŋ" data-language-local-name="Dinka" class="interlanguage-link-target"><span>Thuɔŋjäŋ</span></a></li><li class="interlanguage-link interwiki-diq mw-list-item"><a href="https://diq.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Zazaki" lang="diq" hreflang="diq" data-title="Modul:Citation/CS1" data-language-autonym="Zazaki" data-language-local-name="Zazaki" class="interlanguage-link-target"><span>Zazaki</span></a></li><li class="interlanguage-link interwiki-dtp mw-list-item"><a href="https://dtp.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Central Dusun" lang="dtp" hreflang="dtp" data-title="Modul:Citation/CS1" data-language-autonym="Kadazandusun" data-language-local-name="Central Dusun" class="interlanguage-link-target"><span>Kadazandusun</span></a></li><li class="interlanguage-link interwiki-dty mw-list-item"><a href="https://dty.wikipedia.org/wiki/%E0%A4%AE%E0%A5%8B%E0%A4%A1%E0%A5%8D%E0%A4%AF%E0%A5%81%E0%A4%B2:Citation/CS1" title="मोड्युल:Citation/CS1 – Doteli" lang="dty" hreflang="dty" data-title="मोड्युल:Citation/CS1" data-language-autonym="डोटेली" data-language-local-name="Doteli" class="interlanguage-link-target"><span>डोटेली</span></a></li><li class="interlanguage-link interwiki-dv mw-list-item"><a href="https://dv.wikipedia.org/wiki/%DE%89%DE%AE%DE%91%DE%A8%DE%87%DE%AA%DE%8D%DE%B0:Citation/CS1" title="މޮޑިއުލް:Citation/CS1 – Divehi" lang="dv" hreflang="dv" data-title="މޮޑިއުލް:Citation/CS1" data-language-autonym="ދިވެހިބަސް" data-language-local-name="Divehi" class="interlanguage-link-target"><span>ދިވެހިބަސް</span></a></li><li class="interlanguage-link interwiki-dz mw-list-item"><a href="https://dz.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Dzongkha" lang="dz" hreflang="dz" data-title="Module:Citation/CS1" data-language-autonym="ཇོང་ཁ" data-language-local-name="Dzongkha" class="interlanguage-link-target"><span>ཇོང་ཁ</span></a></li><li class="interlanguage-link interwiki-ee mw-list-item"><a href="https://ee.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Ewe" lang="ee" hreflang="ee" data-title="Module:Citation/CS1" data-language-autonym="Eʋegbe" data-language-local-name="Ewe" class="interlanguage-link-target"><span>Eʋegbe</span></a></li><li class="interlanguage-link interwiki-el mw-list-item"><a href="https://el.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Helene" lang="el" hreflang="el" data-title="Module:Citation/CS1" data-language-autonym="Ελληνικά" data-language-local-name="Helene" class="interlanguage-link-target"><span>Ελληνικά</span></a></li><li class="interlanguage-link interwiki-en mw-list-item"><a href="https://en.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Pelekānia" lang="en" hreflang="en" data-title="Module:Citation/CS1" data-language-autonym="English" data-language-local-name="Pelekānia" class="interlanguage-link-target"><span>English</span></a></li><li class="interlanguage-link interwiki-es mw-list-item"><a href="https://es.wikipedia.org/wiki/M%C3%B3dulo:Citas" title="Módulo:Citas – Paniolo" lang="es" hreflang="es" data-title="Módulo:Citas" data-language-autonym="Español" data-language-local-name="Paniolo" class="interlanguage-link-target"><span>Español</span></a></li><li class="interlanguage-link interwiki-et mw-list-item"><a href="https://et.wikipedia.org/wiki/Moodul:Citation/CS1" title="Moodul:Citation/CS1 – Estonian" lang="et" hreflang="et" data-title="Moodul:Citation/CS1" data-language-autonym="Eesti" data-language-local-name="Estonian" class="interlanguage-link-target"><span>Eesti</span></a></li><li class="interlanguage-link interwiki-eu mw-list-item"><a href="https://eu.wikipedia.org/wiki/Modulu:Citation/CS1" title="Modulu:Citation/CS1 – Basque" lang="eu" hreflang="eu" data-title="Modulu:Citation/CS1" data-language-autonym="Euskara" data-language-local-name="Basque" class="interlanguage-link-target"><span>Euskara</span></a></li><li class="interlanguage-link interwiki-ext mw-list-item"><a href="https://ext.wikipedia.org/wiki/M%C3%B3dulo:Citation/CS1" title="Módulo:Citation/CS1 – Extremaduran" lang="ext" hreflang="ext" data-title="Módulo:Citation/CS1" data-language-autonym="Estremeñu" data-language-local-name="Extremaduran" class="interlanguage-link-target"><span>Estremeñu</span></a></li><li class="interlanguage-link interwiki-fa mw-list-item"><a href="https://fa.wikipedia.org/wiki/%D9%BE%D9%88%D8%AF%D9%85%D8%A7%D9%86:Citation/CS1/en" title="پودمان:Citation/CS1/en – Persian" lang="fa" hreflang="fa" data-title="پودمان:Citation/CS1/en" data-language-autonym="فارسی" data-language-local-name="Persian" class="interlanguage-link-target"><span>فارسی</span></a></li><li class="interlanguage-link interwiki-ff mw-list-item"><a href="https://ff.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Fula" lang="ff" hreflang="ff" data-title="Module:Citation/CS1" data-language-autonym="Fulfulde" data-language-local-name="Fula" class="interlanguage-link-target"><span>Fulfulde</span></a></li><li class="interlanguage-link interwiki-fj mw-list-item"><a href="https://fj.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Pīkī" lang="fj" hreflang="fj" data-title="Module:Citation/CS1" data-language-autonym="Na Vosa Vakaviti" data-language-local-name="Pīkī" class="interlanguage-link-target"><span>Na Vosa Vakaviti</span></a></li><li class="interlanguage-link interwiki-fo mw-list-item"><a href="https://fo.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Faroese" lang="fo" hreflang="fo" data-title="Module:Citation/CS1" data-language-autonym="Føroyskt" data-language-local-name="Faroese" class="interlanguage-link-target"><span>Føroyskt</span></a></li><li class="interlanguage-link interwiki-frr mw-list-item"><a href="https://frr.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Northern Frisian" lang="frr" hreflang="frr" data-title="Modul:Citation/CS1" data-language-autonym="Nordfriisk" data-language-local-name="Northern Frisian" class="interlanguage-link-target"><span>Nordfriisk</span></a></li><li class="interlanguage-link interwiki-ga mw-list-item"><a href="https://ga.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – ʻAiliki" lang="ga" hreflang="ga" data-title="Module:Citation/CS1" data-language-autonym="Gaeilge" data-language-local-name="ʻAiliki" class="interlanguage-link-target"><span>Gaeilge</span></a></li><li class="interlanguage-link interwiki-gd mw-list-item"><a href="https://gd.wikipedia.org/wiki/M%C3%B2ideal:Citation/CS1" title="Mòideal:Citation/CS1 – Scottish Gaelic" lang="gd" hreflang="gd" data-title="Mòideal:Citation/CS1" data-language-autonym="Gàidhlig" data-language-local-name="Scottish Gaelic" class="interlanguage-link-target"><span>Gàidhlig</span></a></li><li class="interlanguage-link interwiki-gl mw-list-item"><a href="https://gl.wikipedia.org/wiki/M%C3%B3dulo:Citas" title="Módulo:Citas – Galician" lang="gl" hreflang="gl" data-title="Módulo:Citas" data-language-autonym="Galego" data-language-local-name="Galician" class="interlanguage-link-target"><span>Galego</span></a></li><li class="interlanguage-link interwiki-glk mw-list-item"><a href="https://glk.wikipedia.org/wiki/%D9%85%D8%A7%D8%AC%DB%8A%D9%84:Citation/CS1" title="ماجۊل:Citation/CS1 – Gilaki" lang="glk" hreflang="glk" data-title="ماجۊل:Citation/CS1" data-language-autonym="گیلکی" data-language-local-name="Gilaki" class="interlanguage-link-target"><span>گیلکی</span></a></li><li class="interlanguage-link interwiki-gn mw-list-item"><a href="https://gn.wikipedia.org/wiki/M%C3%B3dulo:Citation/CS1" title="Módulo:Citation/CS1 – Guarani" lang="gn" hreflang="gn" data-title="Módulo:Citation/CS1" data-language-autonym="Avañe'ẽ" data-language-local-name="Guarani" class="interlanguage-link-target"><span>Avañe'ẽ</span></a></li><li class="interlanguage-link interwiki-gom mw-list-item"><a href="https://gom.wikipedia.org/wiki/%E0%A4%8F%E0%A4%95%E0%A4%95:Citation/CS1" title="एकक:Citation/CS1 – Goan Konkani" lang="gom" hreflang="gom" data-title="एकक:Citation/CS1" data-language-autonym="गोंयची कोंकणी / Gõychi Konknni" data-language-local-name="Goan Konkani" class="interlanguage-link-target"><span>गोंयची कोंकणी / Gõychi Konknni</span></a></li><li class="interlanguage-link interwiki-gor mw-list-item"><a href="https://gor.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Gorontalo" lang="gor" hreflang="gor" data-title="Modul:Citation/CS1" data-language-autonym="Bahasa Hulontalo" data-language-local-name="Gorontalo" class="interlanguage-link-target"><span>Bahasa Hulontalo</span></a></li><li class="interlanguage-link interwiki-gu mw-list-item"><a href="https://gu.wikipedia.org/wiki/%E0%AA%B5%E0%AA%BF%E0%AA%AD%E0%AA%BE%E0%AA%97:Citation/CS1" title="વિભાગ:Citation/CS1 – Gujarati" lang="gu" hreflang="gu" data-title="વિભાગ:Citation/CS1" data-language-autonym="ગુજરાતી" data-language-local-name="Gujarati" class="interlanguage-link-target"><span>ગુજરાતી</span></a></li><li class="interlanguage-link interwiki-gur mw-list-item"><a href="https://gur.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Frafra" lang="gur" hreflang="gur" data-title="Module:Citation/CS1" data-language-autonym="Farefare" data-language-local-name="Frafra" class="interlanguage-link-target"><span>Farefare</span></a></li><li class="interlanguage-link interwiki-guw mw-list-item"><a href="https://guw.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Gun" lang="guw" hreflang="guw" data-title="Module:Citation/CS1" data-language-autonym="Gungbe" data-language-local-name="Gun" class="interlanguage-link-target"><span>Gungbe</span></a></li><li class="interlanguage-link interwiki-gv mw-list-item"><a href="https://gv.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Manx" lang="gv" hreflang="gv" data-title="Module:Citation/CS1" data-language-autonym="Gaelg" data-language-local-name="Manx" class="interlanguage-link-target"><span>Gaelg</span></a></li><li class="interlanguage-link interwiki-ha mw-list-item"><a href="https://ha.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Hausa" lang="ha" hreflang="ha" data-title="Module:Citation/CS1" data-language-autonym="Hausa" data-language-local-name="Hausa" class="interlanguage-link-target"><span>Hausa</span></a></li><li class="interlanguage-link interwiki-hak mw-list-item"><a href="https://hak.wikipedia.org/wiki/%E6%A8%A1%E7%B5%84:Citation/CS1" title="模組:Citation/CS1 – Hakka Chinese" lang="hak" hreflang="hak" data-title="模組:Citation/CS1" data-language-autonym="客家語 / Hak-kâ-ngî" data-language-local-name="Hakka Chinese" class="interlanguage-link-target"><span>客家語 / Hak-kâ-ngî</span></a></li><li class="interlanguage-link interwiki-he mw-list-item"><a href="https://he.wikipedia.org/wiki/%D7%99%D7%97%D7%99%D7%93%D7%94:Citation/CS1" title="יחידה:Citation/CS1 – Hebera" lang="he" hreflang="he" data-title="יחידה:Citation/CS1" data-language-autonym="עברית" data-language-local-name="Hebera" class="interlanguage-link-target"><span>עברית</span></a></li><li class="interlanguage-link interwiki-hi mw-list-item"><a href="https://hi.wikipedia.org/wiki/%E0%A4%AE%E0%A5%89%E0%A4%A1%E0%A5%8D%E0%A4%AF%E0%A5%82%E0%A4%B2:Citation/CS1" title="मॉड्यूल:Citation/CS1 – Hindi" lang="hi" hreflang="hi" data-title="मॉड्यूल:Citation/CS1" data-language-autonym="हिन्दी" data-language-local-name="Hindi" class="interlanguage-link-target"><span>हिन्दी</span></a></li><li class="interlanguage-link interwiki-hif mw-list-item"><a href="https://hif.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Fiji Hindi" lang="hif" hreflang="hif" data-title="Module:Citation/CS1" data-language-autonym="Fiji Hindi" data-language-local-name="Fiji Hindi" class="interlanguage-link-target"><span>Fiji Hindi</span></a></li><li class="interlanguage-link interwiki-hr mw-list-item"><a href="https://hr.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Croatian" lang="hr" hreflang="hr" data-title="Modul:Citation/CS1" data-language-autonym="Hrvatski" data-language-local-name="Croatian" class="interlanguage-link-target"><span>Hrvatski</span></a></li><li class="interlanguage-link interwiki-ht mw-list-item"><a href="https://ht.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Haitian Creole" lang="ht" hreflang="ht" data-title="Module:Citation/CS1" data-language-autonym="Kreyòl ayisyen" data-language-local-name="Haitian Creole" class="interlanguage-link-target"><span>Kreyòl ayisyen</span></a></li><li class="interlanguage-link interwiki-hu mw-list-item"><a href="https://hu.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Hungarian" lang="hu" hreflang="hu" data-title="Modul:Citation/CS1" data-language-autonym="Magyar" data-language-local-name="Hungarian" class="interlanguage-link-target"><span>Magyar</span></a></li><li class="interlanguage-link interwiki-hy mw-list-item"><a href="https://hy.wikipedia.org/wiki/%D5%84%D5%B8%D5%A4%D5%B8%D6%82%D5%AC:Citation/CS1" title="Մոդուլ:Citation/CS1 – Armenian" lang="hy" hreflang="hy" data-title="Մոդուլ:Citation/CS1" data-language-autonym="Հայերեն" data-language-local-name="Armenian" class="interlanguage-link-target"><span>Հայերեն</span></a></li><li class="interlanguage-link interwiki-hyw mw-list-item"><a href="https://hyw.wikipedia.org/wiki/%D5%84%D5%B8%D5%A4%D5%B8%D6%82%D5%AC:Citation/CS1" title="Մոդուլ:Citation/CS1 – Western Armenian" lang="hyw" hreflang="hyw" data-title="Մոդուլ:Citation/CS1" data-language-autonym="Արեւմտահայերէն" data-language-local-name="Western Armenian" class="interlanguage-link-target"><span>Արեւմտահայերէն</span></a></li><li class="interlanguage-link interwiki-ia mw-list-item"><a href="https://ia.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Interlingua" lang="ia" hreflang="ia" data-title="Module:Citation/CS1" data-language-autonym="Interlingua" data-language-local-name="Interlingua" class="interlanguage-link-target"><span>Interlingua</span></a></li><li class="interlanguage-link interwiki-iba mw-list-item"><a href="https://iba.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Iban" lang="iba" hreflang="iba" data-title="Modul:Citation/CS1" data-language-autonym="Jaku Iban" data-language-local-name="Iban" class="interlanguage-link-target"><span>Jaku Iban</span></a></li><li class="interlanguage-link interwiki-id mw-list-item"><a href="https://id.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Indonesian" lang="id" hreflang="id" data-title="Modul:Citation/CS1" data-language-autonym="Bahasa Indonesia" data-language-local-name="Indonesian" class="interlanguage-link-target"><span>Bahasa Indonesia</span></a></li><li class="interlanguage-link interwiki-ie mw-list-item"><a href="https://ie.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Interlingue" lang="ie" hreflang="ie" data-title="Module:Citation/CS1" data-language-autonym="Interlingue" data-language-local-name="Interlingue" class="interlanguage-link-target"><span>Interlingue</span></a></li><li class="interlanguage-link interwiki-ig mw-list-item"><a href="https://ig.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Igbo" lang="ig" hreflang="ig" data-title="Module:Citation/CS1" data-language-autonym="Igbo" data-language-local-name="Igbo" class="interlanguage-link-target"><span>Igbo</span></a></li><li class="interlanguage-link interwiki-ilo mw-list-item"><a href="https://ilo.wikipedia.org/wiki/Modulo:Citation/CS1" title="Modulo:Citation/CS1 – Iloko" lang="ilo" hreflang="ilo" data-title="Modulo:Citation/CS1" data-language-autonym="Ilokano" data-language-local-name="Iloko" class="interlanguage-link-target"><span>Ilokano</span></a></li><li class="interlanguage-link interwiki-io mw-list-item"><a href="https://io.wikipedia.org/wiki/Modulo:Citation/CS1" title="Modulo:Citation/CS1 – Ido" lang="io" hreflang="io" data-title="Modulo:Citation/CS1" data-language-autonym="Ido" data-language-local-name="Ido" class="interlanguage-link-target"><span>Ido</span></a></li><li class="interlanguage-link interwiki-is mw-list-item"><a href="https://is.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Icelandic" lang="is" hreflang="is" data-title="Module:Citation/CS1" data-language-autonym="Íslenska" data-language-local-name="Icelandic" class="interlanguage-link-target"><span>Íslenska</span></a></li><li class="interlanguage-link interwiki-it mw-list-item"><a href="https://it.wikipedia.org/wiki/Modulo:Citazione" title="Modulo:Citazione – ʻĪkālia" lang="it" hreflang="it" data-title="Modulo:Citazione" data-language-autonym="Italiano" data-language-local-name="ʻĪkālia" class="interlanguage-link-target"><span>Italiano</span></a></li><li class="interlanguage-link interwiki-ja mw-list-item"><a href="https://ja.wikipedia.org/wiki/%E3%83%A2%E3%82%B8%E3%83%A5%E3%83%BC%E3%83%AB:Citation/CS1" title="モジュール:Citation/CS1 – Kepanī" lang="ja" hreflang="ja" data-title="モジュール:Citation/CS1" data-language-autonym="日本語" data-language-local-name="Kepanī" class="interlanguage-link-target"><span>日本語</span></a></li><li class="interlanguage-link interwiki-jv mw-list-item"><a href="https://jv.wikipedia.org/wiki/Modhul:Citation/CS1" title="Modhul:Citation/CS1 – Javanese" lang="jv" hreflang="jv" data-title="Modhul:Citation/CS1" data-language-autonym="Jawa" data-language-local-name="Javanese" class="interlanguage-link-target"><span>Jawa</span></a></li><li class="interlanguage-link interwiki-ka mw-list-item"><a href="https://ka.wikipedia.org/wiki/%E1%83%9B%E1%83%9D%E1%83%93%E1%83%A3%E1%83%9A%E1%83%98:Citation/CS1" title="მოდული:Citation/CS1 – Georgian" lang="ka" hreflang="ka" data-title="მოდული:Citation/CS1" data-language-autonym="ქართული" data-language-local-name="Georgian" class="interlanguage-link-target"><span>ქართული</span></a></li><li class="interlanguage-link interwiki-kaa mw-list-item"><a href="https://kaa.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Kara-Kalpak" lang="kaa" hreflang="kaa" data-title="Module:Citation/CS1" data-language-autonym="Qaraqalpaqsha" data-language-local-name="Kara-Kalpak" class="interlanguage-link-target"><span>Qaraqalpaqsha</span></a></li><li class="interlanguage-link interwiki-kab mw-list-item"><a href="https://kab.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Kabyle" lang="kab" hreflang="kab" data-title="Module:Citation/CS1" data-language-autonym="Taqbaylit" data-language-local-name="Kabyle" class="interlanguage-link-target"><span>Taqbaylit</span></a></li><li class="interlanguage-link interwiki-kcg mw-list-item"><a href="https://kcg.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Tyap" lang="kcg" hreflang="kcg" data-title="Module:Citation/CS1" data-language-autonym="Tyap" data-language-local-name="Tyap" class="interlanguage-link-target"><span>Tyap</span></a></li><li class="interlanguage-link interwiki-kk mw-list-item"><a href="https://kk.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Kazakh" lang="kk" hreflang="kk" data-title="Module:Citation/CS1" data-language-autonym="Қазақша" data-language-local-name="Kazakh" class="interlanguage-link-target"><span>Қазақша</span></a></li><li class="interlanguage-link interwiki-km mw-list-item"><a href="https://km.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Khmer" lang="km" hreflang="km" data-title="Module:Citation/CS1" data-language-autonym="ភាសាខ្មែរ" data-language-local-name="Khmer" class="interlanguage-link-target"><span>ភាសាខ្មែរ</span></a></li><li class="interlanguage-link interwiki-kn mw-list-item"><a href="https://kn.wikipedia.org/wiki/%E0%B2%AE%E0%B2%BE%E0%B2%A1%E0%B3%8D%E0%B2%AF%E0%B3%82%E0%B2%B2%E0%B3%8D:Citation/CS1" title="ಮಾಡ್ಯೂಲ್:Citation/CS1 – Kannada" lang="kn" hreflang="kn" data-title="ಮಾಡ್ಯೂಲ್:Citation/CS1" data-language-autonym="ಕನ್ನಡ" data-language-local-name="Kannada" class="interlanguage-link-target"><span>ಕನ್ನಡ</span></a></li><li class="interlanguage-link interwiki-ko mw-list-item"><a href="https://ko.wikipedia.org/wiki/%EB%AA%A8%EB%93%88:Citation/CS1" title="모듈:Citation/CS1 – Kōlea" lang="ko" hreflang="ko" data-title="모듈:Citation/CS1" data-language-autonym="한국어" data-language-local-name="Kōlea" class="interlanguage-link-target"><span>한국어</span></a></li><li class="interlanguage-link interwiki-ks mw-list-item"><a href="https://ks.wikipedia.org/wiki/%D9%85%D8%A7%DA%88%DB%8C%D9%88%D9%97%D9%84:Citation/CS1" title="ماڈیوٗل:Citation/CS1 – Kashmiri" lang="ks" hreflang="ks" data-title="ماڈیوٗل:Citation/CS1" data-language-autonym="कॉशुर / کٲشُر" data-language-local-name="Kashmiri" class="interlanguage-link-target"><span>कॉशुर / کٲشُر</span></a></li><li class="interlanguage-link interwiki-ku mw-list-item"><a href="https://ku.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Kurdish" lang="ku" hreflang="ku" data-title="Modul:Citation/CS1" data-language-autonym="Kurdî" data-language-local-name="Kurdish" class="interlanguage-link-target"><span>Kurdî</span></a></li><li class="interlanguage-link interwiki-kw mw-list-item"><a href="https://kw.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Cornish" lang="kw" hreflang="kw" data-title="Module:Citation/CS1" data-language-autonym="Kernowek" data-language-local-name="Cornish" class="interlanguage-link-target"><span>Kernowek</span></a></li><li class="interlanguage-link interwiki-ky mw-list-item"><a href="https://ky.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Kyrgyz" lang="ky" hreflang="ky" data-title="Модуль:Citation/CS1" data-language-autonym="Кыргызча" data-language-local-name="Kyrgyz" class="interlanguage-link-target"><span>Кыргызча</span></a></li><li class="interlanguage-link interwiki-lad mw-list-item"><a href="https://lad.wikipedia.org/wiki/M%C3%B3dulo:Citation/CS1" title="Módulo:Citation/CS1 – Ladino" lang="lad" hreflang="lad" data-title="Módulo:Citation/CS1" data-language-autonym="Ladino" data-language-local-name="Ladino" class="interlanguage-link-target"><span>Ladino</span></a></li><li class="interlanguage-link interwiki-lb mw-list-item"><a href="https://lb.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Luxembourgish" lang="lb" hreflang="lb" data-title="Modul:Citation/CS1" data-language-autonym="Lëtzebuergesch" data-language-local-name="Luxembourgish" class="interlanguage-link-target"><span>Lëtzebuergesch</span></a></li><li class="interlanguage-link interwiki-lfn mw-list-item"><a href="https://lfn.wikipedia.org/wiki/Modulo:Citation/CS1" title="Modulo:Citation/CS1 – Lingua Franca Nova" lang="lfn" hreflang="lfn" data-title="Modulo:Citation/CS1" data-language-autonym="Lingua Franca Nova" data-language-local-name="Lingua Franca Nova" class="interlanguage-link-target"><span>Lingua Franca Nova</span></a></li><li class="interlanguage-link interwiki-lg mw-list-item"><a href="https://lg.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Ganda" lang="lg" hreflang="lg" data-title="Module:Citation/CS1" data-language-autonym="Luganda" data-language-local-name="Ganda" class="interlanguage-link-target"><span>Luganda</span></a></li><li class="interlanguage-link interwiki-lij mw-list-item"><a href="https://lij.wikipedia.org/wiki/Modulo:%C3%87ita%C3%A7i%C3%B3n" title="Modulo:Çitaçión – Ligurian" lang="lij" hreflang="lij" data-title="Modulo:Çitaçión" data-language-autonym="Ligure" data-language-local-name="Ligurian" class="interlanguage-link-target"><span>Ligure</span></a></li><li class="interlanguage-link interwiki-lld mw-list-item"><a href="https://lld.wikipedia.org/wiki/Modulo:Citation/CS1" title="Modulo:Citation/CS1 – Ladin" lang="lld" hreflang="lld" data-title="Modulo:Citation/CS1" data-language-autonym="Ladin" data-language-local-name="Ladin" class="interlanguage-link-target"><span>Ladin</span></a></li><li class="interlanguage-link interwiki-ln mw-list-item"><a href="https://ln.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Lingala" lang="ln" hreflang="ln" data-title="Module:Citation/CS1" data-language-autonym="Lingála" data-language-local-name="Lingala" class="interlanguage-link-target"><span>Lingála</span></a></li><li class="interlanguage-link interwiki-lo mw-list-item"><a href="https://lo.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Lao" lang="lo" hreflang="lo" data-title="Module:Citation/CS1" data-language-autonym="ລາວ" data-language-local-name="Lao" class="interlanguage-link-target"><span>ລາວ</span></a></li><li class="interlanguage-link interwiki-lt mw-list-item"><a href="https://lt.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Lithuanian" lang="lt" hreflang="lt" data-title="Module:Citation/CS1" data-language-autonym="Lietuvių" data-language-local-name="Lithuanian" class="interlanguage-link-target"><span>Lietuvių</span></a></li><li class="interlanguage-link interwiki-lv mw-list-item"><a href="https://lv.wikipedia.org/wiki/Modulis:Citation/CS1" title="Modulis:Citation/CS1 – Latvian" lang="lv" hreflang="lv" data-title="Modulis:Citation/CS1" data-language-autonym="Latviešu" data-language-local-name="Latvian" class="interlanguage-link-target"><span>Latviešu</span></a></li><li class="interlanguage-link interwiki-mad mw-list-item"><a href="https://mad.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Madurese" lang="mad" hreflang="mad" data-title="Modul:Citation/CS1" data-language-autonym="Madhurâ" data-language-local-name="Madurese" class="interlanguage-link-target"><span>Madhurâ</span></a></li><li class="interlanguage-link interwiki-mai mw-list-item"><a href="https://mai.wikipedia.org/wiki/%E0%A4%AE%E0%A5%8B%E0%A4%A1%E0%A5%8D%E0%A4%AF%E0%A5%81%E0%A4%B2:Citation/CS1" title="मोड्युल:Citation/CS1 – Maithili" lang="mai" hreflang="mai" data-title="मोड्युल:Citation/CS1" data-language-autonym="मैथिली" data-language-local-name="Maithili" class="interlanguage-link-target"><span>मैथिली</span></a></li><li class="interlanguage-link interwiki-mdf mw-list-item"><a href="https://mdf.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Moksha" lang="mdf" hreflang="mdf" data-title="Модуль:Citation/CS1" data-language-autonym="Мокшень" data-language-local-name="Moksha" class="interlanguage-link-target"><span>Мокшень</span></a></li><li class="interlanguage-link interwiki-mg mw-list-item"><a href="https://mg.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Malagasy" lang="mg" hreflang="mg" data-title="Module:Citation/CS1" data-language-autonym="Malagasy" data-language-local-name="Malagasy" class="interlanguage-link-target"><span>Malagasy</span></a></li><li class="interlanguage-link interwiki-mhr mw-list-item"><a href="https://mhr.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Eastern Mari" lang="mhr" hreflang="mhr" data-title="Модуль:Citation/CS1" data-language-autonym="Олык марий" data-language-local-name="Eastern Mari" class="interlanguage-link-target"><span>Олык марий</span></a></li><li class="interlanguage-link interwiki-mi mw-list-item"><a href="https://mi.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Māori" lang="mi" hreflang="mi" data-title="Module:Citation/CS1" data-language-autonym="Māori" data-language-local-name="Māori" class="interlanguage-link-target"><span>Māori</span></a></li><li class="interlanguage-link interwiki-min mw-list-item"><a href="https://min.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Minangkabau" lang="min" hreflang="min" data-title="Modul:Citation/CS1" data-language-autonym="Minangkabau" data-language-local-name="Minangkabau" class="interlanguage-link-target"><span>Minangkabau</span></a></li><li class="interlanguage-link interwiki-mk mw-list-item"><a href="https://mk.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB:Citation/CS1" title="Модул:Citation/CS1 – Macedonian" lang="mk" hreflang="mk" data-title="Модул:Citation/CS1" data-language-autonym="Македонски" data-language-local-name="Macedonian" class="interlanguage-link-target"><span>Македонски</span></a></li><li class="interlanguage-link interwiki-ml mw-list-item"><a href="https://ml.wikipedia.org/wiki/%E0%B4%98%E0%B4%9F%E0%B4%95%E0%B4%82:Citation/CS1" title="ഘടകം:Citation/CS1 – Malayalam" lang="ml" hreflang="ml" data-title="ഘടകം:Citation/CS1" data-language-autonym="മലയാളം" data-language-local-name="Malayalam" class="interlanguage-link-target"><span>മലയാളം</span></a></li><li class="interlanguage-link interwiki-mn mw-list-item"><a href="https://mn.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Mongolian" lang="mn" hreflang="mn" data-title="Module:Citation/CS1" data-language-autonym="Монгол" data-language-local-name="Mongolian" class="interlanguage-link-target"><span>Монгол</span></a></li><li class="interlanguage-link interwiki-mni mw-list-item"><a href="https://mni.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Manipuri" lang="mni" hreflang="mni" data-title="Module:Citation/CS1" data-language-autonym="ꯃꯤꯇꯩ ꯂꯣꯟ" data-language-local-name="Manipuri" class="interlanguage-link-target"><span>ꯃꯤꯇꯩ ꯂꯣꯟ</span></a></li><li class="interlanguage-link interwiki-mnw mw-list-item"><a href="https://mnw.wikipedia.org/wiki/%E1%80%99%E1%80%9D%E1%80%BA%E1%80%82%E1%80%BB%E1%80%B0:Citation/CS1" title="မဝ်ဂျူ:Citation/CS1 – Mon" lang="mnw" hreflang="mnw" data-title="မဝ်ဂျူ:Citation/CS1" data-language-autonym="ဘာသာမန်" data-language-local-name="Mon" class="interlanguage-link-target"><span>ဘာသာမန်</span></a></li><li class="interlanguage-link interwiki-mr mw-list-item"><a href="https://mr.wikipedia.org/wiki/%E0%A4%B5%E0%A4%BF%E0%A4%AD%E0%A4%BE%E0%A4%97:Citation/CS1" title="विभाग:Citation/CS1 – Marathi" lang="mr" hreflang="mr" data-title="विभाग:Citation/CS1" data-language-autonym="मराठी" data-language-local-name="Marathi" class="interlanguage-link-target"><span>मराठी</span></a></li><li class="interlanguage-link interwiki-ms mw-list-item"><a href="https://ms.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Malay" lang="ms" hreflang="ms" data-title="Modul:Citation/CS1" data-language-autonym="Bahasa Melayu" data-language-local-name="Malay" class="interlanguage-link-target"><span>Bahasa Melayu</span></a></li><li class="interlanguage-link interwiki-mt mw-list-item"><a href="https://mt.wikipedia.org/wiki/Module:%C4%8Aitazzjoni/CS1" title="Module:Ċitazzjoni/CS1 – Maltese" lang="mt" hreflang="mt" data-title="Module:Ċitazzjoni/CS1" data-language-autonym="Malti" data-language-local-name="Maltese" class="interlanguage-link-target"><span>Malti</span></a></li><li class="interlanguage-link interwiki-mwl mw-list-item"><a href="https://mwl.wikipedia.org/wiki/M%C3%B3dulo:Cita%C3%A7on/CS1" title="Módulo:Citaçon/CS1 – Mirandese" lang="mwl" hreflang="mwl" data-title="Módulo:Citaçon/CS1" data-language-autonym="Mirandés" data-language-local-name="Mirandese" class="interlanguage-link-target"><span>Mirandés</span></a></li><li class="interlanguage-link interwiki-my mw-list-item"><a href="https://my.wikipedia.org/wiki/%E1%80%99%E1%80%B1%E1%80%AC%E1%80%BA%E1%80%82%E1%80%BB%E1%80%B0%E1%80%B8:Citation/CS1" title="မော်ဂျူး:Citation/CS1 – Burmese" lang="my" hreflang="my" data-title="မော်ဂျူး:Citation/CS1" data-language-autonym="မြန်မာဘာသာ" data-language-local-name="Burmese" class="interlanguage-link-target"><span>မြန်မာဘာသာ</span></a></li><li class="interlanguage-link interwiki-myv mw-list-item"><a href="https://myv.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Erzya" lang="myv" hreflang="myv" data-title="Модуль:Citation/CS1" data-language-autonym="Эрзянь" data-language-local-name="Erzya" class="interlanguage-link-target"><span>Эрзянь</span></a></li><li class="interlanguage-link interwiki-mzn mw-list-item"><a href="https://mzn.wikipedia.org/wiki/%D9%85%D8%A7%DA%98%D9%88%D9%84:Citation/CS1" title="ماژول:Citation/CS1 – Mazanderani" lang="mzn" hreflang="mzn" data-title="ماژول:Citation/CS1" data-language-autonym="مازِرونی" data-language-local-name="Mazanderani" class="interlanguage-link-target"><span>مازِرونی</span></a></li><li class="interlanguage-link interwiki-nah mw-list-item"><a href="https://nah.wikipedia.org/wiki/M%C3%B3dulo:Citation/CS1" title="Módulo:Citation/CS1 – Nahuatl" lang="nah" hreflang="nah" data-title="Módulo:Citation/CS1" data-language-autonym="Nāhuatl" data-language-local-name="Nahuatl" class="interlanguage-link-target"><span>Nāhuatl</span></a></li><li class="interlanguage-link interwiki-ne mw-list-item"><a href="https://ne.wikipedia.org/wiki/%E0%A4%AE%E0%A5%8B%E0%A4%A1%E0%A5%8D%E0%A4%AF%E0%A5%81%E0%A4%B2:%E0%A4%B8%E0%A5%8D%E0%A4%B0%E0%A5%8B%E0%A4%A4" title="मोड्युल:स्रोत – Nepali" lang="ne" hreflang="ne" data-title="मोड्युल:स्रोत" data-language-autonym="नेपाली" data-language-local-name="Nepali" class="interlanguage-link-target"><span>नेपाली</span></a></li><li class="interlanguage-link interwiki-nia mw-list-item"><a href="https://nia.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Nias" lang="nia" hreflang="nia" data-title="Modul:Citation/CS1" data-language-autonym="Li Niha" data-language-local-name="Nias" class="interlanguage-link-target"><span>Li Niha</span></a></li><li class="interlanguage-link interwiki-nl mw-list-item"><a href="https://nl.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Hōlani" lang="nl" hreflang="nl" data-title="Module:Citation/CS1" data-language-autonym="Nederlands" data-language-local-name="Hōlani" class="interlanguage-link-target"><span>Nederlands</span></a></li><li class="interlanguage-link interwiki-nn mw-list-item"><a href="https://nn.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Norwegian Nynorsk" lang="nn" hreflang="nn" data-title="Modul:Citation/CS1" data-language-autonym="Norsk nynorsk" data-language-local-name="Norwegian Nynorsk" class="interlanguage-link-target"><span>Norsk nynorsk</span></a></li><li class="interlanguage-link interwiki-no mw-list-item"><a href="https://no.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Norwegian Bokmål" lang="nb" hreflang="nb" data-title="Modul:Citation/CS1" data-language-autonym="Norsk bokmål" data-language-local-name="Norwegian Bokmål" class="interlanguage-link-target"><span>Norsk bokmål</span></a></li><li class="interlanguage-link interwiki-nov mw-list-item"><a href="https://nov.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Novial" lang="nov" hreflang="nov" data-title="Module:Citation/CS1" data-language-autonym="Novial" data-language-local-name="Novial" class="interlanguage-link-target"><span>Novial</span></a></li><li class="interlanguage-link interwiki-nqo mw-list-item"><a href="https://nqo.wikipedia.org/wiki/%DF%97%DF%8B%DF%AC%DF%9E%DF%99%DF%8A%DF%9E%DF%8F:Citation/CS1" title="ߗߋ߬ߞߙߊߞߏ:Citation/CS1 – N’Ko" lang="nqo" hreflang="nqo" data-title="ߗߋ߬ߞߙߊߞߏ:Citation/CS1" data-language-autonym="ߒߞߏ" data-language-local-name="N’Ko" class="interlanguage-link-target"><span>ߒߞߏ</span></a></li><li class="interlanguage-link interwiki-nso mw-list-item"><a href="https://nso.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Northern Sotho" lang="nso" hreflang="nso" data-title="Module:Citation/CS1" data-language-autonym="Sesotho sa Leboa" data-language-local-name="Northern Sotho" class="interlanguage-link-target"><span>Sesotho sa Leboa</span></a></li><li class="interlanguage-link interwiki-ny mw-list-item"><a href="https://ny.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Nyanja" lang="ny" hreflang="ny" data-title="Module:Citation/CS1" data-language-autonym="Chi-Chewa" data-language-local-name="Nyanja" class="interlanguage-link-target"><span>Chi-Chewa</span></a></li><li class="interlanguage-link interwiki-oc mw-list-item"><a href="https://oc.wikipedia.org/wiki/M%C3%B2dul:Ref-citacion/CS1" title="Mòdul:Ref-citacion/CS1 – Occitan" lang="oc" hreflang="oc" data-title="Mòdul:Ref-citacion/CS1" data-language-autonym="Occitan" data-language-local-name="Occitan" class="interlanguage-link-target"><span>Occitan</span></a></li><li class="interlanguage-link interwiki-om mw-list-item"><a href="https://om.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Oromo" lang="om" hreflang="om" data-title="Module:Citation/CS1" data-language-autonym="Oromoo" data-language-local-name="Oromo" class="interlanguage-link-target"><span>Oromoo</span></a></li><li class="interlanguage-link interwiki-or mw-list-item"><a href="https://or.wikipedia.org/wiki/%E0%AC%AE%E0%AC%A1%E0%AD%8D%E0%AD%9F%E0%AD%81%E0%AC%B2:Citation/CS1" title="ମଡ୍ୟୁଲ:Citation/CS1 – Odia" lang="or" hreflang="or" data-title="ମଡ୍ୟୁଲ:Citation/CS1" data-language-autonym="ଓଡ଼ିଆ" data-language-local-name="Odia" class="interlanguage-link-target"><span>ଓଡ଼ିଆ</span></a></li><li class="interlanguage-link interwiki-os mw-list-item"><a href="https://os.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Ossetic" lang="os" hreflang="os" data-title="Модуль:Citation/CS1" data-language-autonym="Ирон" data-language-local-name="Ossetic" class="interlanguage-link-target"><span>Ирон</span></a></li><li class="interlanguage-link interwiki-pa mw-list-item"><a href="https://pa.wikipedia.org/wiki/%E0%A8%AE%E0%A9%8C%E0%A8%A1%E0%A8%BF%E0%A8%8A%E0%A8%B2:Citation/CS1" title="ਮੌਡਿਊਲ:Citation/CS1 – Punjabi" lang="pa" hreflang="pa" data-title="ਮੌਡਿਊਲ:Citation/CS1" data-language-autonym="ਪੰਜਾਬੀ" data-language-local-name="Punjabi" class="interlanguage-link-target"><span>ਪੰਜਾਬੀ</span></a></li><li class="interlanguage-link interwiki-pag mw-list-item"><a href="https://pag.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Pangasinan" lang="pag" hreflang="pag" data-title="Module:Citation/CS1" data-language-autonym="Pangasinan" data-language-local-name="Pangasinan" class="interlanguage-link-target"><span>Pangasinan</span></a></li><li class="interlanguage-link interwiki-pam mw-list-item"><a href="https://pam.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Pampanga" lang="pam" hreflang="pam" data-title="Module:Citation/CS1" data-language-autonym="Kapampangan" data-language-local-name="Pampanga" class="interlanguage-link-target"><span>Kapampangan</span></a></li><li class="interlanguage-link interwiki-pcm mw-list-item"><a href="https://pcm.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Nigerian Pidgin" lang="pcm" hreflang="pcm" data-title="Modul:Citation/CS1" data-language-autonym="Naijá" data-language-local-name="Nigerian Pidgin" class="interlanguage-link-target"><span>Naijá</span></a></li><li class="interlanguage-link interwiki-pdc mw-list-item"><a href="https://pdc.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Pennsylvania German" lang="pdc" hreflang="pdc" data-title="Modul:Citation/CS1" data-language-autonym="Deitsch" data-language-local-name="Pennsylvania German" class="interlanguage-link-target"><span>Deitsch</span></a></li><li class="interlanguage-link interwiki-pih mw-list-item"><a href="https://pih.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Norfuk / Pitkern" lang="pih" hreflang="pih" data-title="Module:Citation/CS1" data-language-autonym="Norfuk / Pitkern" data-language-local-name="Norfuk / Pitkern" class="interlanguage-link-target"><span>Norfuk / Pitkern</span></a></li><li class="interlanguage-link interwiki-pnb mw-list-item"><a href="https://pnb.wikipedia.org/wiki/%D9%85%D8%A7%DA%88%DB%8C%D9%88%D9%84:Citation/CS1" title="ماڈیول:Citation/CS1 – Western Punjabi" lang="pnb" hreflang="pnb" data-title="ماڈیول:Citation/CS1" data-language-autonym="پنجابی" data-language-local-name="Western Punjabi" class="interlanguage-link-target"><span>پنجابی</span></a></li><li class="interlanguage-link interwiki-ps mw-list-item"><a href="https://ps.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Pashto" lang="ps" hreflang="ps" data-title="Module:Citation/CS1" data-language-autonym="پښتو" data-language-local-name="Pashto" class="interlanguage-link-target"><span>پښتو</span></a></li><li class="interlanguage-link interwiki-pt mw-list-item"><a href="https://pt.wikipedia.org/wiki/M%C3%B3dulo:Cita%C3%A7%C3%A3o/CS1" title="Módulo:Citação/CS1 – Pukikī" lang="pt" hreflang="pt" data-title="Módulo:Citação/CS1" data-language-autonym="Português" data-language-local-name="Pukikī" class="interlanguage-link-target"><span>Português</span></a></li><li class="interlanguage-link interwiki-rn mw-list-item"><a href="https://rn.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Rundi" lang="rn" hreflang="rn" data-title="Module:Citation/CS1" data-language-autonym="Ikirundi" data-language-local-name="Rundi" class="interlanguage-link-target"><span>Ikirundi</span></a></li><li class="interlanguage-link interwiki-ro mw-list-item"><a href="https://ro.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Romanian" lang="ro" hreflang="ro" data-title="Modul:Citation/CS1" data-language-autonym="Română" data-language-local-name="Romanian" class="interlanguage-link-target"><span>Română</span></a></li><li class="interlanguage-link interwiki-roa-rup mw-list-item"><a href="https://roa-rup.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Aromanian" lang="rup" hreflang="rup" data-title="Modul:Citation/CS1" data-language-autonym="Armãneashti" data-language-local-name="Aromanian" class="interlanguage-link-target"><span>Armãneashti</span></a></li><li class="interlanguage-link interwiki-roa-tara mw-list-item"><a href="https://roa-tara.wikipedia.org/wiki/Modulo:Citazione" title="Modulo:Citazione – Tarantino" lang="nap-x-tara" hreflang="nap-x-tara" data-title="Modulo:Citazione" data-language-autonym="Tarandíne" data-language-local-name="Tarantino" class="interlanguage-link-target"><span>Tarandíne</span></a></li><li class="interlanguage-link interwiki-ru mw-list-item"><a href="https://ru.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Lūkia" lang="ru" hreflang="ru" data-title="Модуль:Citation/CS1" data-language-autonym="Русский" data-language-local-name="Lūkia" class="interlanguage-link-target"><span>Русский</span></a></li><li class="interlanguage-link interwiki-rue mw-list-item"><a href="https://rue.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Rusyn" lang="rue" hreflang="rue" data-title="Модуль:Citation/CS1" data-language-autonym="Русиньскый" data-language-local-name="Rusyn" class="interlanguage-link-target"><span>Русиньскый</span></a></li><li class="interlanguage-link interwiki-rw mw-list-item"><a href="https://rw.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Kinyarwanda" lang="rw" hreflang="rw" data-title="Module:Citation/CS1" data-language-autonym="Ikinyarwanda" data-language-local-name="Kinyarwanda" class="interlanguage-link-target"><span>Ikinyarwanda</span></a></li><li class="interlanguage-link interwiki-sa mw-list-item"><a href="https://sa.wikipedia.org/wiki/%E0%A4%AA%E0%A4%9F%E0%A4%B2%E0%A4%AE%E0%A5%8D:Citation/CS1" title="पटलम्:Citation/CS1 – Sanskrit" lang="sa" hreflang="sa" data-title="पटलम्:Citation/CS1" data-language-autonym="संस्कृतम्" data-language-local-name="Sanskrit" class="interlanguage-link-target"><span>संस्कृतम्</span></a></li><li class="interlanguage-link interwiki-sat mw-list-item"><a href="https://sat.wikipedia.org/wiki/%E1%B1%A2%E1%B1%B3%E1%B1%B0%E1%B1%A9%E1%B1%9E:Citation/CS1" title="ᱢᱳᱰᱩᱞ:Citation/CS1 – Santali" lang="sat" hreflang="sat" data-title="ᱢᱳᱰᱩᱞ:Citation/CS1" data-language-autonym="ᱥᱟᱱᱛᱟᱲᱤ" data-language-local-name="Santali" class="interlanguage-link-target"><span>ᱥᱟᱱᱛᱟᱲᱤ</span></a></li><li class="interlanguage-link interwiki-sc mw-list-item"><a href="https://sc.wikipedia.org/wiki/Module:Tzitatzione" title="Module:Tzitatzione – Sardinian" lang="sc" hreflang="sc" data-title="Module:Tzitatzione" data-language-autonym="Sardu" data-language-local-name="Sardinian" class="interlanguage-link-target"><span>Sardu</span></a></li><li class="interlanguage-link interwiki-scn mw-list-item"><a href="https://scn.wikipedia.org/wiki/M%C3%B2dulu:Citazione" title="Mòdulu:Citazione – Sicilian" lang="scn" hreflang="scn" data-title="Mòdulu:Citazione" data-language-autonym="Sicilianu" data-language-local-name="Sicilian" class="interlanguage-link-target"><span>Sicilianu</span></a></li><li class="interlanguage-link interwiki-sco mw-list-item"><a href="https://sco.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Scots" lang="sco" hreflang="sco" data-title="Module:Citation/CS1" data-language-autonym="Scots" data-language-local-name="Scots" class="interlanguage-link-target"><span>Scots</span></a></li><li class="interlanguage-link interwiki-sd mw-list-item"><a href="https://sd.wikipedia.org/wiki/%D9%85%D8%A7%DA%8A%D9%8A%D9%88%D9%84:Citation/CS1" title="ماڊيول:Citation/CS1 – Sindhi" lang="sd" hreflang="sd" data-title="ماڊيول:Citation/CS1" data-language-autonym="سنڌي" data-language-local-name="Sindhi" class="interlanguage-link-target"><span>سنڌي</span></a></li><li class="interlanguage-link interwiki-sh mw-list-item"><a href="https://sh.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Serbo-Croatian" lang="sh" hreflang="sh" data-title="Modul:Citation/CS1" data-language-autonym="Srpskohrvatski / српскохрватски" data-language-local-name="Serbo-Croatian" class="interlanguage-link-target"><span>Srpskohrvatski / српскохрватски</span></a></li><li class="interlanguage-link interwiki-shi mw-list-item"><a href="https://shi.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Tachelhit" lang="shi" hreflang="shi" data-title="Module:Citation/CS1" data-language-autonym="Taclḥit" data-language-local-name="Tachelhit" class="interlanguage-link-target"><span>Taclḥit</span></a></li><li class="interlanguage-link interwiki-shn mw-list-item"><a href="https://shn.wikipedia.org/wiki/%E1%80%99%E1%80%B1%E1%82%83%E1%82%87%E1%81%B5%E1%80%BB%E1%80%B0%E1%80%B8:Citation/CS1" title="မေႃႇၵျူး:Citation/CS1 – Shan" lang="shn" hreflang="shn" data-title="မေႃႇၵျူး:Citation/CS1" data-language-autonym="ၽႃႇသႃႇတႆး " data-language-local-name="Shan" class="interlanguage-link-target"><span>ၽႃႇသႃႇတႆး </span></a></li><li class="interlanguage-link interwiki-si mw-list-item"><a href="https://si.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Sinhala" lang="si" hreflang="si" data-title="Module:Citation/CS1" data-language-autonym="සිංහල" data-language-local-name="Sinhala" class="interlanguage-link-target"><span>සිංහල</span></a></li><li class="interlanguage-link interwiki-simple mw-list-item"><a href="https://simple.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Simple English" lang="en-simple" hreflang="en-simple" data-title="Module:Citation/CS1" data-language-autonym="Simple English" data-language-local-name="Simple English" class="interlanguage-link-target"><span>Simple English</span></a></li><li class="interlanguage-link interwiki-sk mw-list-item"><a href="https://sk.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Slovak" lang="sk" hreflang="sk" data-title="Modul:Citation/CS1" data-language-autonym="Slovenčina" data-language-local-name="Slovak" class="interlanguage-link-target"><span>Slovenčina</span></a></li><li class="interlanguage-link interwiki-skr mw-list-item"><a href="https://skr.wikipedia.org/wiki/%D9%85%D8%A7%DA%88%DB%8C%D9%88%D9%84:Citation/CS1" title="ماڈیول:Citation/CS1 – Saraiki" lang="skr" hreflang="skr" data-title="ماڈیول:Citation/CS1" data-language-autonym="سرائیکی" data-language-local-name="Saraiki" class="interlanguage-link-target"><span>سرائیکی</span></a></li><li class="interlanguage-link interwiki-sl mw-list-item"><a href="https://sl.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Slovenian" lang="sl" hreflang="sl" data-title="Modul:Citation/CS1" data-language-autonym="Slovenščina" data-language-local-name="Slovenian" class="interlanguage-link-target"><span>Slovenščina</span></a></li><li class="interlanguage-link interwiki-sm mw-list-item"><a href="https://sm.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Kāmoa" lang="sm" hreflang="sm" data-title="Module:Citation/CS1" data-language-autonym="Gagana Samoa" data-language-local-name="Kāmoa" class="interlanguage-link-target"><span>Gagana Samoa</span></a></li><li class="interlanguage-link interwiki-smn mw-list-item"><a href="https://smn.wikipedia.org/wiki/Mooduul:Citation/CS1" title="Mooduul:Citation/CS1 – Inari Sami" lang="smn" hreflang="smn" data-title="Mooduul:Citation/CS1" data-language-autonym="Anarâškielâ" data-language-local-name="Inari Sami" class="interlanguage-link-target"><span>Anarâškielâ</span></a></li><li class="interlanguage-link interwiki-sn mw-list-item"><a href="https://sn.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Shona" lang="sn" hreflang="sn" data-title="Module:Citation/CS1" data-language-autonym="ChiShona" data-language-local-name="Shona" class="interlanguage-link-target"><span>ChiShona</span></a></li><li class="interlanguage-link interwiki-so mw-list-item"><a href="https://so.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Somali" lang="so" hreflang="so" data-title="Module:Citation/CS1" data-language-autonym="Soomaaliga" data-language-local-name="Somali" class="interlanguage-link-target"><span>Soomaaliga</span></a></li><li class="interlanguage-link interwiki-sq mw-list-item"><a href="https://sq.wikipedia.org/wiki/Moduli:Citation/CS1" title="Moduli:Citation/CS1 – Albanian" lang="sq" hreflang="sq" data-title="Moduli:Citation/CS1" data-language-autonym="Shqip" data-language-local-name="Albanian" class="interlanguage-link-target"><span>Shqip</span></a></li><li class="interlanguage-link interwiki-sr mw-list-item"><a href="https://sr.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB:Citation/CS1" title="Модул:Citation/CS1 – Serbian" lang="sr" hreflang="sr" data-title="Модул:Citation/CS1" data-language-autonym="Српски / srpski" data-language-local-name="Serbian" class="interlanguage-link-target"><span>Српски / srpski</span></a></li><li class="interlanguage-link interwiki-srn mw-list-item"><a href="https://srn.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Sranan Tongo" lang="srn" hreflang="srn" data-title="Module:Citation/CS1" data-language-autonym="Sranantongo" data-language-local-name="Sranan Tongo" class="interlanguage-link-target"><span>Sranantongo</span></a></li><li class="interlanguage-link interwiki-ss mw-list-item"><a href="https://ss.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Swati" lang="ss" hreflang="ss" data-title="Module:Citation/CS1" data-language-autonym="SiSwati" data-language-local-name="Swati" class="interlanguage-link-target"><span>SiSwati</span></a></li><li class="interlanguage-link interwiki-st mw-list-item"><a href="https://st.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Southern Sotho" lang="st" hreflang="st" data-title="Module:Citation/CS1" data-language-autonym="Sesotho" data-language-local-name="Southern Sotho" class="interlanguage-link-target"><span>Sesotho</span></a></li><li class="interlanguage-link interwiki-su mw-list-item"><a href="https://su.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Sundanese" lang="su" hreflang="su" data-title="Modul:Citation/CS1" data-language-autonym="Sunda" data-language-local-name="Sundanese" class="interlanguage-link-target"><span>Sunda</span></a></li><li class="interlanguage-link interwiki-sw mw-list-item"><a href="https://sw.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Swahili" lang="sw" hreflang="sw" data-title="Module:Citation/CS1" data-language-autonym="Kiswahili" data-language-local-name="Swahili" class="interlanguage-link-target"><span>Kiswahili</span></a></li><li class="interlanguage-link interwiki-ta mw-list-item"><a href="https://ta.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Tamil" lang="ta" hreflang="ta" data-title="Module:Citation/CS1" data-language-autonym="தமிழ்" data-language-local-name="Tamil" class="interlanguage-link-target"><span>தமிழ்</span></a></li><li class="interlanguage-link interwiki-tcy mw-list-item"><a href="https://tcy.wikipedia.org/wiki/%E0%B2%AE%E0%B3%8B%E0%B2%A1%E0%B3%8D%E0%B2%AF%E0%B3%82%E0%B2%B2%E0%B3%8D:Citation/CS1" title="ಮೋಡ್ಯೂಲ್:Citation/CS1 – Tulu" lang="tcy" hreflang="tcy" data-title="ಮೋಡ್ಯೂಲ್:Citation/CS1" data-language-autonym="ತುಳು" data-language-local-name="Tulu" class="interlanguage-link-target"><span>ತುಳು</span></a></li><li class="interlanguage-link interwiki-te mw-list-item"><a href="https://te.wikipedia.org/wiki/%E0%B0%AE%E0%B0%BE%E0%B0%A1%E0%B1%8D%E0%B0%AF%E0%B1%82%E0%B0%B2%E0%B1%8D:Citation/CS1" title="మాడ్యూల్:Citation/CS1 – Telugu" lang="te" hreflang="te" data-title="మాడ్యూల్:Citation/CS1" data-language-autonym="తెలుగు" data-language-local-name="Telugu" class="interlanguage-link-target"><span>తెలుగు</span></a></li><li class="interlanguage-link interwiki-tg mw-list-item"><a href="https://tg.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB:Citation/CS1" title="Модул:Citation/CS1 – Tajik" lang="tg" hreflang="tg" data-title="Модул:Citation/CS1" data-language-autonym="Тоҷикӣ" data-language-local-name="Tajik" class="interlanguage-link-target"><span>Тоҷикӣ</span></a></li><li class="interlanguage-link interwiki-th mw-list-item"><a href="https://th.wikipedia.org/wiki/%E0%B8%A1%E0%B8%AD%E0%B8%94%E0%B8%B9%E0%B8%A5:Citation/CS1" title="มอดูล:Citation/CS1 – Thai" lang="th" hreflang="th" data-title="มอดูล:Citation/CS1" data-language-autonym="ไทย" data-language-local-name="Thai" class="interlanguage-link-target"><span>ไทย</span></a></li><li class="interlanguage-link interwiki-ti mw-list-item"><a href="https://ti.wikipedia.org/wiki/%E1%88%9E%E1%8B%B5%E1%8B%A9%E1%88%8D:Citation/CS1" title="ሞድዩል:Citation/CS1 – Tigrinya" lang="ti" hreflang="ti" data-title="ሞድዩል:Citation/CS1" data-language-autonym="ትግርኛ" data-language-local-name="Tigrinya" class="interlanguage-link-target"><span>ትግርኛ</span></a></li><li class="interlanguage-link interwiki-tk mw-list-item"><a href="https://tk.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Turkmen" lang="tk" hreflang="tk" data-title="Module:Citation/CS1" data-language-autonym="Türkmençe" data-language-local-name="Turkmen" class="interlanguage-link-target"><span>Türkmençe</span></a></li><li class="interlanguage-link interwiki-tl mw-list-item"><a href="https://tl.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Tagalog" lang="tl" hreflang="tl" data-title="Module:Citation/CS1" data-language-autonym="Tagalog" data-language-local-name="Tagalog" class="interlanguage-link-target"><span>Tagalog</span></a></li><li class="interlanguage-link interwiki-tly mw-list-item"><a href="https://tly.wikipedia.org/wiki/Modul:Citation/CS1" title="Modul:Citation/CS1 – Talysh" lang="tly" hreflang="tly" data-title="Modul:Citation/CS1" data-language-autonym="Tolışi" data-language-local-name="Talysh" class="interlanguage-link-target"><span>Tolışi</span></a></li><li class="interlanguage-link interwiki-tn mw-list-item"><a href="https://tn.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Tswana" lang="tn" hreflang="tn" data-title="Module:Citation/CS1" data-language-autonym="Setswana" data-language-local-name="Tswana" class="interlanguage-link-target"><span>Setswana</span></a></li><li class="interlanguage-link interwiki-tpi mw-list-item"><a href="https://tpi.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Tok Pisin" lang="tpi" hreflang="tpi" data-title="Module:Citation/CS1" data-language-autonym="Tok Pisin" data-language-local-name="Tok Pisin" class="interlanguage-link-target"><span>Tok Pisin</span></a></li><li class="interlanguage-link interwiki-tr mw-list-item"><a href="https://tr.wikipedia.org/wiki/Mod%C3%BCl:Kaynak/KB1" title="Modül:Kaynak/KB1 – Turkish" lang="tr" hreflang="tr" data-title="Modül:Kaynak/KB1" data-language-autonym="Türkçe" data-language-local-name="Turkish" class="interlanguage-link-target"><span>Türkçe</span></a></li><li class="interlanguage-link interwiki-trv mw-list-item"><a href="https://trv.wikipedia.org/wiki/%E6%A8%A1%E7%B5%84:Citation/CS1" title="模組:Citation/CS1 – Taroko" lang="trv" hreflang="trv" data-title="模組:Citation/CS1" data-language-autonym="Seediq" data-language-local-name="Taroko" class="interlanguage-link-target"><span>Seediq</span></a></li><li class="interlanguage-link interwiki-ts mw-list-item"><a href="https://ts.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Tsonga" lang="ts" hreflang="ts" data-title="Module:Citation/CS1" data-language-autonym="Xitsonga" data-language-local-name="Tsonga" class="interlanguage-link-target"><span>Xitsonga</span></a></li><li class="interlanguage-link interwiki-tt mw-list-item"><a href="https://tt.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Tatar" lang="tt" hreflang="tt" data-title="Модуль:Citation/CS1" data-language-autonym="Татарча / tatarça" data-language-local-name="Tatar" class="interlanguage-link-target"><span>Татарча / tatarça</span></a></li><li class="interlanguage-link interwiki-tum mw-list-item"><a href="https://tum.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Tumbuka" lang="tum" hreflang="tum" data-title="Module:Citation/CS1" data-language-autonym="ChiTumbuka" data-language-local-name="Tumbuka" class="interlanguage-link-target"><span>ChiTumbuka</span></a></li><li class="interlanguage-link interwiki-tw mw-list-item"><a href="https://tw.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Twi" lang="tw" hreflang="tw" data-title="Module:Citation/CS1" data-language-autonym="Twi" data-language-local-name="Twi" class="interlanguage-link-target"><span>Twi</span></a></li><li class="interlanguage-link interwiki-ug mw-list-item"><a href="https://ug.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Uyghur" lang="ug" hreflang="ug" data-title="Module:Citation/CS1" data-language-autonym="ئۇيغۇرچە / Uyghurche" data-language-local-name="Uyghur" class="interlanguage-link-target"><span>ئۇيغۇرچە / Uyghurche</span></a></li><li class="interlanguage-link interwiki-uk mw-list-item"><a href="https://uk.wikipedia.org/wiki/%D0%9C%D0%BE%D0%B4%D1%83%D0%BB%D1%8C:Citation/CS1" title="Модуль:Citation/CS1 – Ukrainian" lang="uk" hreflang="uk" data-title="Модуль:Citation/CS1" data-language-autonym="Українська" data-language-local-name="Ukrainian" class="interlanguage-link-target"><span>Українська</span></a></li><li class="interlanguage-link interwiki-ur mw-list-item"><a href="https://ur.wikipedia.org/wiki/%D9%85%D8%A7%DA%88%DB%8C%D9%88%D9%84:Citation/CS1" title="ماڈیول:Citation/CS1 – Urdu" lang="ur" hreflang="ur" data-title="ماڈیول:Citation/CS1" data-language-autonym="اردو" data-language-local-name="Urdu" class="interlanguage-link-target"><span>اردو</span></a></li><li class="interlanguage-link interwiki-uz mw-list-item"><a href="https://uz.wikipedia.org/wiki/Modul:Manba/MU1" title="Modul:Manba/MU1 – Uzbek" lang="uz" hreflang="uz" data-title="Modul:Manba/MU1" data-language-autonym="Oʻzbekcha / ўзбекча" data-language-local-name="Uzbek" class="interlanguage-link-target"><span>Oʻzbekcha / ўзбекча</span></a></li><li class="interlanguage-link interwiki-ve mw-list-item"><a href="https://ve.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Venda" lang="ve" hreflang="ve" data-title="Module:Citation/CS1" data-language-autonym="Tshivenda" data-language-local-name="Venda" class="interlanguage-link-target"><span>Tshivenda</span></a></li><li class="interlanguage-link interwiki-vec mw-list-item"><a href="https://vec.wikipedia.org/wiki/Modulo:Citasion" title="Modulo:Citasion – Venetian" lang="vec" hreflang="vec" data-title="Modulo:Citasion" data-language-autonym="Vèneto" data-language-local-name="Venetian" class="interlanguage-link-target"><span>Vèneto</span></a></li><li class="interlanguage-link interwiki-vi mw-list-item"><a href="https://vi.wikipedia.org/wiki/M%C3%B4_%C4%91un:Citation/CS1" title="Mô đun:Citation/CS1 – Wiekanama" lang="vi" hreflang="vi" data-title="Mô đun:Citation/CS1" data-language-autonym="Tiếng Việt" data-language-local-name="Wiekanama" class="interlanguage-link-target"><span>Tiếng Việt</span></a></li><li class="interlanguage-link interwiki-vo mw-list-item"><a href="https://vo.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Volapük" lang="vo" hreflang="vo" data-title="Module:Citation/CS1" data-language-autonym="Volapük" data-language-local-name="Volapük" class="interlanguage-link-target"><span>Volapük</span></a></li><li class="interlanguage-link interwiki-war mw-list-item"><a href="https://war.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Waray" lang="war" hreflang="war" data-title="Module:Citation/CS1" data-language-autonym="Winaray" data-language-local-name="Waray" class="interlanguage-link-target"><span>Winaray</span></a></li><li class="interlanguage-link interwiki-wo mw-list-item"><a href="https://wo.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Wolof" lang="wo" hreflang="wo" data-title="Module:Citation/CS1" data-language-autonym="Wolof" data-language-local-name="Wolof" class="interlanguage-link-target"><span>Wolof</span></a></li><li class="interlanguage-link interwiki-wuu mw-list-item"><a href="https://wuu.wikipedia.org/wiki/%E6%A8%A1%E5%9D%97:Citation/CS1" title="模块:Citation/CS1 – Wu" lang="wuu" hreflang="wuu" data-title="模块:Citation/CS1" data-language-autonym="吴语" data-language-local-name="Wu" class="interlanguage-link-target"><span>吴语</span></a></li><li class="interlanguage-link interwiki-xh mw-list-item"><a href="https://xh.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Xhosa" lang="xh" hreflang="xh" data-title="Module:Citation/CS1" data-language-autonym="IsiXhosa" data-language-local-name="Xhosa" class="interlanguage-link-target"><span>IsiXhosa</span></a></li><li class="interlanguage-link interwiki-xmf mw-list-item"><a href="https://xmf.wikipedia.org/wiki/%E1%83%9B%E1%83%9D%E1%83%93%E1%83%A3%E1%83%9A%E1%83%98:Citation/CS1" title="მოდული:Citation/CS1 – Mingrelian" lang="xmf" hreflang="xmf" data-title="მოდული:Citation/CS1" data-language-autonym="მარგალური" data-language-local-name="Mingrelian" class="interlanguage-link-target"><span>მარგალური</span></a></li><li class="interlanguage-link interwiki-yi mw-list-item"><a href="https://yi.wikipedia.org/wiki/%D7%99%D7%97%D7%99%D7%93%D7%94:Citation/CS1" title="יחידה:Citation/CS1 – Yiddish" lang="yi" hreflang="yi" data-title="יחידה:Citation/CS1" data-language-autonym="ייִדיש" data-language-local-name="Yiddish" class="interlanguage-link-target"><span>ייִדיש</span></a></li><li class="interlanguage-link interwiki-yo mw-list-item"><a href="https://yo.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Yoruba" lang="yo" hreflang="yo" data-title="Module:Citation/CS1" data-language-autonym="Yorùbá" data-language-local-name="Yoruba" class="interlanguage-link-target"><span>Yorùbá</span></a></li><li class="interlanguage-link interwiki-za mw-list-item"><a href="https://za.wikipedia.org/wiki/%E6%A8%A1%E5%9D%97:Citation/CS1" title="模块:Citation/CS1 – Zhuang" lang="za" hreflang="za" data-title="模块:Citation/CS1" data-language-autonym="Vahcuengh" data-language-local-name="Zhuang" class="interlanguage-link-target"><span>Vahcuengh</span></a></li><li class="interlanguage-link interwiki-zh mw-list-item"><a href="https://zh.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Pākē" lang="zh" hreflang="zh" data-title="Module:Citation/CS1" data-language-autonym="中文" data-language-local-name="Pākē" class="interlanguage-link-target"><span>中文</span></a></li><li class="interlanguage-link interwiki-zh-classical mw-list-item"><a href="https://zh-classical.wikipedia.org/wiki/%E6%A8%A1%E7%B5%84:Citation/CS1" title="模組:Citation/CS1 – Literary Chinese" lang="lzh" hreflang="lzh" data-title="模組:Citation/CS1" data-language-autonym="文言" data-language-local-name="Literary Chinese" class="interlanguage-link-target"><span>文言</span></a></li><li class="interlanguage-link interwiki-zh-min-nan mw-list-item"><a href="https://zh-min-nan.wikipedia.org/wiki/%E6%A8%A1%E7%B5%84:Citation/CS1" title="模組:Citation/CS1 – Minnan" lang="nan" hreflang="nan" data-title="模組:Citation/CS1" data-language-autonym="閩南語 / Bân-lâm-gú" data-language-local-name="Minnan" class="interlanguage-link-target"><span>閩南語 / Bân-lâm-gú</span></a></li><li class="interlanguage-link interwiki-zh-yue mw-list-item"><a href="https://zh-yue.wikipedia.org/wiki/%E6%A8%A1%E7%B5%84:Citation/CS1" title="模組:Citation/CS1 – Cantonese" lang="yue" hreflang="yue" data-title="模組:Citation/CS1" data-language-autonym="粵語" data-language-local-name="Cantonese" class="interlanguage-link-target"><span>粵語</span></a></li><li class="interlanguage-link interwiki-zu mw-list-item"><a href="https://zu.wikipedia.org/wiki/Module:Citation/CS1" title="Module:Citation/CS1 – Zulu" lang="zu" hreflang="zu" data-title="Module:Citation/CS1" data-language-autonym="IsiZulu" data-language-local-name="Zulu" class="interlanguage-link-target"><span>IsiZulu</span></a></li> </ul> <div class="after-portlet after-portlet-lang"><span class="wb-langlinks-edit wb-langlinks-link"><a href="https://www.wikidata.org/wiki/Special:EntityPage/Q15403807#sitelinks-wikipedia" title="Edit interlanguage links" class="wbc-editpage">Edit links</a></span></div> </div> </div> </div> </header> <div class="vector-page-toolbar"> <div class="vector-page-toolbar-container"> <div id="left-navigation"> <nav aria-label="Lewainoa"> <div id="p-associated-pages" class="vector-menu vector-menu-tabs mw-portlet mw-portlet-associated-pages" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="ca-nstab-module" class="selected vector-tab-noicon mw-list-item"><a href="/wiki/Module:Citation/CS1" title="View the module page [c]" accesskey="c"><span>Module</span></a></li><li id="ca-talk" class="new vector-tab-noicon mw-list-item"><a href="/w/index.php?title=Module_talk:Citation/CS1&action=edit&redlink=1" rel="discussion" class="new" title="Kūkākūkā e pili ana i ka ʻaoʻao mealoko (haku ʻia ʻole) [t]" accesskey="t"><span>Kūkākūkā</span></a></li> </ul> </div> </div> <div id="vector-variants-dropdown" class="vector-dropdown emptyPortlet" > <input type="checkbox" id="vector-variants-dropdown-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-vector-variants-dropdown" class="vector-dropdown-checkbox " aria-label="Change language variant" > <label id="vector-variants-dropdown-label" for="vector-variants-dropdown-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet" aria-hidden="true" ><span class="vector-dropdown-label-text">English</span> </label> <div class="vector-dropdown-content"> <div id="p-variants" class="vector-menu mw-portlet mw-portlet-variants emptyPortlet" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> </ul> </div> </div> </div> </div> </nav> </div> <div id="right-navigation" class="vector-collapsible"> <nav aria-label="Nānaina"> <div id="p-views" class="vector-menu vector-menu-tabs mw-portlet mw-portlet-views" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="ca-view" class="selected vector-tab-noicon mw-list-item"><a href="/wiki/Module:Citation/CS1"><span>Heluhelu</span></a></li><li id="ca-edit" class="vector-tab-noicon mw-list-item"><a href="/w/index.php?title=Module:Citation/CS1&action=edit" title="Edit the source code of this page [e]" accesskey="e"><span>Edit source</span></a></li><li id="ca-history" class="vector-tab-noicon mw-list-item"><a href="/w/index.php?title=Module:Citation/CS1&action=history" title="Nā kāmua mamua o kēia ʻaoʻao [h]" accesskey="h"><span>Nānā i ka mōʻaukala</span></a></li> </ul> </div> </div> </nav> <nav class="vector-page-tools-landmark" aria-label="Page tools"> <div id="vector-page-tools-dropdown" class="vector-dropdown vector-page-tools-dropdown" > <input type="checkbox" id="vector-page-tools-dropdown-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-vector-page-tools-dropdown" class="vector-dropdown-checkbox " aria-label="Hāmeʻa" > <label id="vector-page-tools-dropdown-label" for="vector-page-tools-dropdown-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet" aria-hidden="true" ><span class="vector-dropdown-label-text">Hāmeʻa</span> </label> <div class="vector-dropdown-content"> <div id="vector-page-tools-unpinned-container" class="vector-unpinned-container"> <div id="vector-page-tools" class="vector-page-tools vector-pinnable-element"> <div class="vector-pinnable-header vector-page-tools-pinnable-header vector-pinnable-header-unpinned" data-feature-name="page-tools-pinned" data-pinnable-element-id="vector-page-tools" data-pinned-container-id="vector-page-tools-pinned-container" data-unpinned-container-id="vector-page-tools-unpinned-container" > <div class="vector-pinnable-header-label">Tools</div> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-pin-button" data-event-name="pinnable-header.vector-page-tools.pin">move to sidebar</button> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-unpin-button" data-event-name="pinnable-header.vector-page-tools.unpin">hide</button> </div> <div id="p-cactions" class="vector-menu mw-portlet mw-portlet-cactions emptyPortlet vector-has-collapsible-items" title="More options" > <div class="vector-menu-heading"> Actions </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="ca-more-view" class="selected vector-more-collapsible-item mw-list-item"><a href="/wiki/Module:Citation/CS1"><span>Heluhelu</span></a></li><li id="ca-more-edit" class="vector-more-collapsible-item mw-list-item"><a href="/w/index.php?title=Module:Citation/CS1&action=edit" title="Edit the source code of this page [e]" accesskey="e"><span>Edit source</span></a></li><li id="ca-more-history" class="vector-more-collapsible-item mw-list-item"><a href="/w/index.php?title=Module:Citation/CS1&action=history"><span>Nānā i ka mōʻaukala</span></a></li> </ul> </div> </div> <div id="p-tb" class="vector-menu mw-portlet mw-portlet-tb" > <div class="vector-menu-heading"> General </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="t-whatlinkshere" class="mw-list-item"><a href="/wiki/Papa_nui:WhatLinksHere/Module:Citation/CS1" title="He papahelu o nā ʻaoʻao wiki apau e loulou i ʻaneʻi [j]" accesskey="j"><span>He aha e loulou iho ai</span></a></li><li id="t-recentchangeslinked" class="mw-list-item"><a href="/wiki/Papa_nui:RecentChangesLinked/Module:Citation/CS1" rel="nofollow" title="Nā loli hou i nā ʻaoʻao i loulou ʻia mai kēia ʻaoʻao [k]" accesskey="k"><span>Nā loli hou ʻālike</span></a></li><li id="t-upload" class="mw-list-item"><a href="//commons.wikimedia.org/wiki/Special:UploadWizard?uselang=haw" title="Ho‘ouka i nā waihona [u]" accesskey="u"><span>Ho'ohui i ka waihona</span></a></li><li id="t-specialpages" class="mw-list-item"><a href="/wiki/Papa_nui:PapaNui" title="He papainoa o nā ʻaoʻao kūikawā apau [q]" accesskey="q"><span>Nā papa nui</span></a></li><li id="t-permalink" class="mw-list-item"><a href="/w/index.php?title=Module:Citation/CS1&oldid=70467" title="Loulou paʻa no kēia kāmua o ka ʻaoʻao"><span>Ka loulou pa'a</span></a></li><li id="t-info" class="mw-list-item"><a href="/w/index.php?title=Module:Citation/CS1&action=info" title="More information about this page"><span>ʻIke ʻaoʻao</span></a></li><li id="t-urlshortener" class="mw-list-item"><a href="/w/index.php?title=Papa_nui:UrlShortener&url=https%3A%2F%2Fhaw.wikipedia.org%2Fwiki%2FModule%3ACitation%2FCS1"><span>Get shortened URL</span></a></li><li id="t-urlshortener-qrcode" class="mw-list-item"><a href="/w/index.php?title=Papa_nui:QrCode&url=https%3A%2F%2Fhaw.wikipedia.org%2Fwiki%2FModule%3ACitation%2FCS1"><span>Download QR code</span></a></li> </ul> </div> </div> <div id="p-electronpdfservice-sidebar-portlet-heading" class="vector-menu mw-portlet mw-portlet-electronpdfservice-sidebar-portlet-heading" > <div class="vector-menu-heading"> Print/export </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="electron-print_pdf" class="mw-list-item"><a href="/w/index.php?title=Papa_nui:DownloadAsPdf&page=Module%3ACitation%2FCS1&action=show-download-screen"><span>Download as PDF</span></a></li><li id="t-print" class="mw-list-item"><a href="javascript:print();" rel="alternate" title="Mana paʻi pono o kēia ʻaoʻao [p]" accesskey="p"><span>Ke 'ano hiki ke pa'i</span></a></li> </ul> </div> </div> <div id="p-wikibase-otherprojects" class="vector-menu mw-portlet mw-portlet-wikibase-otherprojects" > <div class="vector-menu-heading"> In other projects </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li class="wb-otherproject-link wb-otherproject-commons mw-list-item"><a href="https://commons.wikimedia.org/wiki/Module:Citation/CS1" hreflang="en"><span>Wikimedia Commons</span></a></li><li class="wb-otherproject-link wb-otherproject-foundation mw-list-item"><a href="https://foundation.wikimedia.org/wiki/Module:Citation/CS1" hreflang="en"><span>Wikimedia Foundation</span></a></li><li class="wb-otherproject-link wb-otherproject-meta mw-list-item"><a href="https://meta.wikimedia.org/wiki/Module:Citation/CS1" hreflang="en"><span>Meta-Wiki</span></a></li><li class="wb-otherproject-link wb-otherproject-outreach mw-list-item"><a href="https://outreach.wikimedia.org/wiki/Module:Citation/CS1" hreflang="en"><span>Wikimedia Outreach</span></a></li><li class="wb-otherproject-link wb-otherproject-species mw-list-item"><a href="https://species.wikimedia.org/wiki/Module:Citation/CS1" hreflang="en"><span>Wikispecies</span></a></li><li class="wb-otherproject-link wb-otherproject-wikidata mw-list-item"><a href="https://www.wikidata.org/wiki/Module:Citation/CS1" hreflang="en"><span>Wikidata</span></a></li><li id="t-wikibase" class="wb-otherproject-link wb-otherproject-wikibase-dataitem mw-list-item"><a href="https://www.wikidata.org/wiki/Special:EntityPage/Q15403807" title="Link to connected data repository item [g]" accesskey="g"><span>Wikidata item</span></a></li> </ul> </div> </div> </div> </div> </div> </div> </nav> </div> </div> </div> <div class="vector-column-end"> <div class="vector-sticky-pinned-container"> <nav class="vector-page-tools-landmark" aria-label="Page tools"> <div id="vector-page-tools-pinned-container" class="vector-pinned-container"> </div> </nav> <nav class="vector-appearance-landmark" aria-label="Appearance"> <div id="vector-appearance-pinned-container" class="vector-pinned-container"> <div id="vector-appearance" class="vector-appearance vector-pinnable-element"> <div class="vector-pinnable-header vector-appearance-pinnable-header vector-pinnable-header-pinned" data-feature-name="appearance-pinned" data-pinnable-element-id="vector-appearance" data-pinned-container-id="vector-appearance-pinned-container" data-unpinned-container-id="vector-appearance-unpinned-container" > <div class="vector-pinnable-header-label">Appearance</div> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-pin-button" data-event-name="pinnable-header.vector-appearance.pin">move to sidebar</button> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-unpin-button" data-event-name="pinnable-header.vector-appearance.unpin">hide</button> </div> </div> </div> </nav> </div> </div> <div id="bodyContent" class="vector-body" aria-labelledby="firstHeading" data-mw-ve-target-container> <div class="vector-body-before-content"> <div class="mw-indicators"> </div> <div id="siteSub" class="noprint">Mai Wikipedia</div> </div> <div id="contentSub"><div id="mw-content-subtitle"></div></div> <div id="mw-content-text" class="mw-body-content"><div class="mw-content-ltr mw-parser-output" lang="haw" dir="ltr"><p><i>Documentation for this module may be created at <a href="/w/index.php?title=Module:Citation/CS1/doc&action=edit&redlink=1" class="new" title="Module:Citation/CS1/doc (haku ʻia ʻole)">Module:Citation/CS1/doc</a></i> </p><div class="mw-highlight mw-highlight-lang-lua mw-content-ltr mw-highlight-lines" dir="ltr"><pre><span></span><span id="L-1"><a href="#L-1"><span class="linenos" data-line="1"></span></a><span class="kd">local</span> <span class="n">z</span> <span class="o">=</span> <span class="p">{</span> </span><span id="L-2"><a href="#L-2"><span class="linenos" data-line="2"></span></a> <span class="n">error_categories</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-3"><a href="#L-3"><span class="linenos" data-line="3"></span></a> <span class="n">error_ids</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-4"><a href="#L-4"><span class="linenos" data-line="4"></span></a> <span class="n">message_tail</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-5"><a href="#L-5"><span class="linenos" data-line="5"></span></a><span class="p">}</span> </span><span id="L-6"><a href="#L-6"><span class="linenos" data-line="6"></span></a> </span><span id="L-7"><a href="#L-7"><span class="linenos" data-line="7"></span></a><span class="c1">-- Include translation message hooks, ID and error handling configuration settings.</span> </span><span id="L-8"><a href="#L-8"><span class="linenos" data-line="8"></span></a><span class="kd">local</span> <span class="n">cfg</span> <span class="o">=</span> <span class="n">mw</span><span class="p">.</span><span class="n">loadData</span><span class="p">(</span> <span class="s1">'Module:Citation/CS1/Configuration'</span> <span class="p">);</span> </span><span id="L-9"><a href="#L-9"><span class="linenos" data-line="9"></span></a> </span><span id="L-10"><a href="#L-10"><span class="linenos" data-line="10"></span></a><span class="c1">-- Contains a list of all recognized parameters</span> </span><span id="L-11"><a href="#L-11"><span class="linenos" data-line="11"></span></a><span class="kd">local</span> <span class="n">whitelist</span> <span class="o">=</span> <span class="n">mw</span><span class="p">.</span><span class="n">loadData</span><span class="p">(</span> <span class="s1">'Module:Citation/CS1/Whitelist'</span> <span class="p">);</span> </span><span id="L-12"><a href="#L-12"><span class="linenos" data-line="12"></span></a> </span><span id="L-13"><a href="#L-13"><span class="linenos" data-line="13"></span></a><span class="c1">-- Whether variable is set or not</span> </span><span id="L-14"><a href="#L-14"><span class="linenos" data-line="14"></span></a><span class="kr">function</span> <span class="nf">is_set</span><span class="p">(</span> <span class="n">var</span> <span class="p">)</span> </span><span id="L-15"><a href="#L-15"><span class="linenos" data-line="15"></span></a> <span class="kr">return</span> <span class="ow">not</span> <span class="p">(</span><span class="n">var</span> <span class="o">==</span> <span class="kc">nil</span> <span class="ow">or</span> <span class="n">var</span> <span class="o">==</span> <span class="s1">''</span><span class="p">);</span> </span><span id="L-16"><a href="#L-16"><span class="linenos" data-line="16"></span></a><span class="kr">end</span> </span><span id="L-17"><a href="#L-17"><span class="linenos" data-line="17"></span></a> </span><span id="L-18"><a href="#L-18"><span class="linenos" data-line="18"></span></a><span class="c1">-- First set variable or nil if none</span> </span><span id="L-19"><a href="#L-19"><span class="linenos" data-line="19"></span></a><span class="kr">function</span> <span class="nf">first_set</span><span class="p">(...)</span> </span><span id="L-20"><a href="#L-20"><span class="linenos" data-line="20"></span></a> <span class="kd">local</span> <span class="n">list</span> <span class="o">=</span> <span class="p">{...};</span> </span><span id="L-21"><a href="#L-21"><span class="linenos" data-line="21"></span></a> <span class="kr">for</span> <span class="n">_</span><span class="p">,</span> <span class="n">var</span> <span class="kr">in</span> <span class="nb">pairs</span><span class="p">(</span><span class="n">list</span><span class="p">)</span> <span class="kr">do</span> </span><span id="L-22"><a href="#L-22"><span class="linenos" data-line="22"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">var</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-23"><a href="#L-23"><span class="linenos" data-line="23"></span></a> <span class="kr">return</span> <span class="n">var</span><span class="p">;</span> </span><span id="L-24"><a href="#L-24"><span class="linenos" data-line="24"></span></a> <span class="kr">end</span> </span><span id="L-25"><a href="#L-25"><span class="linenos" data-line="25"></span></a> <span class="kr">end</span> </span><span id="L-26"><a href="#L-26"><span class="linenos" data-line="26"></span></a><span class="kr">end</span> </span><span id="L-27"><a href="#L-27"><span class="linenos" data-line="27"></span></a> </span><span id="L-28"><a href="#L-28"><span class="linenos" data-line="28"></span></a><span class="c1">-- Whether needle is in haystack</span> </span><span id="L-29"><a href="#L-29"><span class="linenos" data-line="29"></span></a><span class="kr">function</span> <span class="nf">inArray</span><span class="p">(</span> <span class="n">needle</span><span class="p">,</span> <span class="n">haystack</span> <span class="p">)</span> </span><span id="L-30"><a href="#L-30"><span class="linenos" data-line="30"></span></a> <span class="kr">if</span> <span class="n">needle</span> <span class="o">==</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-31"><a href="#L-31"><span class="linenos" data-line="31"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> </span><span id="L-32"><a href="#L-32"><span class="linenos" data-line="32"></span></a> <span class="kr">end</span> </span><span id="L-33"><a href="#L-33"><span class="linenos" data-line="33"></span></a> <span class="kr">for</span> <span class="n">n</span><span class="p">,</span><span class="n">v</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span> <span class="n">haystack</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-34"><a href="#L-34"><span class="linenos" data-line="34"></span></a> <span class="kr">if</span> <span class="n">v</span> <span class="o">==</span> <span class="n">needle</span> <span class="kr">then</span> </span><span id="L-35"><a href="#L-35"><span class="linenos" data-line="35"></span></a> <span class="kr">return</span> <span class="n">n</span><span class="p">;</span> </span><span id="L-36"><a href="#L-36"><span class="linenos" data-line="36"></span></a> <span class="kr">end</span> </span><span id="L-37"><a href="#L-37"><span class="linenos" data-line="37"></span></a> <span class="kr">end</span> </span><span id="L-38"><a href="#L-38"><span class="linenos" data-line="38"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> </span><span id="L-39"><a href="#L-39"><span class="linenos" data-line="39"></span></a><span class="kr">end</span> </span><span id="L-40"><a href="#L-40"><span class="linenos" data-line="40"></span></a> </span><span id="L-41"><a href="#L-41"><span class="linenos" data-line="41"></span></a><span class="cm">--[[</span> </span><span id="L-42"><a href="#L-42"><span class="linenos" data-line="42"></span></a><span class="cm">Categorize and emit an error message when the citation contains one or more deprecated parameters. Because deprecated parameters (currently |day=, |month=,</span> </span><span id="L-43"><a href="#L-43"><span class="linenos" data-line="43"></span></a><span class="cm">|coauthor=, and |coauthors=) aren't related to each other and because these parameters may be concatenated into the variables used by |date= and |author#= (and aliases)</span> </span><span id="L-44"><a href="#L-44"><span class="linenos" data-line="44"></span></a><span class="cm">details of which parameter caused the error message are not provided. Only one error message is emitted regarless of the number of deprecated parameters in the citation.</span> </span><span id="L-45"><a href="#L-45"><span class="linenos" data-line="45"></span></a><span class="cm">]]</span> </span><span id="L-46"><a href="#L-46"><span class="linenos" data-line="46"></span></a><span class="kr">function</span> <span class="nf">deprecated_parameter</span><span class="p">()</span> </span><span id="L-47"><a href="#L-47"><span class="linenos" data-line="47"></span></a> <span class="kr">if</span> <span class="kc">true</span> <span class="o">~=</span> <span class="n">Page_in_deprecated_cat</span> <span class="kr">then</span> <span class="c1">-- if we haven't been here before then set a </span> </span><span id="L-48"><a href="#L-48"><span class="linenos" data-line="48"></span></a> <span class="n">Page_in_deprecated_cat</span><span class="o">=</span><span class="kc">true</span><span class="p">;</span> <span class="c1">-- sticky flag so that if there are more than one deprecated parameter the category is added only once</span> </span><span id="L-49"><a href="#L-49"><span class="linenos" data-line="49"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span><span class="p">,</span> <span class="p">{</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'deprecated_params'</span><span class="p">,</span> <span class="p">{</span><span class="n">error_message</span><span class="p">},</span> <span class="kc">true</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> <span class="c1">-- add error message</span> </span><span id="L-50"><a href="#L-50"><span class="linenos" data-line="50"></span></a> <span class="kr">end</span> </span><span id="L-51"><a href="#L-51"><span class="linenos" data-line="51"></span></a><span class="kr">end</span> </span><span id="L-52"><a href="#L-52"><span class="linenos" data-line="52"></span></a> </span><span id="L-53"><a href="#L-53"><span class="linenos" data-line="53"></span></a><span class="c1">-- Populates numbered arguments in a message string using an argument table.</span> </span><span id="L-54"><a href="#L-54"><span class="linenos" data-line="54"></span></a><span class="kr">function</span> <span class="nf">substitute</span><span class="p">(</span> <span class="n">msg</span><span class="p">,</span> <span class="n">args</span> <span class="p">)</span> </span><span id="L-55"><a href="#L-55"><span class="linenos" data-line="55"></span></a><span class="c1">-- return args and tostring( mw.message.newRawMessage( msg, args ) ) or msg;</span> </span><span id="L-56"><a href="#L-56"><span class="linenos" data-line="56"></span></a> <span class="kr">return</span> <span class="n">args</span> <span class="ow">and</span> <span class="n">mw</span><span class="p">.</span><span class="n">message</span><span class="p">.</span><span class="n">newRawMessage</span><span class="p">(</span> <span class="n">msg</span><span class="p">,</span> <span class="n">args</span> <span class="p">):</span><span class="n">plain</span><span class="p">()</span> <span class="ow">or</span> <span class="n">msg</span><span class="p">;</span> </span><span id="L-57"><a href="#L-57"><span class="linenos" data-line="57"></span></a><span class="kr">end</span> </span><span id="L-58"><a href="#L-58"><span class="linenos" data-line="58"></span></a> </span><span id="L-59"><a href="#L-59"><span class="linenos" data-line="59"></span></a><span class="cm">--[[</span> </span><span id="L-60"><a href="#L-60"><span class="linenos" data-line="60"></span></a><span class="cm">Apply kerning to open the space between the quote mark provided by the Module and a leading or trailing quote mark contained in a |title= or |chapter= parameter's value.</span> </span><span id="L-61"><a href="#L-61"><span class="linenos" data-line="61"></span></a><span class="cm">This function will positive kern either single or double quotes:</span> </span><span id="L-62"><a href="#L-62"><span class="linenos" data-line="62"></span></a><span class="cm"> "'Unkerned title with leading and trailing single quote marks'"</span> </span><span id="L-63"><a href="#L-63"><span class="linenos" data-line="63"></span></a><span class="cm"> " 'Kerned title with leading and trailing single quote marks' " (in real life the kerning isn't as wide as this example)</span> </span><span id="L-64"><a href="#L-64"><span class="linenos" data-line="64"></span></a><span class="cm">]]</span> </span><span id="L-65"><a href="#L-65"><span class="linenos" data-line="65"></span></a><span class="kr">function</span> <span class="nf">kern_quotes</span> <span class="p">(</span><span class="n">str</span><span class="p">)</span> </span><span id="L-66"><a href="#L-66"><span class="linenos" data-line="66"></span></a> <span class="kd">local</span> <span class="n">left</span><span class="o">=</span><span class="s1">'<span style="padding-left:0.2em;">%1</span>'</span><span class="p">;</span> <span class="c1">-- spacing to use when title contains leading single or double quote mark</span> </span><span id="L-67"><a href="#L-67"><span class="linenos" data-line="67"></span></a> <span class="kd">local</span> <span class="n">right</span><span class="o">=</span><span class="s1">'<span style="padding-right:0.2em;">%1</span>'</span><span class="p">;</span> <span class="c1">-- spacing to use when title contains trailing single or double quote mark</span> </span><span id="L-68"><a href="#L-68"><span class="linenos" data-line="68"></span></a> </span><span id="L-69"><a href="#L-69"><span class="linenos" data-line="69"></span></a> <span class="kr">if</span> <span class="n">str</span><span class="p">:</span><span class="n">match</span> <span class="p">(</span><span class="s2">"^[</span><span class="se">\"\'</span><span class="s2">][^</span><span class="se">\'</span><span class="s2">]"</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-70"><a href="#L-70"><span class="linenos" data-line="70"></span></a> <span class="n">str</span> <span class="o">=</span> <span class="nb">string.gsub</span><span class="p">(</span> <span class="n">str</span><span class="p">,</span> <span class="s2">"^[</span><span class="se">\"\'</span><span class="s2">]"</span><span class="p">,</span> <span class="n">left</span><span class="p">,</span> <span class="mi">1</span> <span class="p">);</span> <span class="c1">-- replace (captured) leading single or double quote with left-side <span></span> </span><span id="L-71"><a href="#L-71"><span class="linenos" data-line="71"></span></a> <span class="kr">end</span> </span><span id="L-72"><a href="#L-72"><span class="linenos" data-line="72"></span></a> <span class="kr">if</span> <span class="n">str</span><span class="p">:</span><span class="n">match</span> <span class="p">(</span><span class="s2">"[^</span><span class="se">\'</span><span class="s2">][</span><span class="se">\"\'</span><span class="s2">]$"</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-73"><a href="#L-73"><span class="linenos" data-line="73"></span></a> <span class="n">str</span> <span class="o">=</span> <span class="nb">string.gsub</span><span class="p">(</span> <span class="n">str</span><span class="p">,</span> <span class="s2">"[</span><span class="se">\"\'</span><span class="s2">]$"</span><span class="p">,</span> <span class="n">right</span><span class="p">,</span> <span class="mi">1</span> <span class="p">);</span> <span class="c1">-- replace (captured) trailing single or double quote with right-side <span></span> </span><span id="L-74"><a href="#L-74"><span class="linenos" data-line="74"></span></a> <span class="kr">end</span> </span><span id="L-75"><a href="#L-75"><span class="linenos" data-line="75"></span></a> <span class="kr">return</span> <span class="n">str</span><span class="p">;</span> </span><span id="L-76"><a href="#L-76"><span class="linenos" data-line="76"></span></a><span class="kr">end</span> </span><span id="L-77"><a href="#L-77"><span class="linenos" data-line="77"></span></a> </span><span id="L-78"><a href="#L-78"><span class="linenos" data-line="78"></span></a><span class="c1">-- Wraps a string using a message_list configuration taking one argument</span> </span><span id="L-79"><a href="#L-79"><span class="linenos" data-line="79"></span></a><span class="kr">function</span> <span class="nf">wrap</span><span class="p">(</span> <span class="n">key</span><span class="p">,</span> <span class="n">str</span><span class="p">,</span> <span class="n">lower</span> <span class="p">)</span> </span><span id="L-80"><a href="#L-80"><span class="linenos" data-line="80"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">str</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-81"><a href="#L-81"><span class="linenos" data-line="81"></span></a> <span class="kr">return</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-82"><a href="#L-82"><span class="linenos" data-line="82"></span></a> <span class="kr">elseif</span> <span class="n">inArray</span><span class="p">(</span> <span class="n">key</span><span class="p">,</span> <span class="p">{</span> <span class="s1">'italic-title'</span><span class="p">,</span> <span class="s1">'trans-italic-title'</span> <span class="p">}</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-83"><a href="#L-83"><span class="linenos" data-line="83"></span></a> <span class="n">str</span> <span class="o">=</span> <span class="n">safeforitalics</span><span class="p">(</span> <span class="n">str</span> <span class="p">);</span> </span><span id="L-84"><a href="#L-84"><span class="linenos" data-line="84"></span></a> <span class="kr">end</span> </span><span id="L-85"><a href="#L-85"><span class="linenos" data-line="85"></span></a> <span class="kr">if</span> <span class="n">lower</span> <span class="o">==</span> <span class="kc">true</span> <span class="kr">then</span> </span><span id="L-86"><a href="#L-86"><span class="linenos" data-line="86"></span></a> <span class="kr">return</span> <span class="n">substitute</span><span class="p">(</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="n">key</span><span class="p">]:</span><span class="n">lower</span><span class="p">(),</span> <span class="p">{</span><span class="n">str</span><span class="p">}</span> <span class="p">);</span> </span><span id="L-87"><a href="#L-87"><span class="linenos" data-line="87"></span></a> <span class="kr">else</span> </span><span id="L-88"><a href="#L-88"><span class="linenos" data-line="88"></span></a> <span class="kr">return</span> <span class="n">substitute</span><span class="p">(</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="n">key</span><span class="p">],</span> <span class="p">{</span><span class="n">str</span><span class="p">}</span> <span class="p">);</span> </span><span id="L-89"><a href="#L-89"><span class="linenos" data-line="89"></span></a> <span class="kr">end</span> </span><span id="L-90"><a href="#L-90"><span class="linenos" data-line="90"></span></a><span class="kr">end</span> </span><span id="L-91"><a href="#L-91"><span class="linenos" data-line="91"></span></a> </span><span id="L-92"><a href="#L-92"><span class="linenos" data-line="92"></span></a><span class="cm">--[[</span> </span><span id="L-93"><a href="#L-93"><span class="linenos" data-line="93"></span></a><span class="cm">Argument wrapper. This function provides support for argument </span> </span><span id="L-94"><a href="#L-94"><span class="linenos" data-line="94"></span></a><span class="cm">mapping defined in the configuration file so that multiple names</span> </span><span id="L-95"><a href="#L-95"><span class="linenos" data-line="95"></span></a><span class="cm">can be transparently aliased to single internal variable.</span> </span><span id="L-96"><a href="#L-96"><span class="linenos" data-line="96"></span></a><span class="cm">]]</span> </span><span id="L-97"><a href="#L-97"><span class="linenos" data-line="97"></span></a><span class="kr">function</span> <span class="nf">argument_wrapper</span><span class="p">(</span> <span class="n">args</span> <span class="p">)</span> </span><span id="L-98"><a href="#L-98"><span class="linenos" data-line="98"></span></a> <span class="kd">local</span> <span class="n">origin</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-99"><a href="#L-99"><span class="linenos" data-line="99"></span></a> </span><span id="L-100"><a href="#L-100"><span class="linenos" data-line="100"></span></a> <span class="kr">return</span> <span class="nb">setmetatable</span><span class="p">({</span> </span><span id="L-101"><a href="#L-101"><span class="linenos" data-line="101"></span></a> <span class="n">ORIGIN</span> <span class="o">=</span> <span class="kr">function</span><span class="p">(</span> <span class="n">self</span><span class="p">,</span> <span class="n">k</span> <span class="p">)</span> </span><span id="L-102"><a href="#L-102"><span class="linenos" data-line="102"></span></a> <span class="kd">local</span> <span class="n">dummy</span> <span class="o">=</span> <span class="n">self</span><span class="p">[</span><span class="n">k</span><span class="p">];</span> <span class="c1">--force the variable to be loaded.</span> </span><span id="L-103"><a href="#L-103"><span class="linenos" data-line="103"></span></a> <span class="kr">return</span> <span class="n">origin</span><span class="p">[</span><span class="n">k</span><span class="p">];</span> </span><span id="L-104"><a href="#L-104"><span class="linenos" data-line="104"></span></a> <span class="kr">end</span> </span><span id="L-105"><a href="#L-105"><span class="linenos" data-line="105"></span></a> <span class="p">},</span> </span><span id="L-106"><a href="#L-106"><span class="linenos" data-line="106"></span></a> <span class="p">{</span> </span><span id="L-107"><a href="#L-107"><span class="linenos" data-line="107"></span></a> <span class="n">__index</span> <span class="o">=</span> <span class="kr">function</span> <span class="p">(</span> <span class="n">tbl</span><span class="p">,</span> <span class="n">k</span> <span class="p">)</span> </span><span id="L-108"><a href="#L-108"><span class="linenos" data-line="108"></span></a> <span class="kr">if</span> <span class="n">origin</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-109"><a href="#L-109"><span class="linenos" data-line="109"></span></a> <span class="kr">return</span> <span class="kc">nil</span><span class="p">;</span> </span><span id="L-110"><a href="#L-110"><span class="linenos" data-line="110"></span></a> <span class="kr">end</span> </span><span id="L-111"><a href="#L-111"><span class="linenos" data-line="111"></span></a> </span><span id="L-112"><a href="#L-112"><span class="linenos" data-line="112"></span></a> <span class="kd">local</span> <span class="n">args</span><span class="p">,</span> <span class="n">list</span><span class="p">,</span> <span class="n">v</span> <span class="o">=</span> <span class="n">args</span><span class="p">,</span> <span class="n">cfg</span><span class="p">.</span><span class="n">aliases</span><span class="p">[</span><span class="n">k</span><span class="p">];</span> </span><span id="L-113"><a href="#L-113"><span class="linenos" data-line="113"></span></a> </span><span id="L-114"><a href="#L-114"><span class="linenos" data-line="114"></span></a> <span class="kr">if</span> <span class="nb">type</span><span class="p">(</span> <span class="n">list</span> <span class="p">)</span> <span class="o">==</span> <span class="s1">'table'</span> <span class="kr">then</span> </span><span id="L-115"><a href="#L-115"><span class="linenos" data-line="115"></span></a> <span class="n">v</span><span class="p">,</span> <span class="n">origin</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">=</span> <span class="n">selectone</span><span class="p">(</span> <span class="n">args</span><span class="p">,</span> <span class="n">list</span><span class="p">,</span> <span class="s1">'redundant_parameters'</span> <span class="p">);</span> </span><span id="L-116"><a href="#L-116"><span class="linenos" data-line="116"></span></a> <span class="kr">if</span> <span class="n">origin</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">==</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-117"><a href="#L-117"><span class="linenos" data-line="117"></span></a> <span class="n">origin</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> <span class="c1">-- Empty string, not nil</span> </span><span id="L-118"><a href="#L-118"><span class="linenos" data-line="118"></span></a> <span class="kr">end</span> </span><span id="L-119"><a href="#L-119"><span class="linenos" data-line="119"></span></a> <span class="kr">elseif</span> <span class="n">list</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-120"><a href="#L-120"><span class="linenos" data-line="120"></span></a> <span class="n">v</span><span class="p">,</span> <span class="n">origin</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">=</span> <span class="n">args</span><span class="p">[</span><span class="n">list</span><span class="p">],</span> <span class="n">list</span><span class="p">;</span> </span><span id="L-121"><a href="#L-121"><span class="linenos" data-line="121"></span></a> <span class="kr">else</span> </span><span id="L-122"><a href="#L-122"><span class="linenos" data-line="122"></span></a> <span class="c1">-- maybe let through instead of raising an error?</span> </span><span id="L-123"><a href="#L-123"><span class="linenos" data-line="123"></span></a> <span class="c1">-- v, origin[k] = args[k], k;</span> </span><span id="L-124"><a href="#L-124"><span class="linenos" data-line="124"></span></a> <span class="nb">error</span><span class="p">(</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'unknown_argument_map'</span><span class="p">]</span> <span class="p">);</span> </span><span id="L-125"><a href="#L-125"><span class="linenos" data-line="125"></span></a> <span class="kr">end</span> </span><span id="L-126"><a href="#L-126"><span class="linenos" data-line="126"></span></a> </span><span id="L-127"><a href="#L-127"><span class="linenos" data-line="127"></span></a> <span class="c1">-- Empty strings, not nil;</span> </span><span id="L-128"><a href="#L-128"><span class="linenos" data-line="128"></span></a> <span class="kr">if</span> <span class="n">v</span> <span class="o">==</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-129"><a href="#L-129"><span class="linenos" data-line="129"></span></a> <span class="n">v</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">defaults</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="ow">or</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-130"><a href="#L-130"><span class="linenos" data-line="130"></span></a> <span class="n">origin</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-131"><a href="#L-131"><span class="linenos" data-line="131"></span></a> <span class="kr">end</span> </span><span id="L-132"><a href="#L-132"><span class="linenos" data-line="132"></span></a> </span><span id="L-133"><a href="#L-133"><span class="linenos" data-line="133"></span></a> <span class="n">tbl</span> <span class="o">=</span> <span class="nb">rawset</span><span class="p">(</span> <span class="n">tbl</span><span class="p">,</span> <span class="n">k</span><span class="p">,</span> <span class="n">v</span> <span class="p">);</span> </span><span id="L-134"><a href="#L-134"><span class="linenos" data-line="134"></span></a> <span class="kr">return</span> <span class="n">v</span><span class="p">;</span> </span><span id="L-135"><a href="#L-135"><span class="linenos" data-line="135"></span></a> <span class="kr">end</span><span class="p">,</span> </span><span id="L-136"><a href="#L-136"><span class="linenos" data-line="136"></span></a> <span class="p">});</span> </span><span id="L-137"><a href="#L-137"><span class="linenos" data-line="137"></span></a><span class="kr">end</span> </span><span id="L-138"><a href="#L-138"><span class="linenos" data-line="138"></span></a> </span><span id="L-139"><a href="#L-139"><span class="linenos" data-line="139"></span></a><span class="cm">--[[</span> </span><span id="L-140"><a href="#L-140"><span class="linenos" data-line="140"></span></a><span class="cm">Looks for a parameter's name in the whitelist.</span> </span><span id="L-141"><a href="#L-141"><span class="linenos" data-line="141"></span></a> </span><span id="L-142"><a href="#L-142"><span class="linenos" data-line="142"></span></a><span class="cm">Parameters in the whitelist can have three values:</span> </span><span id="L-143"><a href="#L-143"><span class="linenos" data-line="143"></span></a><span class="cm"> true - active, supported parameters</span> </span><span id="L-144"><a href="#L-144"><span class="linenos" data-line="144"></span></a><span class="cm"> false - deprecated, supported parameters</span> </span><span id="L-145"><a href="#L-145"><span class="linenos" data-line="145"></span></a><span class="cm"> nil - unsupported parameters</span> </span><span id="L-146"><a href="#L-146"><span class="linenos" data-line="146"></span></a><span class="cm">]]</span> </span><span id="L-147"><a href="#L-147"><span class="linenos" data-line="147"></span></a><span class="kr">function</span> <span class="nf">validate</span><span class="p">(</span> <span class="n">name</span> <span class="p">)</span> </span><span id="L-148"><a href="#L-148"><span class="linenos" data-line="148"></span></a> <span class="kd">local</span> <span class="n">name</span> <span class="o">=</span> <span class="nb">tostring</span><span class="p">(</span> <span class="n">name</span> <span class="p">);</span> </span><span id="L-149"><a href="#L-149"><span class="linenos" data-line="149"></span></a> <span class="kd">local</span> <span class="n">state</span> <span class="o">=</span> <span class="n">whitelist</span><span class="p">.</span><span class="n">basic_arguments</span><span class="p">[</span> <span class="n">name</span> <span class="p">];</span> </span><span id="L-150"><a href="#L-150"><span class="linenos" data-line="150"></span></a> </span><span id="L-151"><a href="#L-151"><span class="linenos" data-line="151"></span></a> <span class="c1">-- Normal arguments</span> </span><span id="L-152"><a href="#L-152"><span class="linenos" data-line="152"></span></a> <span class="kr">if</span> <span class="kc">true</span> <span class="o">==</span> <span class="n">state</span> <span class="kr">then</span> <span class="kr">return</span> <span class="kc">true</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- valid actively supported parameter</span> </span><span id="L-153"><a href="#L-153"><span class="linenos" data-line="153"></span></a> <span class="kr">if</span> <span class="kc">false</span> <span class="o">==</span> <span class="n">state</span> <span class="kr">then</span> </span><span id="L-154"><a href="#L-154"><span class="linenos" data-line="154"></span></a> <span class="n">deprecated_parameter</span> <span class="p">();</span> <span class="c1">-- parameter is deprecated but still supported</span> </span><span id="L-155"><a href="#L-155"><span class="linenos" data-line="155"></span></a> <span class="kr">return</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-156"><a href="#L-156"><span class="linenos" data-line="156"></span></a> <span class="kr">end</span> </span><span id="L-157"><a href="#L-157"><span class="linenos" data-line="157"></span></a> </span><span id="L-158"><a href="#L-158"><span class="linenos" data-line="158"></span></a> <span class="c1">-- Arguments with numbers in them</span> </span><span id="L-159"><a href="#L-159"><span class="linenos" data-line="159"></span></a> <span class="n">name</span> <span class="o">=</span> <span class="n">name</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s2">"%d+"</span><span class="p">,</span> <span class="s2">"#"</span> <span class="p">);</span> <span class="c1">-- replace digit(s) with # (last25 becomes last#</span> </span><span id="L-160"><a href="#L-160"><span class="linenos" data-line="160"></span></a> <span class="n">state</span> <span class="o">=</span> <span class="n">whitelist</span><span class="p">.</span><span class="n">numbered_arguments</span><span class="p">[</span> <span class="n">name</span> <span class="p">];</span> </span><span id="L-161"><a href="#L-161"><span class="linenos" data-line="161"></span></a> <span class="kr">if</span> <span class="kc">true</span> <span class="o">==</span> <span class="n">state</span> <span class="kr">then</span> <span class="kr">return</span> <span class="kc">true</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- valid actively supported parameter</span> </span><span id="L-162"><a href="#L-162"><span class="linenos" data-line="162"></span></a> <span class="kr">if</span> <span class="kc">false</span> <span class="o">==</span> <span class="n">state</span> <span class="kr">then</span> </span><span id="L-163"><a href="#L-163"><span class="linenos" data-line="163"></span></a> <span class="n">deprecated_parameter</span> <span class="p">();</span> <span class="c1">-- parameter is deprecated but still supported</span> </span><span id="L-164"><a href="#L-164"><span class="linenos" data-line="164"></span></a> <span class="kr">return</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-165"><a href="#L-165"><span class="linenos" data-line="165"></span></a> <span class="kr">end</span> </span><span id="L-166"><a href="#L-166"><span class="linenos" data-line="166"></span></a> </span><span id="L-167"><a href="#L-167"><span class="linenos" data-line="167"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="c1">-- Not supported because not found or name is set to nil</span> </span><span id="L-168"><a href="#L-168"><span class="linenos" data-line="168"></span></a><span class="kr">end</span> </span><span id="L-169"><a href="#L-169"><span class="linenos" data-line="169"></span></a> </span><span id="L-170"><a href="#L-170"><span class="linenos" data-line="170"></span></a><span class="c1">-- Formats a comment for error trapping</span> </span><span id="L-171"><a href="#L-171"><span class="linenos" data-line="171"></span></a><span class="kr">function</span> <span class="nf">errorcomment</span><span class="p">(</span> <span class="n">content</span><span class="p">,</span> <span class="n">hidden</span> <span class="p">)</span> </span><span id="L-172"><a href="#L-172"><span class="linenos" data-line="172"></span></a> <span class="kr">return</span> <span class="n">wrap</span><span class="p">(</span> <span class="n">hidden</span> <span class="ow">and</span> <span class="s1">'hidden-error'</span> <span class="ow">or</span> <span class="s1">'visible-error'</span><span class="p">,</span> <span class="n">content</span> <span class="p">);</span> </span><span id="L-173"><a href="#L-173"><span class="linenos" data-line="173"></span></a><span class="kr">end</span> </span><span id="L-174"><a href="#L-174"><span class="linenos" data-line="174"></span></a> </span><span id="L-175"><a href="#L-175"><span class="linenos" data-line="175"></span></a><span class="cm">--[[</span> </span><span id="L-176"><a href="#L-176"><span class="linenos" data-line="176"></span></a><span class="cm">Sets an error condition and returns the appropriate error message. The actual placement</span> </span><span id="L-177"><a href="#L-177"><span class="linenos" data-line="177"></span></a><span class="cm">of the error message in the output is the responsibility of the calling function.</span> </span><span id="L-178"><a href="#L-178"><span class="linenos" data-line="178"></span></a><span class="cm">]]</span> </span><span id="L-179"><a href="#L-179"><span class="linenos" data-line="179"></span></a><span class="kr">function</span> <span class="nf">seterror</span><span class="p">(</span> <span class="n">error_id</span><span class="p">,</span> <span class="n">arguments</span><span class="p">,</span> <span class="n">raw</span><span class="p">,</span> <span class="n">prefix</span><span class="p">,</span> <span class="n">suffix</span> <span class="p">)</span> </span><span id="L-180"><a href="#L-180"><span class="linenos" data-line="180"></span></a> <span class="kd">local</span> <span class="n">error_state</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">error_conditions</span><span class="p">[</span> <span class="n">error_id</span> <span class="p">];</span> </span><span id="L-181"><a href="#L-181"><span class="linenos" data-line="181"></span></a> </span><span id="L-182"><a href="#L-182"><span class="linenos" data-line="182"></span></a> <span class="n">prefix</span> <span class="o">=</span> <span class="n">prefix</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-183"><a href="#L-183"><span class="linenos" data-line="183"></span></a> <span class="n">suffix</span> <span class="o">=</span> <span class="n">suffix</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-184"><a href="#L-184"><span class="linenos" data-line="184"></span></a> </span><span id="L-185"><a href="#L-185"><span class="linenos" data-line="185"></span></a> <span class="kr">if</span> <span class="n">error_state</span> <span class="o">==</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-186"><a href="#L-186"><span class="linenos" data-line="186"></span></a> <span class="nb">error</span><span class="p">(</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'undefined_error'</span><span class="p">]</span> <span class="p">);</span> </span><span id="L-187"><a href="#L-187"><span class="linenos" data-line="187"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">error_state</span><span class="p">.</span><span class="n">category</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-188"><a href="#L-188"><span class="linenos" data-line="188"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">error_categories</span><span class="p">,</span> <span class="n">error_state</span><span class="p">.</span><span class="n">category</span> <span class="p">);</span> </span><span id="L-189"><a href="#L-189"><span class="linenos" data-line="189"></span></a> <span class="kr">end</span> </span><span id="L-190"><a href="#L-190"><span class="linenos" data-line="190"></span></a> </span><span id="L-191"><a href="#L-191"><span class="linenos" data-line="191"></span></a> <span class="kd">local</span> <span class="n">message</span> <span class="o">=</span> <span class="n">substitute</span><span class="p">(</span> <span class="n">error_state</span><span class="p">.</span><span class="n">message</span><span class="p">,</span> <span class="n">arguments</span> <span class="p">);</span> </span><span id="L-192"><a href="#L-192"><span class="linenos" data-line="192"></span></a> </span><span id="L-193"><a href="#L-193"><span class="linenos" data-line="193"></span></a> <span class="n">message</span> <span class="o">=</span> <span class="n">message</span> <span class="o">..</span> <span class="s2">" ([["</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'help page link'</span><span class="p">]</span> <span class="o">..</span> </span><span id="L-194"><a href="#L-194"><span class="linenos" data-line="194"></span></a> <span class="s2">"#"</span> <span class="o">..</span> <span class="n">error_state</span><span class="p">.</span><span class="n">anchor</span> <span class="o">..</span> <span class="s2">"|"</span> <span class="o">..</span> </span><span id="L-195"><a href="#L-195"><span class="linenos" data-line="195"></span></a> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'help page label'</span><span class="p">]</span> <span class="o">..</span> <span class="s2">"]])"</span><span class="p">;</span> </span><span id="L-196"><a href="#L-196"><span class="linenos" data-line="196"></span></a> </span><span id="L-197"><a href="#L-197"><span class="linenos" data-line="197"></span></a> <span class="n">z</span><span class="p">.</span><span class="n">error_ids</span><span class="p">[</span> <span class="n">error_id</span> <span class="p">]</span> <span class="o">=</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-198"><a href="#L-198"><span class="linenos" data-line="198"></span></a> <span class="kr">if</span> <span class="n">inArray</span><span class="p">(</span> <span class="n">error_id</span><span class="p">,</span> <span class="p">{</span> <span class="s1">'bare_url_missing_title'</span><span class="p">,</span> <span class="s1">'trans_missing_title'</span> <span class="p">}</span> <span class="p">)</span> </span><span id="L-199"><a href="#L-199"><span class="linenos" data-line="199"></span></a> <span class="ow">and</span> <span class="n">z</span><span class="p">.</span><span class="n">error_ids</span><span class="p">[</span><span class="s1">'citation_missing_title'</span><span class="p">]</span> <span class="kr">then</span> </span><span id="L-200"><a href="#L-200"><span class="linenos" data-line="200"></span></a> <span class="kr">return</span> <span class="s1">''</span><span class="p">,</span> <span class="kc">false</span><span class="p">;</span> </span><span id="L-201"><a href="#L-201"><span class="linenos" data-line="201"></span></a> <span class="kr">end</span> </span><span id="L-202"><a href="#L-202"><span class="linenos" data-line="202"></span></a> </span><span id="L-203"><a href="#L-203"><span class="linenos" data-line="203"></span></a> <span class="n">message</span> <span class="o">=</span> <span class="nb">table.concat</span><span class="p">({</span> <span class="n">prefix</span><span class="p">,</span> <span class="n">message</span><span class="p">,</span> <span class="n">suffix</span> <span class="p">});</span> </span><span id="L-204"><a href="#L-204"><span class="linenos" data-line="204"></span></a> </span><span id="L-205"><a href="#L-205"><span class="linenos" data-line="205"></span></a> <span class="kr">if</span> <span class="n">raw</span> <span class="o">==</span> <span class="kc">true</span> <span class="kr">then</span> </span><span id="L-206"><a href="#L-206"><span class="linenos" data-line="206"></span></a> <span class="kr">return</span> <span class="n">message</span><span class="p">,</span> <span class="n">error_state</span><span class="p">.</span><span class="n">hidden</span><span class="p">;</span> </span><span id="L-207"><a href="#L-207"><span class="linenos" data-line="207"></span></a> <span class="kr">end</span> </span><span id="L-208"><a href="#L-208"><span class="linenos" data-line="208"></span></a> </span><span id="L-209"><a href="#L-209"><span class="linenos" data-line="209"></span></a> <span class="kr">return</span> <span class="n">errorcomment</span><span class="p">(</span> <span class="n">message</span><span class="p">,</span> <span class="n">error_state</span><span class="p">.</span><span class="n">hidden</span> <span class="p">);</span> </span><span id="L-210"><a href="#L-210"><span class="linenos" data-line="210"></span></a><span class="kr">end</span> </span><span id="L-211"><a href="#L-211"><span class="linenos" data-line="211"></span></a> </span><span id="L-212"><a href="#L-212"><span class="linenos" data-line="212"></span></a><span class="c1">-- Formats a wiki style external link</span> </span><span id="L-213"><a href="#L-213"><span class="linenos" data-line="213"></span></a><span class="kr">function</span> <span class="nf">externallinkid</span><span class="p">(</span><span class="n">options</span><span class="p">)</span> </span><span id="L-214"><a href="#L-214"><span class="linenos" data-line="214"></span></a> <span class="kd">local</span> <span class="n">url_string</span> <span class="o">=</span> <span class="n">options</span><span class="p">.</span><span class="n">id</span><span class="p">;</span> </span><span id="L-215"><a href="#L-215"><span class="linenos" data-line="215"></span></a> <span class="kr">if</span> <span class="n">options</span><span class="p">.</span><span class="n">encode</span> <span class="o">==</span> <span class="kc">true</span> <span class="ow">or</span> <span class="n">options</span><span class="p">.</span><span class="n">encode</span> <span class="o">==</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-216"><a href="#L-216"><span class="linenos" data-line="216"></span></a> <span class="n">url_string</span> <span class="o">=</span> <span class="n">mw</span><span class="p">.</span><span class="n">uri</span><span class="p">.</span><span class="n">encode</span><span class="p">(</span> <span class="n">url_string</span> <span class="p">);</span> </span><span id="L-217"><a href="#L-217"><span class="linenos" data-line="217"></span></a> <span class="kr">end</span> </span><span id="L-218"><a href="#L-218"><span class="linenos" data-line="218"></span></a> <span class="kr">return</span> <span class="n">mw</span><span class="p">.</span><span class="n">ustring</span><span class="p">.</span><span class="n">format</span><span class="p">(</span> <span class="s1">'[[%s|%s]]%s[%s%s%s %s]'</span><span class="p">,</span> </span><span id="L-219"><a href="#L-219"><span class="linenos" data-line="219"></span></a> <span class="n">options</span><span class="p">.</span><span class="n">link</span><span class="p">,</span> <span class="n">options</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> <span class="n">options</span><span class="p">.</span><span class="n">separator</span> <span class="ow">or</span> <span class="s2">"&nbsp;"</span><span class="p">,</span> </span><span id="L-220"><a href="#L-220"><span class="linenos" data-line="220"></span></a> <span class="n">options</span><span class="p">.</span><span class="n">prefix</span><span class="p">,</span> <span class="n">url_string</span><span class="p">,</span> <span class="n">options</span><span class="p">.</span><span class="n">suffix</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">,</span> </span><span id="L-221"><a href="#L-221"><span class="linenos" data-line="221"></span></a> <span class="n">mw</span><span class="p">.</span><span class="n">text</span><span class="p">.</span><span class="n">nowiki</span><span class="p">(</span><span class="n">options</span><span class="p">.</span><span class="n">id</span><span class="p">)</span> </span><span id="L-222"><a href="#L-222"><span class="linenos" data-line="222"></span></a> <span class="p">);</span> </span><span id="L-223"><a href="#L-223"><span class="linenos" data-line="223"></span></a><span class="kr">end</span> </span><span id="L-224"><a href="#L-224"><span class="linenos" data-line="224"></span></a> </span><span id="L-225"><a href="#L-225"><span class="linenos" data-line="225"></span></a><span class="c1">-- Formats a wiki style internal link</span> </span><span id="L-226"><a href="#L-226"><span class="linenos" data-line="226"></span></a><span class="kr">function</span> <span class="nf">internallinkid</span><span class="p">(</span><span class="n">options</span><span class="p">)</span> </span><span id="L-227"><a href="#L-227"><span class="linenos" data-line="227"></span></a> <span class="kr">return</span> <span class="n">mw</span><span class="p">.</span><span class="n">ustring</span><span class="p">.</span><span class="n">format</span><span class="p">(</span> <span class="s1">'[[%s|%s]]%s[[%s%s%s|%s]]'</span><span class="p">,</span> </span><span id="L-228"><a href="#L-228"><span class="linenos" data-line="228"></span></a> <span class="n">options</span><span class="p">.</span><span class="n">link</span><span class="p">,</span> <span class="n">options</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> <span class="n">options</span><span class="p">.</span><span class="n">separator</span> <span class="ow">or</span> <span class="s2">"&nbsp;"</span><span class="p">,</span> </span><span id="L-229"><a href="#L-229"><span class="linenos" data-line="229"></span></a> <span class="n">options</span><span class="p">.</span><span class="n">prefix</span><span class="p">,</span> <span class="n">options</span><span class="p">.</span><span class="n">id</span><span class="p">,</span> <span class="n">options</span><span class="p">.</span><span class="n">suffix</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">,</span> </span><span id="L-230"><a href="#L-230"><span class="linenos" data-line="230"></span></a> <span class="n">mw</span><span class="p">.</span><span class="n">text</span><span class="p">.</span><span class="n">nowiki</span><span class="p">(</span><span class="n">options</span><span class="p">.</span><span class="n">id</span><span class="p">)</span> </span><span id="L-231"><a href="#L-231"><span class="linenos" data-line="231"></span></a> <span class="p">);</span> </span><span id="L-232"><a href="#L-232"><span class="linenos" data-line="232"></span></a><span class="kr">end</span> </span><span id="L-233"><a href="#L-233"><span class="linenos" data-line="233"></span></a> </span><span id="L-234"><a href="#L-234"><span class="linenos" data-line="234"></span></a><span class="c1">-- Format an external link with error checking</span> </span><span id="L-235"><a href="#L-235"><span class="linenos" data-line="235"></span></a><span class="kr">function</span> <span class="nf">externallink</span><span class="p">(</span> <span class="n">URL</span><span class="p">,</span> <span class="n">label</span><span class="p">,</span> <span class="n">source</span> <span class="p">)</span> </span><span id="L-236"><a href="#L-236"><span class="linenos" data-line="236"></span></a> <span class="kd">local</span> <span class="n">error_str</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-237"><a href="#L-237"><span class="linenos" data-line="237"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">label</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-238"><a href="#L-238"><span class="linenos" data-line="238"></span></a> <span class="n">label</span> <span class="o">=</span> <span class="n">URL</span><span class="p">;</span> </span><span id="L-239"><a href="#L-239"><span class="linenos" data-line="239"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">source</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-240"><a href="#L-240"><span class="linenos" data-line="240"></span></a> <span class="n">error_str</span> <span class="o">=</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'bare_url_missing_title'</span><span class="p">,</span> <span class="p">{</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'parameter'</span><span class="p">,</span> <span class="n">source</span> <span class="p">)</span> <span class="p">},</span> <span class="kc">false</span><span class="p">,</span> <span class="s2">" "</span> <span class="p">);</span> </span><span id="L-241"><a href="#L-241"><span class="linenos" data-line="241"></span></a> <span class="kr">else</span> </span><span id="L-242"><a href="#L-242"><span class="linenos" data-line="242"></span></a> <span class="nb">error</span><span class="p">(</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s2">"bare_url_no_origin"</span><span class="p">]</span> <span class="p">);</span> </span><span id="L-243"><a href="#L-243"><span class="linenos" data-line="243"></span></a> <span class="kr">end</span> </span><span id="L-244"><a href="#L-244"><span class="linenos" data-line="244"></span></a> <span class="kr">end</span> </span><span id="L-245"><a href="#L-245"><span class="linenos" data-line="245"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">checkurl</span><span class="p">(</span> <span class="n">URL</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-246"><a href="#L-246"><span class="linenos" data-line="246"></span></a> <span class="n">error_str</span> <span class="o">=</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'bad_url'</span><span class="p">,</span> <span class="p">{},</span> <span class="kc">false</span><span class="p">,</span> <span class="s2">" "</span> <span class="p">)</span> <span class="o">..</span> <span class="n">error_str</span><span class="p">;</span> </span><span id="L-247"><a href="#L-247"><span class="linenos" data-line="247"></span></a> <span class="kr">end</span> </span><span id="L-248"><a href="#L-248"><span class="linenos" data-line="248"></span></a> <span class="kr">return</span> <span class="nb">table.concat</span><span class="p">({</span> <span class="s2">"["</span><span class="p">,</span> <span class="n">URL</span><span class="p">,</span> <span class="s2">" "</span><span class="p">,</span> <span class="n">safeforurl</span><span class="p">(</span> <span class="n">label</span> <span class="p">),</span> <span class="s2">"]"</span><span class="p">,</span> <span class="n">error_str</span> <span class="p">});</span> </span><span id="L-249"><a href="#L-249"><span class="linenos" data-line="249"></span></a><span class="kr">end</span> </span><span id="L-250"><a href="#L-250"><span class="linenos" data-line="250"></span></a> </span><span id="L-251"><a href="#L-251"><span class="linenos" data-line="251"></span></a><span class="c1">-- Formats a link to Amazon</span> </span><span id="L-252"><a href="#L-252"><span class="linenos" data-line="252"></span></a><span class="kr">function</span> <span class="nf">amazon</span><span class="p">(</span><span class="n">id</span><span class="p">,</span> <span class="n">domain</span><span class="p">)</span> </span><span id="L-253"><a href="#L-253"><span class="linenos" data-line="253"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">domain</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-254"><a href="#L-254"><span class="linenos" data-line="254"></span></a> <span class="n">domain</span> <span class="o">=</span> <span class="s2">"com"</span> </span><span id="L-255"><a href="#L-255"><span class="linenos" data-line="255"></span></a> <span class="kr">elseif</span> <span class="p">(</span> <span class="s2">"jp"</span> <span class="o">==</span> <span class="n">domain</span> <span class="ow">or</span> <span class="s2">"uk"</span> <span class="o">==</span> <span class="n">domain</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-256"><a href="#L-256"><span class="linenos" data-line="256"></span></a> <span class="n">domain</span> <span class="o">=</span> <span class="s2">"co."</span> <span class="o">..</span> <span class="n">domain</span> </span><span id="L-257"><a href="#L-257"><span class="linenos" data-line="257"></span></a> <span class="kr">end</span> </span><span id="L-258"><a href="#L-258"><span class="linenos" data-line="258"></span></a> <span class="kd">local</span> <span class="n">handler</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">id_handlers</span><span class="p">[</span><span class="s1">'ASIN'</span><span class="p">];</span> </span><span id="L-259"><a href="#L-259"><span class="linenos" data-line="259"></span></a> <span class="kr">return</span> <span class="n">externallinkid</span><span class="p">({</span><span class="n">link</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">link</span><span class="p">,</span> </span><span id="L-260"><a href="#L-260"><span class="linenos" data-line="260"></span></a> <span class="n">label</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span> <span class="p">,</span> <span class="n">prefix</span><span class="o">=</span><span class="s2">"//www.amazon."</span><span class="o">..</span><span class="n">domain</span><span class="o">..</span><span class="s2">"/dp/"</span><span class="p">,</span><span class="n">id</span><span class="o">=</span><span class="n">id</span><span class="p">,</span> </span><span id="L-261"><a href="#L-261"><span class="linenos" data-line="261"></span></a> <span class="n">encode</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">encode</span><span class="p">,</span> <span class="n">separator</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">separator</span><span class="p">})</span> </span><span id="L-262"><a href="#L-262"><span class="linenos" data-line="262"></span></a><span class="kr">end</span> </span><span id="L-263"><a href="#L-263"><span class="linenos" data-line="263"></span></a> </span><span id="L-264"><a href="#L-264"><span class="linenos" data-line="264"></span></a><span class="cm">--[[</span> </span><span id="L-265"><a href="#L-265"><span class="linenos" data-line="265"></span></a><span class="cm">Format PMID and do simple error checking. PMIDs are sequential numbers beginning at 1 and counting up. This code checks the PMID to see that it</span> </span><span id="L-266"><a href="#L-266"><span class="linenos" data-line="266"></span></a><span class="cm">contains only digits and is less than test_limit; the value in local variable test_limit will need to be updated periodically as more PMIDs are issued.</span> </span><span id="L-267"><a href="#L-267"><span class="linenos" data-line="267"></span></a><span class="cm">]]</span> </span><span id="L-268"><a href="#L-268"><span class="linenos" data-line="268"></span></a><span class="kr">function</span> <span class="nf">pmid</span><span class="p">(</span><span class="n">id</span><span class="p">)</span> </span><span id="L-269"><a href="#L-269"><span class="linenos" data-line="269"></span></a> <span class="kd">local</span> <span class="n">test_limit</span> <span class="o">=</span> <span class="mi">30000000</span><span class="p">;</span> <span class="c1">-- update this value as PMIDs approach</span> </span><span id="L-270"><a href="#L-270"><span class="linenos" data-line="270"></span></a> <span class="kd">local</span> <span class="n">handler</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">id_handlers</span><span class="p">[</span><span class="s1">'PMID'</span><span class="p">];</span> </span><span id="L-271"><a href="#L-271"><span class="linenos" data-line="271"></span></a> <span class="kd">local</span> <span class="n">err_cat</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> <span class="c1">-- presume that PMID is valid</span> </span><span id="L-272"><a href="#L-272"><span class="linenos" data-line="272"></span></a> </span><span id="L-273"><a href="#L-273"><span class="linenos" data-line="273"></span></a> <span class="kr">if</span> <span class="n">id</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"[^%d]"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- if PMID has anything but digits</span> </span><span id="L-274"><a href="#L-274"><span class="linenos" data-line="274"></span></a> <span class="n">err_cat</span> <span class="o">=</span> <span class="s1">' '</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'bad_pmid'</span> <span class="p">);</span> <span class="c1">-- set an error message</span> </span><span id="L-275"><a href="#L-275"><span class="linenos" data-line="275"></span></a> <span class="kr">else</span> <span class="c1">-- PMID is only digits</span> </span><span id="L-276"><a href="#L-276"><span class="linenos" data-line="276"></span></a> <span class="kd">local</span> <span class="n">id_num</span> <span class="o">=</span> <span class="nb">tonumber</span><span class="p">(</span><span class="n">id</span><span class="p">);</span> <span class="c1">-- convert id to a number for range testing</span> </span><span id="L-277"><a href="#L-277"><span class="linenos" data-line="277"></span></a> <span class="kr">if</span> <span class="mi">1</span> <span class="o">></span> <span class="n">id_num</span> <span class="ow">or</span> <span class="n">test_limit</span> <span class="o"><</span> <span class="n">id_num</span> <span class="kr">then</span> <span class="c1">-- if PMID is outside test limit boundaries</span> </span><span id="L-278"><a href="#L-278"><span class="linenos" data-line="278"></span></a> <span class="n">err_cat</span> <span class="o">=</span> <span class="s1">' '</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'bad_pmid'</span> <span class="p">);</span> <span class="c1">-- set an error message</span> </span><span id="L-279"><a href="#L-279"><span class="linenos" data-line="279"></span></a> <span class="kr">end</span> </span><span id="L-280"><a href="#L-280"><span class="linenos" data-line="280"></span></a> <span class="kr">end</span> </span><span id="L-281"><a href="#L-281"><span class="linenos" data-line="281"></span></a> </span><span id="L-282"><a href="#L-282"><span class="linenos" data-line="282"></span></a> <span class="kr">return</span> <span class="n">externallinkid</span><span class="p">({</span><span class="n">link</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">link</span><span class="p">,</span> <span class="n">label</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> </span><span id="L-283"><a href="#L-283"><span class="linenos" data-line="283"></span></a> <span class="n">prefix</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">prefix</span><span class="p">,</span><span class="n">id</span><span class="o">=</span><span class="n">id</span><span class="p">,</span><span class="n">separator</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">separator</span><span class="p">,</span> <span class="n">encode</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">encode</span><span class="p">})</span> <span class="o">..</span> <span class="n">err_cat</span><span class="p">;</span> </span><span id="L-284"><a href="#L-284"><span class="linenos" data-line="284"></span></a><span class="kr">end</span> </span><span id="L-285"><a href="#L-285"><span class="linenos" data-line="285"></span></a> </span><span id="L-286"><a href="#L-286"><span class="linenos" data-line="286"></span></a><span class="cm">--[[</span> </span><span id="L-287"><a href="#L-287"><span class="linenos" data-line="287"></span></a><span class="cm">Determines if a PMC identifier's online version is embargoed. Compares the date in |embargo= against today's date. If embargo date is</span> </span><span id="L-288"><a href="#L-288"><span class="linenos" data-line="288"></span></a><span class="cm">in the future, returns true; otherwse, returns false because the embargo has expired or |embargo= not set in this cite.</span> </span><span id="L-289"><a href="#L-289"><span class="linenos" data-line="289"></span></a><span class="cm">]]</span> </span><span id="L-290"><a href="#L-290"><span class="linenos" data-line="290"></span></a><span class="kr">function</span> <span class="nf">is_embargoed</span><span class="p">(</span><span class="n">embargo</span><span class="p">)</span> </span><span id="L-291"><a href="#L-291"><span class="linenos" data-line="291"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">embargo</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-292"><a href="#L-292"><span class="linenos" data-line="292"></span></a> <span class="kd">local</span> <span class="n">lang</span> <span class="o">=</span> <span class="n">mw</span><span class="p">.</span><span class="n">getContentLanguage</span><span class="p">();</span> </span><span id="L-293"><a href="#L-293"><span class="linenos" data-line="293"></span></a> <span class="kd">local</span> <span class="n">good1</span><span class="p">,</span> <span class="n">embargo_date</span><span class="p">,</span> <span class="n">good2</span><span class="p">,</span> <span class="n">todays_date</span><span class="p">;</span> </span><span id="L-294"><a href="#L-294"><span class="linenos" data-line="294"></span></a> <span class="n">good1</span><span class="p">,</span> <span class="n">embargo_date</span> <span class="o">=</span> <span class="nb">pcall</span><span class="p">(</span> <span class="n">lang</span><span class="p">.</span><span class="n">formatDate</span><span class="p">,</span> <span class="n">lang</span><span class="p">,</span> <span class="s1">'U'</span><span class="p">,</span> <span class="n">embargo</span> <span class="p">);</span> </span><span id="L-295"><a href="#L-295"><span class="linenos" data-line="295"></span></a> <span class="n">good2</span><span class="p">,</span> <span class="n">todays_date</span> <span class="o">=</span> <span class="nb">pcall</span><span class="p">(</span> <span class="n">lang</span><span class="p">.</span><span class="n">formatDate</span><span class="p">,</span> <span class="n">lang</span><span class="p">,</span> <span class="s1">'U'</span> <span class="p">);</span> </span><span id="L-296"><a href="#L-296"><span class="linenos" data-line="296"></span></a> </span><span id="L-297"><a href="#L-297"><span class="linenos" data-line="297"></span></a> <span class="kr">if</span> <span class="n">good1</span> <span class="ow">and</span> <span class="n">good2</span> <span class="ow">and</span> <span class="nb">tonumber</span><span class="p">(</span> <span class="n">embargo_date</span> <span class="p">)</span> <span class="o">>=</span> <span class="nb">tonumber</span><span class="p">(</span> <span class="n">todays_date</span> <span class="p">)</span> <span class="kr">then</span> <span class="c1">--is embargo date is in the future?</span> </span><span id="L-298"><a href="#L-298"><span class="linenos" data-line="298"></span></a> <span class="kr">return</span> <span class="kc">true</span><span class="p">;</span> <span class="c1">-- still embargoed</span> </span><span id="L-299"><a href="#L-299"><span class="linenos" data-line="299"></span></a> <span class="kr">end</span> </span><span id="L-300"><a href="#L-300"><span class="linenos" data-line="300"></span></a> <span class="kr">end</span> </span><span id="L-301"><a href="#L-301"><span class="linenos" data-line="301"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="c1">-- embargo expired or |embargo= not set</span> </span><span id="L-302"><a href="#L-302"><span class="linenos" data-line="302"></span></a><span class="kr">end</span> </span><span id="L-303"><a href="#L-303"><span class="linenos" data-line="303"></span></a> </span><span id="L-304"><a href="#L-304"><span class="linenos" data-line="304"></span></a><span class="cm">--[[</span> </span><span id="L-305"><a href="#L-305"><span class="linenos" data-line="305"></span></a><span class="cm">Formats a PMC and checks for embargoed articles. The embargo parameter takes a date for a value. If the embargo date is in the future</span> </span><span id="L-306"><a href="#L-306"><span class="linenos" data-line="306"></span></a><span class="cm">the PMC identifier will not be linked to the article. If the embargo specifies a date in the past, or if it is empty or omitted, then</span> </span><span id="L-307"><a href="#L-307"><span class="linenos" data-line="307"></span></a><span class="cm">the PMC identifier is linked to the article through the link at cfg.id_handlers['PMC'].prefix.</span> </span><span id="L-308"><a href="#L-308"><span class="linenos" data-line="308"></span></a><span class="cm">]]</span> </span><span id="L-309"><a href="#L-309"><span class="linenos" data-line="309"></span></a><span class="kr">function</span> <span class="nf">pmc</span><span class="p">(</span><span class="n">id</span><span class="p">,</span> <span class="n">embargo</span><span class="p">)</span> </span><span id="L-310"><a href="#L-310"><span class="linenos" data-line="310"></span></a> <span class="kd">local</span> <span class="n">handler</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">id_handlers</span><span class="p">[</span><span class="s1">'PMC'</span><span class="p">];</span> </span><span id="L-311"><a href="#L-311"><span class="linenos" data-line="311"></span></a> </span><span id="L-312"><a href="#L-312"><span class="linenos" data-line="312"></span></a> <span class="kd">local</span> <span class="n">text</span><span class="p">;</span> </span><span id="L-313"><a href="#L-313"><span class="linenos" data-line="313"></span></a> </span><span id="L-314"><a href="#L-314"><span class="linenos" data-line="314"></span></a> <span class="kr">if</span> <span class="n">is_embargoed</span><span class="p">(</span><span class="n">embargo</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-315"><a href="#L-315"><span class="linenos" data-line="315"></span></a> <span class="n">text</span><span class="o">=</span><span class="s2">"[["</span> <span class="o">..</span> <span class="n">handler</span><span class="p">.</span><span class="n">link</span> <span class="o">..</span> <span class="s2">"|"</span> <span class="o">..</span> <span class="n">handler</span><span class="p">.</span><span class="n">label</span> <span class="o">..</span> <span class="s2">"]]:"</span> <span class="o">..</span> <span class="n">handler</span><span class="p">.</span><span class="n">separator</span> <span class="o">..</span> <span class="n">id</span><span class="p">;</span> <span class="c1">--still embargoed so no external link</span> </span><span id="L-316"><a href="#L-316"><span class="linenos" data-line="316"></span></a> <span class="kr">else</span> </span><span id="L-317"><a href="#L-317"><span class="linenos" data-line="317"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">externallinkid</span><span class="p">({</span><span class="n">link</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">link</span><span class="p">,</span> <span class="n">label</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> <span class="c1">--no embargo date, ok to link to article</span> </span><span id="L-318"><a href="#L-318"><span class="linenos" data-line="318"></span></a> <span class="n">prefix</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">prefix</span><span class="p">,</span><span class="n">id</span><span class="o">=</span><span class="n">id</span><span class="p">,</span><span class="n">separator</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">separator</span><span class="p">,</span> <span class="n">encode</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">encode</span><span class="p">})</span> </span><span id="L-319"><a href="#L-319"><span class="linenos" data-line="319"></span></a> <span class="kr">end</span> </span><span id="L-320"><a href="#L-320"><span class="linenos" data-line="320"></span></a> <span class="kr">return</span> <span class="n">text</span><span class="p">;</span> </span><span id="L-321"><a href="#L-321"><span class="linenos" data-line="321"></span></a><span class="kr">end</span> </span><span id="L-322"><a href="#L-322"><span class="linenos" data-line="322"></span></a> </span><span id="L-323"><a href="#L-323"><span class="linenos" data-line="323"></span></a><span class="c1">-- Formats a DOI and checks for DOI errors.</span> </span><span id="L-324"><a href="#L-324"><span class="linenos" data-line="324"></span></a><span class="kr">function</span> <span class="nf">doi</span><span class="p">(</span><span class="n">id</span><span class="p">,</span> <span class="n">inactive</span><span class="p">)</span> </span><span id="L-325"><a href="#L-325"><span class="linenos" data-line="325"></span></a> <span class="kd">local</span> <span class="n">cat</span> <span class="o">=</span> <span class="s2">""</span> </span><span id="L-326"><a href="#L-326"><span class="linenos" data-line="326"></span></a> <span class="kd">local</span> <span class="n">handler</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">id_handlers</span><span class="p">[</span><span class="s1">'DOI'</span><span class="p">];</span> </span><span id="L-327"><a href="#L-327"><span class="linenos" data-line="327"></span></a> </span><span id="L-328"><a href="#L-328"><span class="linenos" data-line="328"></span></a> <span class="kd">local</span> <span class="n">text</span><span class="p">;</span> </span><span id="L-329"><a href="#L-329"><span class="linenos" data-line="329"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">inactive</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-330"><a href="#L-330"><span class="linenos" data-line="330"></span></a> <span class="kd">local</span> <span class="n">inactive_year</span> <span class="o">=</span> <span class="n">inactive</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"%d%d%d%d"</span><span class="p">)</span> <span class="ow">or</span> <span class="s1">''</span><span class="p">;</span> <span class="c1">-- try to get the year portion from the inactive date</span> </span><span id="L-331"><a href="#L-331"><span class="linenos" data-line="331"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="s2">"[["</span> <span class="o">..</span> <span class="n">handler</span><span class="p">.</span><span class="n">link</span> <span class="o">..</span> <span class="s2">"|"</span> <span class="o">..</span> <span class="n">handler</span><span class="p">.</span><span class="n">label</span> <span class="o">..</span> <span class="s2">"]]:"</span> <span class="o">..</span> <span class="n">id</span><span class="p">;</span> </span><span id="L-332"><a href="#L-332"><span class="linenos" data-line="332"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">inactive_year</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-333"><a href="#L-333"><span class="linenos" data-line="333"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">error_categories</span><span class="p">,</span> <span class="s2">"Pages with DOIs inactive since "</span> <span class="o">..</span> <span class="n">inactive_year</span> <span class="p">);</span> </span><span id="L-334"><a href="#L-334"><span class="linenos" data-line="334"></span></a> <span class="kr">else</span> </span><span id="L-335"><a href="#L-335"><span class="linenos" data-line="335"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">error_categories</span><span class="p">,</span> <span class="s2">"Pages with inactive DOIs"</span> <span class="p">);</span> <span class="c1">-- when inactive doesn't contain a recognizable year</span> </span><span id="L-336"><a href="#L-336"><span class="linenos" data-line="336"></span></a> <span class="kr">end</span> </span><span id="L-337"><a href="#L-337"><span class="linenos" data-line="337"></span></a> <span class="n">inactive</span> <span class="o">=</span> <span class="s2">" ("</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'inactive'</span><span class="p">]</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">inactive</span> <span class="o">..</span> <span class="s2">")"</span> </span><span id="L-338"><a href="#L-338"><span class="linenos" data-line="338"></span></a> <span class="kr">else</span> </span><span id="L-339"><a href="#L-339"><span class="linenos" data-line="339"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">externallinkid</span><span class="p">({</span><span class="n">link</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">link</span><span class="p">,</span> <span class="n">label</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> </span><span id="L-340"><a href="#L-340"><span class="linenos" data-line="340"></span></a> <span class="n">prefix</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">prefix</span><span class="p">,</span><span class="n">id</span><span class="o">=</span><span class="n">id</span><span class="p">,</span><span class="n">separator</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">separator</span><span class="p">,</span> <span class="n">encode</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">encode</span><span class="p">})</span> </span><span id="L-341"><a href="#L-341"><span class="linenos" data-line="341"></span></a> <span class="n">inactive</span> <span class="o">=</span> <span class="s2">""</span> </span><span id="L-342"><a href="#L-342"><span class="linenos" data-line="342"></span></a> <span class="kr">end</span> </span><span id="L-343"><a href="#L-343"><span class="linenos" data-line="343"></span></a> </span><span id="L-344"><a href="#L-344"><span class="linenos" data-line="344"></span></a> <span class="kr">if</span> <span class="kc">nil</span> <span class="o">==</span> <span class="n">id</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"^10%.[^%s–]-[^%.,]$"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- doi must begin with '10.', must not contain spaces or endashes, and must not end with period or comma</span> </span><span id="L-345"><a href="#L-345"><span class="linenos" data-line="345"></span></a> <span class="n">cat</span> <span class="o">=</span> <span class="s1">' '</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'bad_doi'</span> <span class="p">);</span> </span><span id="L-346"><a href="#L-346"><span class="linenos" data-line="346"></span></a> <span class="kr">end</span> </span><span id="L-347"><a href="#L-347"><span class="linenos" data-line="347"></span></a> <span class="kr">return</span> <span class="n">text</span> <span class="o">..</span> <span class="n">inactive</span> <span class="o">..</span> <span class="n">cat</span> </span><span id="L-348"><a href="#L-348"><span class="linenos" data-line="348"></span></a><span class="kr">end</span> </span><span id="L-349"><a href="#L-349"><span class="linenos" data-line="349"></span></a> </span><span id="L-350"><a href="#L-350"><span class="linenos" data-line="350"></span></a><span class="c1">-- Formats an OpenLibrary link, and checks for associated errors.</span> </span><span id="L-351"><a href="#L-351"><span class="linenos" data-line="351"></span></a><span class="kr">function</span> <span class="nf">openlibrary</span><span class="p">(</span><span class="n">id</span><span class="p">)</span> </span><span id="L-352"><a href="#L-352"><span class="linenos" data-line="352"></span></a> <span class="kd">local</span> <span class="n">code</span> <span class="o">=</span> <span class="n">id</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="o">-</span><span class="mi">1</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> </span><span id="L-353"><a href="#L-353"><span class="linenos" data-line="353"></span></a> <span class="kd">local</span> <span class="n">handler</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">id_handlers</span><span class="p">[</span><span class="s1">'OL'</span><span class="p">];</span> </span><span id="L-354"><a href="#L-354"><span class="linenos" data-line="354"></span></a> <span class="kr">if</span> <span class="p">(</span> <span class="n">code</span> <span class="o">==</span> <span class="s2">"A"</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-355"><a href="#L-355"><span class="linenos" data-line="355"></span></a> <span class="kr">return</span> <span class="n">externallinkid</span><span class="p">({</span><span class="n">link</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">link</span><span class="p">,</span> <span class="n">label</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> </span><span id="L-356"><a href="#L-356"><span class="linenos" data-line="356"></span></a> <span class="n">prefix</span><span class="o">=</span><span class="s2">"http://openlibrary.org/authors/OL"</span><span class="p">,</span><span class="n">id</span><span class="o">=</span><span class="n">id</span><span class="p">,</span> <span class="n">separator</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">separator</span><span class="p">,</span> </span><span id="L-357"><a href="#L-357"><span class="linenos" data-line="357"></span></a> <span class="n">encode</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">encode</span><span class="p">})</span> </span><span id="L-358"><a href="#L-358"><span class="linenos" data-line="358"></span></a> <span class="kr">elseif</span> <span class="p">(</span> <span class="n">code</span> <span class="o">==</span> <span class="s2">"M"</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-359"><a href="#L-359"><span class="linenos" data-line="359"></span></a> <span class="kr">return</span> <span class="n">externallinkid</span><span class="p">({</span><span class="n">link</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">link</span><span class="p">,</span> <span class="n">label</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> </span><span id="L-360"><a href="#L-360"><span class="linenos" data-line="360"></span></a> <span class="n">prefix</span><span class="o">=</span><span class="s2">"http://openlibrary.org/books/OL"</span><span class="p">,</span><span class="n">id</span><span class="o">=</span><span class="n">id</span><span class="p">,</span> <span class="n">separator</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">separator</span><span class="p">,</span> </span><span id="L-361"><a href="#L-361"><span class="linenos" data-line="361"></span></a> <span class="n">encode</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">encode</span><span class="p">})</span> </span><span id="L-362"><a href="#L-362"><span class="linenos" data-line="362"></span></a> <span class="kr">elseif</span> <span class="p">(</span> <span class="n">code</span> <span class="o">==</span> <span class="s2">"W"</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-363"><a href="#L-363"><span class="linenos" data-line="363"></span></a> <span class="kr">return</span> <span class="n">externallinkid</span><span class="p">({</span><span class="n">link</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">link</span><span class="p">,</span> <span class="n">label</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> </span><span id="L-364"><a href="#L-364"><span class="linenos" data-line="364"></span></a> <span class="n">prefix</span><span class="o">=</span> <span class="s2">"http://openlibrary.org/works/OL"</span><span class="p">,</span><span class="n">id</span><span class="o">=</span><span class="n">id</span><span class="p">,</span> <span class="n">separator</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">separator</span><span class="p">,</span> </span><span id="L-365"><a href="#L-365"><span class="linenos" data-line="365"></span></a> <span class="n">encode</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">encode</span><span class="p">})</span> </span><span id="L-366"><a href="#L-366"><span class="linenos" data-line="366"></span></a> <span class="kr">else</span> </span><span id="L-367"><a href="#L-367"><span class="linenos" data-line="367"></span></a> <span class="kr">return</span> <span class="n">externallinkid</span><span class="p">({</span><span class="n">link</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">link</span><span class="p">,</span> <span class="n">label</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> </span><span id="L-368"><a href="#L-368"><span class="linenos" data-line="368"></span></a> <span class="n">prefix</span><span class="o">=</span> <span class="s2">"http://openlibrary.org/OL"</span><span class="p">,</span><span class="n">id</span><span class="o">=</span><span class="n">id</span><span class="p">,</span> <span class="n">separator</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">separator</span><span class="p">,</span> </span><span id="L-369"><a href="#L-369"><span class="linenos" data-line="369"></span></a> <span class="n">encode</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">encode</span><span class="p">})</span> <span class="o">..</span> </span><span id="L-370"><a href="#L-370"><span class="linenos" data-line="370"></span></a> <span class="s1">' '</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'bad_ol'</span> <span class="p">);</span> </span><span id="L-371"><a href="#L-371"><span class="linenos" data-line="371"></span></a> <span class="kr">end</span> </span><span id="L-372"><a href="#L-372"><span class="linenos" data-line="372"></span></a><span class="kr">end</span> </span><span id="L-373"><a href="#L-373"><span class="linenos" data-line="373"></span></a> </span><span id="L-374"><a href="#L-374"><span class="linenos" data-line="374"></span></a><span class="cm">--[[</span> </span><span id="L-375"><a href="#L-375"><span class="linenos" data-line="375"></span></a><span class="cm">Validate and format an issn. This code fixes the case where an editor has included an ISSN in the citation but has separated the two groups of four</span> </span><span id="L-376"><a href="#L-376"><span class="linenos" data-line="376"></span></a><span class="cm">digits with a space. When that condition occurred, the resulting link looked like this:</span> </span><span id="L-377"><a href="#L-377"><span class="linenos" data-line="377"></span></a> </span><span id="L-378"><a href="#L-378"><span class="linenos" data-line="378"></span></a><span class="cm"> |issn=0819 4327 gives: [http://www.worldcat.org/issn/0819 4327 0819 4327] -- can't have spaces in an external link</span> </span><span id="L-379"><a href="#L-379"><span class="linenos" data-line="379"></span></a><span class="cm"> </span> </span><span id="L-380"><a href="#L-380"><span class="linenos" data-line="380"></span></a><span class="cm">This code now prevents that by inserting a hyphen at the issn midpoint. It also validates the issn for length and makes sure that the checkdigit agrees</span> </span><span id="L-381"><a href="#L-381"><span class="linenos" data-line="381"></span></a><span class="cm">with the calculated value. Incorrect length (8 digits), characters other than 0-9 and X, or checkdigit / calculated value mismatch will all cause a check issn</span> </span><span id="L-382"><a href="#L-382"><span class="linenos" data-line="382"></span></a><span class="cm">error message. The issn is always displayed with a hyphen, even if the issn was given as a single group of 8 digits.</span> </span><span id="L-383"><a href="#L-383"><span class="linenos" data-line="383"></span></a><span class="cm">]]</span> </span><span id="L-384"><a href="#L-384"><span class="linenos" data-line="384"></span></a><span class="kr">function</span> <span class="nf">issn</span><span class="p">(</span><span class="n">id</span><span class="p">)</span> </span><span id="L-385"><a href="#L-385"><span class="linenos" data-line="385"></span></a> <span class="kd">local</span> <span class="n">issn_copy</span> <span class="o">=</span> <span class="n">id</span><span class="p">;</span> <span class="c1">-- save a copy of unadulterated issn; use this version for display if issn does not validate</span> </span><span id="L-386"><a href="#L-386"><span class="linenos" data-line="386"></span></a> <span class="kd">local</span> <span class="n">handler</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">id_handlers</span><span class="p">[</span><span class="s1">'ISSN'</span><span class="p">];</span> </span><span id="L-387"><a href="#L-387"><span class="linenos" data-line="387"></span></a> <span class="kd">local</span> <span class="n">text</span><span class="p">;</span> </span><span id="L-388"><a href="#L-388"><span class="linenos" data-line="388"></span></a> <span class="kd">local</span> <span class="n">valid_issn</span> <span class="o">=</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-389"><a href="#L-389"><span class="linenos" data-line="389"></span></a> </span><span id="L-390"><a href="#L-390"><span class="linenos" data-line="390"></span></a> <span class="n">id</span><span class="o">=</span><span class="n">id</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s2">"[%s-–]"</span><span class="p">,</span> <span class="s2">""</span> <span class="p">);</span> <span class="c1">-- strip spaces, hyphens, and ndashes from the issn</span> </span><span id="L-391"><a href="#L-391"><span class="linenos" data-line="391"></span></a> </span><span id="L-392"><a href="#L-392"><span class="linenos" data-line="392"></span></a> <span class="kr">if</span> <span class="mi">8</span> <span class="o">~=</span> <span class="n">id</span><span class="p">:</span><span class="n">len</span><span class="p">()</span> <span class="ow">or</span> <span class="kc">nil</span> <span class="o">==</span> <span class="n">id</span><span class="p">:</span><span class="n">match</span><span class="p">(</span> <span class="s2">"^%d*X?$"</span> <span class="p">)</span> <span class="kr">then</span> <span class="c1">-- validate the issn: 8 didgits long, containing only 0-9 or X in the last position</span> </span><span id="L-393"><a href="#L-393"><span class="linenos" data-line="393"></span></a> <span class="n">valid_issn</span><span class="o">=</span><span class="kc">false</span><span class="p">;</span> <span class="c1">-- wrong length or improper character</span> </span><span id="L-394"><a href="#L-394"><span class="linenos" data-line="394"></span></a> <span class="kr">else</span> </span><span id="L-395"><a href="#L-395"><span class="linenos" data-line="395"></span></a> <span class="n">valid_issn</span><span class="o">=</span><span class="n">is_valid_isxn</span><span class="p">(</span><span class="n">id</span><span class="p">,</span> <span class="mi">8</span><span class="p">);</span> <span class="c1">-- validate issn</span> </span><span id="L-396"><a href="#L-396"><span class="linenos" data-line="396"></span></a> <span class="kr">end</span> </span><span id="L-397"><a href="#L-397"><span class="linenos" data-line="397"></span></a> </span><span id="L-398"><a href="#L-398"><span class="linenos" data-line="398"></span></a> <span class="kr">if</span> <span class="kc">true</span> <span class="o">==</span> <span class="n">valid_issn</span> <span class="kr">then</span> </span><span id="L-399"><a href="#L-399"><span class="linenos" data-line="399"></span></a> <span class="n">id</span> <span class="o">=</span> <span class="nb">string.sub</span><span class="p">(</span> <span class="n">id</span><span class="p">,</span> <span class="mi">1</span><span class="p">,</span> <span class="mi">4</span> <span class="p">)</span> <span class="o">..</span> <span class="s2">"-"</span> <span class="o">..</span> <span class="nb">string.sub</span><span class="p">(</span> <span class="n">id</span><span class="p">,</span> <span class="mi">5</span> <span class="p">);</span> <span class="c1">-- if valid, display correctly formatted version</span> </span><span id="L-400"><a href="#L-400"><span class="linenos" data-line="400"></span></a> <span class="kr">else</span> </span><span id="L-401"><a href="#L-401"><span class="linenos" data-line="401"></span></a> <span class="n">id</span> <span class="o">=</span> <span class="n">issn_copy</span><span class="p">;</span> <span class="c1">-- if not valid, use the show the invalid issn with error message</span> </span><span id="L-402"><a href="#L-402"><span class="linenos" data-line="402"></span></a> <span class="kr">end</span> </span><span id="L-403"><a href="#L-403"><span class="linenos" data-line="403"></span></a> </span><span id="L-404"><a href="#L-404"><span class="linenos" data-line="404"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">externallinkid</span><span class="p">({</span><span class="n">link</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">link</span><span class="p">,</span> <span class="n">label</span> <span class="o">=</span> <span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> </span><span id="L-405"><a href="#L-405"><span class="linenos" data-line="405"></span></a> <span class="n">prefix</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">prefix</span><span class="p">,</span><span class="n">id</span><span class="o">=</span><span class="n">id</span><span class="p">,</span><span class="n">separator</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">separator</span><span class="p">,</span> <span class="n">encode</span><span class="o">=</span><span class="n">handler</span><span class="p">.</span><span class="n">encode</span><span class="p">})</span> </span><span id="L-406"><a href="#L-406"><span class="linenos" data-line="406"></span></a> </span><span id="L-407"><a href="#L-407"><span class="linenos" data-line="407"></span></a> <span class="kr">if</span> <span class="kc">false</span> <span class="o">==</span> <span class="n">valid_issn</span> <span class="kr">then</span> </span><span id="L-408"><a href="#L-408"><span class="linenos" data-line="408"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">text</span> <span class="o">..</span> <span class="s1">' '</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'bad_issn'</span> <span class="p">)</span> <span class="c1">-- add an error message if the issn is invalid</span> </span><span id="L-409"><a href="#L-409"><span class="linenos" data-line="409"></span></a> <span class="kr">end</span> </span><span id="L-410"><a href="#L-410"><span class="linenos" data-line="410"></span></a> </span><span id="L-411"><a href="#L-411"><span class="linenos" data-line="411"></span></a> <span class="kr">return</span> <span class="n">text</span> </span><span id="L-412"><a href="#L-412"><span class="linenos" data-line="412"></span></a><span class="kr">end</span> </span><span id="L-413"><a href="#L-413"><span class="linenos" data-line="413"></span></a> </span><span id="L-414"><a href="#L-414"><span class="linenos" data-line="414"></span></a><span class="cm">--[[</span> </span><span id="L-415"><a href="#L-415"><span class="linenos" data-line="415"></span></a><span class="cm">This function sets default title types (equivalent to the citation including |type=<default value>) for those citations that have defaults.</span> </span><span id="L-416"><a href="#L-416"><span class="linenos" data-line="416"></span></a><span class="cm">Also handles the special case where it is desireable to omit the title type from the rendered citation (|type=none).</span> </span><span id="L-417"><a href="#L-417"><span class="linenos" data-line="417"></span></a><span class="cm">]]</span> </span><span id="L-418"><a href="#L-418"><span class="linenos" data-line="418"></span></a><span class="kr">function</span> <span class="nf">set_titletype</span><span class="p">(</span><span class="n">cite_class</span><span class="p">,</span> <span class="n">title_type</span><span class="p">)</span> </span><span id="L-419"><a href="#L-419"><span class="linenos" data-line="419"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">title_type</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-420"><a href="#L-420"><span class="linenos" data-line="420"></span></a> <span class="kr">if</span> <span class="s2">"none"</span> <span class="o">==</span> <span class="n">title_type</span> <span class="kr">then</span> </span><span id="L-421"><a href="#L-421"><span class="linenos" data-line="421"></span></a> <span class="n">title_type</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> <span class="c1">-- if |type=none then type parameter not displayed</span> </span><span id="L-422"><a href="#L-422"><span class="linenos" data-line="422"></span></a> <span class="kr">end</span> </span><span id="L-423"><a href="#L-423"><span class="linenos" data-line="423"></span></a> <span class="kr">return</span> <span class="n">title_type</span><span class="p">;</span> <span class="c1">-- if |type= has been set to any other value use that value</span> </span><span id="L-424"><a href="#L-424"><span class="linenos" data-line="424"></span></a> <span class="kr">end</span> </span><span id="L-425"><a href="#L-425"><span class="linenos" data-line="425"></span></a> </span><span id="L-426"><a href="#L-426"><span class="linenos" data-line="426"></span></a> <span class="kr">if</span> <span class="s2">"podcast"</span> <span class="o">==</span> <span class="n">cite_class</span> <span class="kr">then</span> <span class="c1">-- if this citation is cite podcast</span> </span><span id="L-427"><a href="#L-427"><span class="linenos" data-line="427"></span></a> <span class="kr">return</span> <span class="s2">"Podcast"</span><span class="p">;</span> <span class="c1">-- display podcast annotation</span> </span><span id="L-428"><a href="#L-428"><span class="linenos" data-line="428"></span></a> </span><span id="L-429"><a href="#L-429"><span class="linenos" data-line="429"></span></a> <span class="kr">elseif</span> <span class="s2">"pressrelease"</span> <span class="o">==</span> <span class="n">cite_class</span> <span class="kr">then</span> <span class="c1">-- if this citation is cite press release</span> </span><span id="L-430"><a href="#L-430"><span class="linenos" data-line="430"></span></a> <span class="kr">return</span> <span class="s2">"Press release"</span><span class="p">;</span> <span class="c1">-- display press release annotation</span> </span><span id="L-431"><a href="#L-431"><span class="linenos" data-line="431"></span></a> </span><span id="L-432"><a href="#L-432"><span class="linenos" data-line="432"></span></a> <span class="kr">elseif</span> <span class="s2">"techreport"</span> <span class="o">==</span> <span class="n">cite_class</span> <span class="kr">then</span> <span class="c1">-- if this citation is cite techreport</span> </span><span id="L-433"><a href="#L-433"><span class="linenos" data-line="433"></span></a> <span class="kr">return</span> <span class="s2">"Technical report"</span><span class="p">;</span> <span class="c1">-- display techreport annotation</span> </span><span id="L-434"><a href="#L-434"><span class="linenos" data-line="434"></span></a> </span><span id="L-435"><a href="#L-435"><span class="linenos" data-line="435"></span></a> <span class="kr">elseif</span> <span class="s2">"thesis"</span> <span class="o">==</span> <span class="n">cite_class</span> <span class="kr">then</span> <span class="c1">-- if this citation is cite thesis (degree option handled after this function returns)</span> </span><span id="L-436"><a href="#L-436"><span class="linenos" data-line="436"></span></a> <span class="kr">return</span> <span class="s2">"Thesis"</span><span class="p">;</span> <span class="c1">-- display simple thesis annotation (without |degree= modification)</span> </span><span id="L-437"><a href="#L-437"><span class="linenos" data-line="437"></span></a> <span class="kr">end</span> </span><span id="L-438"><a href="#L-438"><span class="linenos" data-line="438"></span></a><span class="kr">end</span> </span><span id="L-439"><a href="#L-439"><span class="linenos" data-line="439"></span></a> </span><span id="L-440"><a href="#L-440"><span class="linenos" data-line="440"></span></a><span class="c1">-- returns a number according to the month in a date: 1 for January, etc. Capitalization and spelling must be correct. If not a valid month, returns 0</span> </span><span id="L-441"><a href="#L-441"><span class="linenos" data-line="441"></span></a><span class="kr">function</span> <span class="nf">get_month_number</span> <span class="p">(</span><span class="n">month</span><span class="p">)</span> </span><span id="L-442"><a href="#L-442"><span class="linenos" data-line="442"></span></a><span class="kd">local</span> <span class="n">long_months</span> <span class="o">=</span> <span class="p">{[</span><span class="s1">'January'</span><span class="p">]</span><span class="o">=</span><span class="mi">1</span><span class="p">,</span> <span class="p">[</span><span class="s1">'February'</span><span class="p">]</span><span class="o">=</span><span class="mi">2</span><span class="p">,</span> <span class="p">[</span><span class="s1">'March'</span><span class="p">]</span><span class="o">=</span><span class="mi">3</span><span class="p">,</span> <span class="p">[</span><span class="s1">'April'</span><span class="p">]</span><span class="o">=</span><span class="mi">4</span><span class="p">,</span> <span class="p">[</span><span class="s1">'May'</span><span class="p">]</span><span class="o">=</span><span class="mi">5</span><span class="p">,</span> <span class="p">[</span><span class="s1">'June'</span><span class="p">]</span><span class="o">=</span><span class="mi">6</span><span class="p">,</span> <span class="p">[</span><span class="s1">'July'</span><span class="p">]</span><span class="o">=</span><span class="mi">7</span><span class="p">,</span> <span class="p">[</span><span class="s1">'August'</span><span class="p">]</span><span class="o">=</span><span class="mi">8</span><span class="p">,</span> <span class="p">[</span><span class="s1">'September'</span><span class="p">]</span><span class="o">=</span><span class="mi">9</span><span class="p">,</span> <span class="p">[</span><span class="s1">'October'</span><span class="p">]</span><span class="o">=</span><span class="mi">10</span><span class="p">,</span> <span class="p">[</span><span class="s1">'November'</span><span class="p">]</span><span class="o">=</span><span class="mi">11</span><span class="p">,</span> <span class="p">[</span><span class="s1">'December'</span><span class="p">]</span><span class="o">=</span><span class="mi">12</span><span class="p">};</span> </span><span id="L-443"><a href="#L-443"><span class="linenos" data-line="443"></span></a><span class="kd">local</span> <span class="n">short_months</span> <span class="o">=</span> <span class="p">{[</span><span class="s1">'Jan'</span><span class="p">]</span><span class="o">=</span><span class="mi">1</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Feb'</span><span class="p">]</span><span class="o">=</span><span class="mi">2</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Mar'</span><span class="p">]</span><span class="o">=</span><span class="mi">3</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Apr'</span><span class="p">]</span><span class="o">=</span><span class="mi">4</span><span class="p">,</span> <span class="p">[</span><span class="s1">'May'</span><span class="p">]</span><span class="o">=</span><span class="mi">5</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Jun'</span><span class="p">]</span><span class="o">=</span><span class="mi">6</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Jul'</span><span class="p">]</span><span class="o">=</span><span class="mi">7</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Aug'</span><span class="p">]</span><span class="o">=</span><span class="mi">8</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Sep'</span><span class="p">]</span><span class="o">=</span><span class="mi">9</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Oct'</span><span class="p">]</span><span class="o">=</span><span class="mi">10</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Nov'</span><span class="p">]</span><span class="o">=</span><span class="mi">11</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Dec'</span><span class="p">]</span><span class="o">=</span><span class="mi">12</span><span class="p">};</span> </span><span id="L-444"><a href="#L-444"><span class="linenos" data-line="444"></span></a><span class="kd">local</span> <span class="n">temp</span><span class="p">;</span> </span><span id="L-445"><a href="#L-445"><span class="linenos" data-line="445"></span></a> <span class="n">temp</span><span class="o">=</span><span class="n">long_months</span><span class="p">[</span><span class="n">month</span><span class="p">];</span> </span><span id="L-446"><a href="#L-446"><span class="linenos" data-line="446"></span></a> <span class="kr">if</span> <span class="n">temp</span> <span class="kr">then</span> <span class="kr">return</span> <span class="n">temp</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- if month is the long-form name</span> </span><span id="L-447"><a href="#L-447"><span class="linenos" data-line="447"></span></a> <span class="n">temp</span><span class="o">=</span><span class="n">short_months</span><span class="p">[</span><span class="n">month</span><span class="p">];</span> </span><span id="L-448"><a href="#L-448"><span class="linenos" data-line="448"></span></a> <span class="kr">if</span> <span class="n">temp</span> <span class="kr">then</span> <span class="kr">return</span> <span class="n">temp</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- if month is the short-form name</span> </span><span id="L-449"><a href="#L-449"><span class="linenos" data-line="449"></span></a> <span class="kr">return</span> <span class="mi">0</span><span class="p">;</span> <span class="c1">-- misspelled, improper case, or not a month name</span> </span><span id="L-450"><a href="#L-450"><span class="linenos" data-line="450"></span></a><span class="kr">end</span> </span><span id="L-451"><a href="#L-451"><span class="linenos" data-line="451"></span></a> </span><span id="L-452"><a href="#L-452"><span class="linenos" data-line="452"></span></a><span class="c1">-- returns a number according to the sequence of seasons in a year: 1 for Winter, etc. Capitalization and spelling must be correct. If not a valid season, returns 0</span> </span><span id="L-453"><a href="#L-453"><span class="linenos" data-line="453"></span></a><span class="kr">function</span> <span class="nf">get_season_number</span> <span class="p">(</span><span class="n">season</span><span class="p">)</span> </span><span id="L-454"><a href="#L-454"><span class="linenos" data-line="454"></span></a><span class="kd">local</span> <span class="n">season_list</span> <span class="o">=</span> <span class="p">{[</span><span class="s1">'Winter'</span><span class="p">]</span><span class="o">=</span><span class="mi">1</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Spring'</span><span class="p">]</span><span class="o">=</span><span class="mi">2</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Summer'</span><span class="p">]</span><span class="o">=</span><span class="mi">3</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Fall'</span><span class="p">]</span><span class="o">=</span><span class="mi">4</span><span class="p">,</span> <span class="p">[</span><span class="s1">'Autumn'</span><span class="p">]</span><span class="o">=</span><span class="mi">4</span><span class="p">}</span> </span><span id="L-455"><a href="#L-455"><span class="linenos" data-line="455"></span></a><span class="kd">local</span> <span class="n">temp</span><span class="p">;</span> </span><span id="L-456"><a href="#L-456"><span class="linenos" data-line="456"></span></a> <span class="n">temp</span><span class="o">=</span><span class="n">season_list</span><span class="p">[</span><span class="n">season</span><span class="p">];</span> </span><span id="L-457"><a href="#L-457"><span class="linenos" data-line="457"></span></a> <span class="kr">if</span> <span class="n">temp</span> <span class="kr">then</span> <span class="kr">return</span> <span class="n">temp</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- if season is a valid name return its number</span> </span><span id="L-458"><a href="#L-458"><span class="linenos" data-line="458"></span></a> <span class="kr">return</span> <span class="mi">0</span><span class="p">;</span> <span class="c1">-- misspelled, improper case, or not a season name</span> </span><span id="L-459"><a href="#L-459"><span class="linenos" data-line="459"></span></a><span class="kr">end</span> </span><span id="L-460"><a href="#L-460"><span class="linenos" data-line="460"></span></a> </span><span id="L-461"><a href="#L-461"><span class="linenos" data-line="461"></span></a><span class="cm">--[[</span> </span><span id="L-462"><a href="#L-462"><span class="linenos" data-line="462"></span></a><span class="cm">Returns true if day is less than or equal to the number of days in month; else returns false.</span> </span><span id="L-463"><a href="#L-463"><span class="linenos" data-line="463"></span></a> </span><span id="L-464"><a href="#L-464"><span class="linenos" data-line="464"></span></a><span class="cm">Assumes Julian calendar prior to year 1582 and Gregorian calendar thereafter. Accounts for Julian calendar leap years before 1582 and Gregorian leap years after 1582.</span> </span><span id="L-465"><a href="#L-465"><span class="linenos" data-line="465"></span></a><span class="cm">Where the two calendars overlap (1582 to approximately 1923) dates are assumed to be Gregorian.</span> </span><span id="L-466"><a href="#L-466"><span class="linenos" data-line="466"></span></a><span class="cm">]]</span> </span><span id="L-467"><a href="#L-467"><span class="linenos" data-line="467"></span></a><span class="kr">function</span> <span class="nf">is_valid_date</span> <span class="p">(</span><span class="n">year</span><span class="p">,</span> <span class="n">month</span><span class="p">,</span> <span class="n">day</span><span class="p">)</span> </span><span id="L-468"><a href="#L-468"><span class="linenos" data-line="468"></span></a><span class="kd">local</span> <span class="n">days_in_month</span> <span class="o">=</span> <span class="p">{</span><span class="mi">31</span><span class="p">,</span> <span class="mi">28</span><span class="p">,</span> <span class="mi">31</span><span class="p">,</span> <span class="mi">30</span><span class="p">,</span> <span class="mi">31</span><span class="p">,</span> <span class="mi">30</span><span class="p">,</span> <span class="mi">31</span><span class="p">,</span> <span class="mi">31</span><span class="p">,</span> <span class="mi">30</span><span class="p">,</span> <span class="mi">31</span><span class="p">,</span> <span class="mi">30</span><span class="p">,</span> <span class="mi">31</span><span class="p">};</span> </span><span id="L-469"><a href="#L-469"><span class="linenos" data-line="469"></span></a><span class="kd">local</span> <span class="n">month_length</span><span class="p">;</span> </span><span id="L-470"><a href="#L-470"><span class="linenos" data-line="470"></span></a> <span class="kr">if</span> <span class="p">(</span><span class="mi">2</span><span class="o">==</span><span class="n">month</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- if February</span> </span><span id="L-471"><a href="#L-471"><span class="linenos" data-line="471"></span></a> <span class="n">month_length</span> <span class="o">=</span> <span class="mi">28</span><span class="p">;</span> <span class="c1">-- then 28 days unless</span> </span><span id="L-472"><a href="#L-472"><span class="linenos" data-line="472"></span></a> <span class="kr">if</span> <span class="mi">1582</span> <span class="o">></span> <span class="nb">tonumber</span><span class="p">(</span><span class="n">year</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- Julian calendar</span> </span><span id="L-473"><a href="#L-473"><span class="linenos" data-line="473"></span></a> <span class="kr">if</span> <span class="mi">0</span><span class="o">==</span><span class="p">(</span><span class="n">year</span><span class="o">%</span><span class="mi">4</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-474"><a href="#L-474"><span class="linenos" data-line="474"></span></a> <span class="n">month_length</span> <span class="o">=</span> <span class="mi">29</span><span class="p">;</span> </span><span id="L-475"><a href="#L-475"><span class="linenos" data-line="475"></span></a> <span class="kr">end</span> </span><span id="L-476"><a href="#L-476"><span class="linenos" data-line="476"></span></a> <span class="kr">else</span> <span class="c1">-- Gregorian calendar</span> </span><span id="L-477"><a href="#L-477"><span class="linenos" data-line="477"></span></a> <span class="kr">if</span> <span class="p">(</span><span class="mi">0</span><span class="o">==</span><span class="p">(</span><span class="n">year</span><span class="o">%</span><span class="mi">4</span><span class="p">)</span> <span class="ow">and</span> <span class="p">(</span><span class="mi">0</span><span class="o">~=</span><span class="p">(</span><span class="n">year</span><span class="o">%</span><span class="mi">100</span><span class="p">)</span> <span class="ow">or</span> <span class="mi">0</span><span class="o">==</span><span class="p">(</span><span class="n">year</span><span class="o">%</span><span class="mi">400</span><span class="p">)))</span> <span class="kr">then</span> <span class="c1">-- is a leap year?</span> </span><span id="L-478"><a href="#L-478"><span class="linenos" data-line="478"></span></a> <span class="n">month_length</span> <span class="o">=</span> <span class="mi">29</span><span class="p">;</span> <span class="c1">-- if leap year then 29 days in February</span> </span><span id="L-479"><a href="#L-479"><span class="linenos" data-line="479"></span></a> <span class="kr">end</span> </span><span id="L-480"><a href="#L-480"><span class="linenos" data-line="480"></span></a> <span class="kr">end</span> </span><span id="L-481"><a href="#L-481"><span class="linenos" data-line="481"></span></a> <span class="kr">else</span> </span><span id="L-482"><a href="#L-482"><span class="linenos" data-line="482"></span></a> <span class="n">month_length</span><span class="o">=</span><span class="n">days_in_month</span><span class="p">[</span><span class="n">month</span><span class="p">];</span> </span><span id="L-483"><a href="#L-483"><span class="linenos" data-line="483"></span></a> <span class="kr">end</span> </span><span id="L-484"><a href="#L-484"><span class="linenos" data-line="484"></span></a> </span><span id="L-485"><a href="#L-485"><span class="linenos" data-line="485"></span></a> <span class="kr">if</span> <span class="nb">tonumber</span> <span class="p">(</span><span class="n">day</span><span class="p">)</span> <span class="o">></span> <span class="n">month_length</span> <span class="kr">then</span> </span><span id="L-486"><a href="#L-486"><span class="linenos" data-line="486"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> </span><span id="L-487"><a href="#L-487"><span class="linenos" data-line="487"></span></a> <span class="kr">end</span> </span><span id="L-488"><a href="#L-488"><span class="linenos" data-line="488"></span></a> <span class="kr">return</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-489"><a href="#L-489"><span class="linenos" data-line="489"></span></a><span class="kr">end</span> </span><span id="L-490"><a href="#L-490"><span class="linenos" data-line="490"></span></a> </span><span id="L-491"><a href="#L-491"><span class="linenos" data-line="491"></span></a><span class="cm">--[[</span> </span><span id="L-492"><a href="#L-492"><span class="linenos" data-line="492"></span></a><span class="cm">Check a pair of months or seasons to see if both are valid members of a month or season pair.</span> </span><span id="L-493"><a href="#L-493"><span class="linenos" data-line="493"></span></a> </span><span id="L-494"><a href="#L-494"><span class="linenos" data-line="494"></span></a><span class="cm">Month pairs are expected to be left to right, earliest to latest in time. Similarly, seasons are also left to right, earliest to latest in time. There is</span> </span><span id="L-495"><a href="#L-495"><span class="linenos" data-line="495"></span></a><span class="cm">an oddity with seasons. Winter is assigned a value of 1, spring 2, ..., fall and autumn 4. Because winter can follow fall/autumn at the end of a calender year, a special test</span> </span><span id="L-496"><a href="#L-496"><span class="linenos" data-line="496"></span></a><span class="cm">is made to see if |date=Fall-Winter yyyy (4-1) is the date.</span> </span><span id="L-497"><a href="#L-497"><span class="linenos" data-line="497"></span></a><span class="cm">]]</span> </span><span id="L-498"><a href="#L-498"><span class="linenos" data-line="498"></span></a> </span><span id="L-499"><a href="#L-499"><span class="linenos" data-line="499"></span></a><span class="kr">function</span> <span class="nf">is_valid_month_season_range</span><span class="p">(</span><span class="n">range_start</span><span class="p">,</span> <span class="n">range_end</span><span class="p">)</span> </span><span id="L-500"><a href="#L-500"><span class="linenos" data-line="500"></span></a> <span class="kd">local</span> <span class="n">range_start_number</span> <span class="o">=</span> <span class="n">get_month_number</span> <span class="p">(</span><span class="n">range_start</span><span class="p">);</span> </span><span id="L-501"><a href="#L-501"><span class="linenos" data-line="501"></span></a> </span><span id="L-502"><a href="#L-502"><span class="linenos" data-line="502"></span></a> <span class="kr">if</span> <span class="mi">0</span> <span class="o">==</span> <span class="n">range_start_number</span> <span class="kr">then</span> <span class="c1">-- is this a month range?</span> </span><span id="L-503"><a href="#L-503"><span class="linenos" data-line="503"></span></a> <span class="kd">local</span> <span class="n">range_start_number</span> <span class="o">=</span> <span class="n">get_season_number</span> <span class="p">(</span><span class="n">range_start</span><span class="p">);</span> <span class="c1">-- not a month; is it a season? get start season number</span> </span><span id="L-504"><a href="#L-504"><span class="linenos" data-line="504"></span></a> <span class="kd">local</span> <span class="n">range_end_number</span> <span class="o">=</span> <span class="n">get_season_number</span> <span class="p">(</span><span class="n">range_end</span><span class="p">);</span> <span class="c1">-- get end season number</span> </span><span id="L-505"><a href="#L-505"><span class="linenos" data-line="505"></span></a> </span><span id="L-506"><a href="#L-506"><span class="linenos" data-line="506"></span></a> <span class="kr">if</span> <span class="mi">0</span> <span class="o">~=</span> <span class="n">range_start_number</span> <span class="kr">then</span> <span class="c1">-- is start of range a season?</span> </span><span id="L-507"><a href="#L-507"><span class="linenos" data-line="507"></span></a> <span class="kr">if</span> <span class="n">range_start_number</span> <span class="o"><</span> <span class="n">range_end_number</span> <span class="kr">then</span> <span class="c1">-- range_start is a season</span> </span><span id="L-508"><a href="#L-508"><span class="linenos" data-line="508"></span></a> <span class="kr">return</span> <span class="kc">true</span><span class="p">;</span> <span class="c1">-- return true when range_end is also a season and follows start season; else false</span> </span><span id="L-509"><a href="#L-509"><span class="linenos" data-line="509"></span></a> <span class="kr">end</span> </span><span id="L-510"><a href="#L-510"><span class="linenos" data-line="510"></span></a> <span class="kr">if</span> <span class="mi">4</span> <span class="o">==</span> <span class="n">range_start_number</span> <span class="ow">and</span> <span class="mi">1</span> <span class="o">==</span> <span class="n">range_end_number</span> <span class="kr">then</span> <span class="c1">-- special case when range is Fall-Winter or Autumn-Winter</span> </span><span id="L-511"><a href="#L-511"><span class="linenos" data-line="511"></span></a> <span class="kr">return</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-512"><a href="#L-512"><span class="linenos" data-line="512"></span></a> <span class="kr">end</span> </span><span id="L-513"><a href="#L-513"><span class="linenos" data-line="513"></span></a> <span class="kr">end</span> </span><span id="L-514"><a href="#L-514"><span class="linenos" data-line="514"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="c1">-- range_start is not a month or a season; or range_start is a season and range_end is not; or improper season sequence</span> </span><span id="L-515"><a href="#L-515"><span class="linenos" data-line="515"></span></a> <span class="kr">end</span> </span><span id="L-516"><a href="#L-516"><span class="linenos" data-line="516"></span></a> </span><span id="L-517"><a href="#L-517"><span class="linenos" data-line="517"></span></a> <span class="kd">local</span> <span class="n">range_end_number</span> <span class="o">=</span> <span class="n">get_month_number</span> <span class="p">(</span><span class="n">range_end</span><span class="p">);</span> <span class="c1">-- get end month number</span> </span><span id="L-518"><a href="#L-518"><span class="linenos" data-line="518"></span></a> <span class="kr">if</span> <span class="n">range_start_number</span> <span class="o"><</span> <span class="n">range_end_number</span> <span class="kr">then</span> <span class="c1">-- range_start is a month; does range_start precede range_end?</span> </span><span id="L-519"><a href="#L-519"><span class="linenos" data-line="519"></span></a> <span class="kr">return</span> <span class="kc">true</span><span class="p">;</span> <span class="c1">-- if yes, return true</span> </span><span id="L-520"><a href="#L-520"><span class="linenos" data-line="520"></span></a> <span class="kr">end</span> </span><span id="L-521"><a href="#L-521"><span class="linenos" data-line="521"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="c1">-- range_start month number is greater than or equal to range end number; or range end isn't a month</span> </span><span id="L-522"><a href="#L-522"><span class="linenos" data-line="522"></span></a><span class="kr">end</span> </span><span id="L-523"><a href="#L-523"><span class="linenos" data-line="523"></span></a> </span><span id="L-524"><a href="#L-524"><span class="linenos" data-line="524"></span></a><span class="cm">--[[</span> </span><span id="L-525"><a href="#L-525"><span class="linenos" data-line="525"></span></a><span class="cm">Check date format to see that it is one of the formats approved by MOS:DATE: MMMM D, YYYY; D MMMM YYYY; MMMM YYYY; YYYY-MM-DD; YYYY.</span> </span><span id="L-526"><a href="#L-526"><span class="linenos" data-line="526"></span></a><span class="cm">Additionally, check the date to see that it is a real date: no 31 in 30-day months; no 29 February when not a leap year. Months, both long-form and three</span> </span><span id="L-527"><a href="#L-527"><span class="linenos" data-line="527"></span></a><span class="cm">character abbreviations, and seasons must be spelled correctly.</span> </span><span id="L-528"><a href="#L-528"><span class="linenos" data-line="528"></span></a> </span><span id="L-529"><a href="#L-529"><span class="linenos" data-line="529"></span></a><span class="cm">If the date fails the fomat tests, this function returns false but does not return values for anchor_year and COinS_date. When this happens, the date parameter is</span> </span><span id="L-530"><a href="#L-530"><span class="linenos" data-line="530"></span></a><span class="cm">used in the COinS metadata and the CITEREF identifier gets its year from the year parameter if present.</span> </span><span id="L-531"><a href="#L-531"><span class="linenos" data-line="531"></span></a> </span><span id="L-532"><a href="#L-532"><span class="linenos" data-line="532"></span></a><span class="cm">Inputs:</span> </span><span id="L-533"><a href="#L-533"><span class="linenos" data-line="533"></span></a><span class="cm"> date_string - date string from date-holding parameters (date, year, accessdate, embargo, archivedate, etc)</span> </span><span id="L-534"><a href="#L-534"><span class="linenos" data-line="534"></span></a> </span><span id="L-535"><a href="#L-535"><span class="linenos" data-line="535"></span></a><span class="cm">Returns:</span> </span><span id="L-536"><a href="#L-536"><span class="linenos" data-line="536"></span></a><span class="cm"> false if date string is not a real date; else</span> </span><span id="L-537"><a href="#L-537"><span class="linenos" data-line="537"></span></a><span class="cm"> true, anchor_year, COinS_date</span> </span><span id="L-538"><a href="#L-538"><span class="linenos" data-line="538"></span></a><span class="cm"> anchor_year can be used in CITEREF anchors</span> </span><span id="L-539"><a href="#L-539"><span class="linenos" data-line="539"></span></a><span class="cm"> COinS_date is date_string without anchor_year disambiguator if any</span> </span><span id="L-540"><a href="#L-540"><span class="linenos" data-line="540"></span></a><span class="cm">]]</span> </span><span id="L-541"><a href="#L-541"><span class="linenos" data-line="541"></span></a><span class="kr">function</span> <span class="nf">check_date</span> <span class="p">(</span><span class="n">date_string</span><span class="p">)</span> </span><span id="L-542"><a href="#L-542"><span class="linenos" data-line="542"></span></a> <span class="kd">local</span> <span class="n">year</span><span class="p">;</span> </span><span id="L-543"><a href="#L-543"><span class="linenos" data-line="543"></span></a> <span class="kd">local</span> <span class="n">month</span><span class="o">=</span><span class="mi">0</span><span class="p">;</span> <span class="c1">-- assume that month and day are not used; if either is zero then final year/month/day validation is not necessary</span> </span><span id="L-544"><a href="#L-544"><span class="linenos" data-line="544"></span></a> <span class="kd">local</span> <span class="n">day</span><span class="o">=</span><span class="mi">0</span><span class="p">;</span> </span><span id="L-545"><a href="#L-545"><span class="linenos" data-line="545"></span></a> <span class="kd">local</span> <span class="n">day2</span><span class="o">=</span><span class="mi">0</span><span class="p">;</span> <span class="c1">-- second day in a day range </span> </span><span id="L-546"><a href="#L-546"><span class="linenos" data-line="546"></span></a> <span class="kd">local</span> <span class="n">anchor_year</span><span class="p">;</span> </span><span id="L-547"><a href="#L-547"><span class="linenos" data-line="547"></span></a> <span class="kd">local</span> <span class="n">coins_date</span><span class="p">;</span> </span><span id="L-548"><a href="#L-548"><span class="linenos" data-line="548"></span></a> </span><span id="L-549"><a href="#L-549"><span class="linenos" data-line="549"></span></a> <span class="kr">if</span> <span class="n">date_string</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"^%d%d%d%d%-%d%d%-%d%d$"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- Year-initial numerical year month day format</span> </span><span id="L-550"><a href="#L-550"><span class="linenos" data-line="550"></span></a> <span class="n">year</span><span class="p">,</span> <span class="n">month</span><span class="p">,</span> <span class="n">day</span><span class="o">=</span><span class="nb">string.match</span><span class="p">(</span><span class="n">date_string</span><span class="p">,</span> <span class="s2">"(%d%d%d%d)%-(%d%d)%-(%d%d)"</span><span class="p">);</span> </span><span id="L-551"><a href="#L-551"><span class="linenos" data-line="551"></span></a> <span class="n">month</span><span class="o">=</span><span class="nb">tonumber</span><span class="p">(</span><span class="n">month</span><span class="p">);</span> </span><span id="L-552"><a href="#L-552"><span class="linenos" data-line="552"></span></a> <span class="kr">if</span> <span class="mi">12</span> <span class="o"><</span> <span class="n">month</span> <span class="ow">or</span> <span class="mi">1</span> <span class="o">></span> <span class="n">month</span> <span class="ow">or</span> <span class="mi">1583</span> <span class="o">></span> <span class="nb">tonumber</span><span class="p">(</span><span class="n">year</span><span class="p">)</span> <span class="kr">then</span> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- month number not valid or not Gregorian calendar</span> </span><span id="L-553"><a href="#L-553"><span class="linenos" data-line="553"></span></a> <span class="n">anchor_year</span> <span class="o">=</span> <span class="n">year</span><span class="p">;</span> </span><span id="L-554"><a href="#L-554"><span class="linenos" data-line="554"></span></a> </span><span id="L-555"><a href="#L-555"><span class="linenos" data-line="555"></span></a> <span class="kr">elseif</span> <span class="n">date_string</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"^%a+ +[1-9]%d?, +[1-9]%d%d%d%a?$"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- month-initial: month day, year</span> </span><span id="L-556"><a href="#L-556"><span class="linenos" data-line="556"></span></a> <span class="n">month</span><span class="p">,</span> <span class="n">day</span><span class="p">,</span> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">year</span><span class="o">=</span><span class="nb">string.match</span><span class="p">(</span><span class="n">date_string</span><span class="p">,</span> <span class="s2">"(%a+)%s*(%d%d?),%s*((%d%d%d%d)%a?)"</span><span class="p">);</span> </span><span id="L-557"><a href="#L-557"><span class="linenos" data-line="557"></span></a> <span class="n">month</span> <span class="o">=</span> <span class="n">get_month_number</span> <span class="p">(</span><span class="n">month</span><span class="p">);</span> </span><span id="L-558"><a href="#L-558"><span class="linenos" data-line="558"></span></a> <span class="kr">if</span> <span class="mi">0</span> <span class="o">==</span> <span class="n">month</span> <span class="kr">then</span> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- return false if month text isn't one of the twelve months</span> </span><span id="L-559"><a href="#L-559"><span class="linenos" data-line="559"></span></a> </span><span id="L-560"><a href="#L-560"><span class="linenos" data-line="560"></span></a> <span class="kr">elseif</span> <span class="n">date_string</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"^%a+ +[1-9]%d?–[1-9]%d?, +[1-9]%d%d%d%a?$"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- month-initial day range: month day–day, year; days are separated by endash</span> </span><span id="L-561"><a href="#L-561"><span class="linenos" data-line="561"></span></a> <span class="n">month</span><span class="p">,</span> <span class="n">day</span><span class="p">,</span> <span class="n">day2</span><span class="p">,</span> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">year</span><span class="o">=</span><span class="nb">string.match</span><span class="p">(</span><span class="n">date_string</span><span class="p">,</span> <span class="s2">"(%a+) +(%d%d?)–(%d%d?), +((%d%d%d%d)%a?)"</span><span class="p">);</span> </span><span id="L-562"><a href="#L-562"><span class="linenos" data-line="562"></span></a> <span class="kr">if</span> <span class="nb">tonumber</span><span class="p">(</span><span class="n">day</span><span class="p">)</span> <span class="o">>=</span> <span class="nb">tonumber</span><span class="p">(</span><span class="n">day2</span><span class="p">)</span> <span class="kr">then</span> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- date range order is left to right: earlier to later; dates may not be the same;</span> </span><span id="L-563"><a href="#L-563"><span class="linenos" data-line="563"></span></a> <span class="n">month</span> <span class="o">=</span> <span class="n">get_month_number</span> <span class="p">(</span><span class="n">month</span><span class="p">);</span> </span><span id="L-564"><a href="#L-564"><span class="linenos" data-line="564"></span></a> <span class="kr">if</span> <span class="mi">0</span> <span class="o">==</span> <span class="n">month</span> <span class="kr">then</span> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- return false if month text isn't one of the twelve months</span> </span><span id="L-565"><a href="#L-565"><span class="linenos" data-line="565"></span></a> </span><span id="L-566"><a href="#L-566"><span class="linenos" data-line="566"></span></a> <span class="kr">elseif</span> <span class="n">date_string</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"^[1-9]%d? +%a+ +[1-9]%d%d%d%a?$"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- day-initial: day month year</span> </span><span id="L-567"><a href="#L-567"><span class="linenos" data-line="567"></span></a> <span class="n">day</span><span class="p">,</span> <span class="n">month</span><span class="p">,</span> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">year</span><span class="o">=</span><span class="nb">string.match</span><span class="p">(</span><span class="n">date_string</span><span class="p">,</span> <span class="s2">"(%d%d*)%s*(%a+)%s*((%d%d%d%d)%a?)"</span><span class="p">);</span> </span><span id="L-568"><a href="#L-568"><span class="linenos" data-line="568"></span></a> <span class="n">month</span> <span class="o">=</span> <span class="n">get_month_number</span> <span class="p">(</span><span class="n">month</span><span class="p">);</span> </span><span id="L-569"><a href="#L-569"><span class="linenos" data-line="569"></span></a> <span class="kr">if</span> <span class="mi">0</span> <span class="o">==</span> <span class="n">month</span> <span class="kr">then</span> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- return false if month text isn't one of the twelve months</span> </span><span id="L-570"><a href="#L-570"><span class="linenos" data-line="570"></span></a> </span><span id="L-571"><a href="#L-571"><span class="linenos" data-line="571"></span></a> <span class="kr">elseif</span> <span class="n">date_string</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"^[1-9]%d?–[1-9]%d? +%a+ +[1-9]%d%d%d%a?$"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- day-range-initial: day–day month year; days are separated by endash</span> </span><span id="L-572"><a href="#L-572"><span class="linenos" data-line="572"></span></a> <span class="n">day</span><span class="p">,</span> <span class="n">day2</span><span class="p">,</span> <span class="n">month</span><span class="p">,</span> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">year</span><span class="o">=</span><span class="nb">string.match</span><span class="p">(</span><span class="n">date_string</span><span class="p">,</span> <span class="s2">"(%d%d?)–(%d%d?) +(%a+) +((%d%d%d%d)%a?)"</span><span class="p">);</span> </span><span id="L-573"><a href="#L-573"><span class="linenos" data-line="573"></span></a> <span class="kr">if</span> <span class="nb">tonumber</span><span class="p">(</span><span class="n">day</span><span class="p">)</span> <span class="o">>=</span> <span class="nb">tonumber</span><span class="p">(</span><span class="n">day2</span><span class="p">)</span> <span class="kr">then</span> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- date range order is left to right: earlier to later; dates may not be the same;</span> </span><span id="L-574"><a href="#L-574"><span class="linenos" data-line="574"></span></a> <span class="n">month</span> <span class="o">=</span> <span class="n">get_month_number</span> <span class="p">(</span><span class="n">month</span><span class="p">);</span> </span><span id="L-575"><a href="#L-575"><span class="linenos" data-line="575"></span></a> <span class="kr">if</span> <span class="mi">0</span> <span class="o">==</span> <span class="n">month</span> <span class="kr">then</span> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- return false if month text isn't one of the twelve months</span> </span><span id="L-576"><a href="#L-576"><span class="linenos" data-line="576"></span></a> </span><span id="L-577"><a href="#L-577"><span class="linenos" data-line="577"></span></a> <span class="kr">elseif</span> <span class="n">mw</span><span class="p">.</span><span class="n">ustring</span><span class="p">.</span><span class="n">match</span> <span class="p">(</span><span class="n">date_string</span><span class="p">,</span> <span class="s2">"^%a+–%a+ +[1-9]%d%d%d%a?$"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- month/season range year; months separated by endash </span> </span><span id="L-578"><a href="#L-578"><span class="linenos" data-line="578"></span></a> <span class="kd">local</span> <span class="n">month2</span> </span><span id="L-579"><a href="#L-579"><span class="linenos" data-line="579"></span></a> <span class="n">month</span><span class="p">,</span> <span class="n">month2</span><span class="p">,</span> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">year</span><span class="o">=</span><span class="n">mw</span><span class="p">.</span><span class="n">ustring</span><span class="p">.</span><span class="n">match</span> <span class="p">(</span><span class="n">date_string</span><span class="p">,</span> <span class="s2">"(%a+)[%-/–](%a+)%s*((%d%d%d%d)%a?)"</span><span class="p">);</span> </span><span id="L-580"><a href="#L-580"><span class="linenos" data-line="580"></span></a> <span class="kr">if</span> <span class="kc">false</span> <span class="o">==</span> <span class="n">is_valid_month_season_range</span><span class="p">(</span><span class="n">month</span><span class="p">,</span> <span class="n">month2</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-581"><a href="#L-581"><span class="linenos" data-line="581"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> </span><span id="L-582"><a href="#L-582"><span class="linenos" data-line="582"></span></a> <span class="kr">end</span> </span><span id="L-583"><a href="#L-583"><span class="linenos" data-line="583"></span></a> </span><span id="L-584"><a href="#L-584"><span class="linenos" data-line="584"></span></a> <span class="kr">elseif</span> <span class="n">date_string</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"^%a+ +%d%d%d%d%a?$"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- month/season year</span> </span><span id="L-585"><a href="#L-585"><span class="linenos" data-line="585"></span></a> <span class="n">month</span><span class="p">,</span> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">year</span><span class="o">=</span><span class="nb">string.match</span><span class="p">(</span><span class="n">date_string</span><span class="p">,</span> <span class="s2">"(%a+)%s*((%d%d%d%d)%a?)"</span><span class="p">);</span> </span><span id="L-586"><a href="#L-586"><span class="linenos" data-line="586"></span></a> <span class="kr">if</span> <span class="mi">0</span> <span class="o">==</span> <span class="n">get_month_number</span> <span class="p">(</span><span class="n">month</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- if month text isn't one of the twelve months, might be a season</span> </span><span id="L-587"><a href="#L-587"><span class="linenos" data-line="587"></span></a> <span class="kr">if</span> <span class="mi">0</span> <span class="o">==</span> <span class="n">get_season_number</span> <span class="p">(</span><span class="n">month</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- not a month, is it a season?</span> </span><span id="L-588"><a href="#L-588"><span class="linenos" data-line="588"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="c1">-- return false not a month or one of the five seasons</span> </span><span id="L-589"><a href="#L-589"><span class="linenos" data-line="589"></span></a> <span class="kr">end</span> </span><span id="L-590"><a href="#L-590"><span class="linenos" data-line="590"></span></a> <span class="kr">end</span> </span><span id="L-591"><a href="#L-591"><span class="linenos" data-line="591"></span></a> </span><span id="L-592"><a href="#L-592"><span class="linenos" data-line="592"></span></a> <span class="kr">elseif</span> <span class="n">date_string</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"^[1-9]%d%d%d?%a?$"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- year; here accept either YYY or YYYY</span> </span><span id="L-593"><a href="#L-593"><span class="linenos" data-line="593"></span></a> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">year</span><span class="o">=</span><span class="nb">string.match</span><span class="p">(</span><span class="n">date_string</span><span class="p">,</span> <span class="s2">"((%d%d%d%d?)%a?)"</span><span class="p">);</span> </span><span id="L-594"><a href="#L-594"><span class="linenos" data-line="594"></span></a> </span><span id="L-595"><a href="#L-595"><span class="linenos" data-line="595"></span></a> <span class="kr">else</span> </span><span id="L-596"><a href="#L-596"><span class="linenos" data-line="596"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="c1">-- date format not one of the MOS:DATE approved formats</span> </span><span id="L-597"><a href="#L-597"><span class="linenos" data-line="597"></span></a> <span class="kr">end</span> </span><span id="L-598"><a href="#L-598"><span class="linenos" data-line="598"></span></a> </span><span id="L-599"><a href="#L-599"><span class="linenos" data-line="599"></span></a> <span class="kr">if</span> <span class="mi">0</span><span class="o">~=</span><span class="n">month</span> <span class="ow">and</span> <span class="mi">0</span><span class="o">~=</span><span class="n">day</span> <span class="kr">then</span> <span class="c1">-- check year month day dates for validity</span> </span><span id="L-600"><a href="#L-600"><span class="linenos" data-line="600"></span></a> <span class="kr">if</span> <span class="mi">0</span><span class="o">~=</span><span class="n">day2</span> <span class="kr">then</span> <span class="c1">-- If there is a second day (d–d Mmm YYYY or Mmm d–d, YYYY) test the second date</span> </span><span id="L-601"><a href="#L-601"><span class="linenos" data-line="601"></span></a> <span class="kr">if</span> <span class="kc">false</span><span class="o">==</span><span class="n">is_valid_date</span><span class="p">(</span><span class="n">year</span><span class="p">,</span><span class="n">month</span><span class="p">,</span><span class="n">day2</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-602"><a href="#L-602"><span class="linenos" data-line="602"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="c1">-- second date in date range string is not a real date return false; unset anchor_year and coins_date</span> </span><span id="L-603"><a href="#L-603"><span class="linenos" data-line="603"></span></a> <span class="kr">end</span> <span class="c1">-- if second date range string is valid, fall through to test the first date range</span> </span><span id="L-604"><a href="#L-604"><span class="linenos" data-line="604"></span></a> <span class="kr">end</span> </span><span id="L-605"><a href="#L-605"><span class="linenos" data-line="605"></span></a> <span class="kr">if</span> <span class="kc">false</span><span class="o">==</span><span class="n">is_valid_date</span><span class="p">(</span><span class="n">year</span><span class="p">,</span><span class="n">month</span><span class="p">,</span><span class="n">day</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-606"><a href="#L-606"><span class="linenos" data-line="606"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="c1">-- date string is not a real date return false; unset anchor_year and coins_date</span> </span><span id="L-607"><a href="#L-607"><span class="linenos" data-line="607"></span></a> <span class="kr">end</span> </span><span id="L-608"><a href="#L-608"><span class="linenos" data-line="608"></span></a> <span class="kr">end</span> </span><span id="L-609"><a href="#L-609"><span class="linenos" data-line="609"></span></a> </span><span id="L-610"><a href="#L-610"><span class="linenos" data-line="610"></span></a> <span class="n">coins_date</span><span class="o">=</span> <span class="n">mw</span><span class="p">.</span><span class="n">ustring</span><span class="p">.</span><span class="n">gsub</span><span class="p">(</span> <span class="n">date_string</span><span class="p">,</span> <span class="s2">"–"</span><span class="p">,</span> <span class="s2">"-"</span> <span class="p">);</span> <span class="c1">-- if here, then date_string is valid; set coins_date and replace any ndash with a hyphen</span> </span><span id="L-611"><a href="#L-611"><span class="linenos" data-line="611"></span></a> </span><span id="L-612"><a href="#L-612"><span class="linenos" data-line="612"></span></a> <span class="kr">return</span> <span class="kc">true</span><span class="p">,</span> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">coins_date</span><span class="p">;</span> <span class="c1">-- format is good and date string represents a real date</span> </span><span id="L-613"><a href="#L-613"><span class="linenos" data-line="613"></span></a><span class="kr">end</span> </span><span id="L-614"><a href="#L-614"><span class="linenos" data-line="614"></span></a> </span><span id="L-615"><a href="#L-615"><span class="linenos" data-line="615"></span></a><span class="cm">--[[</span> </span><span id="L-616"><a href="#L-616"><span class="linenos" data-line="616"></span></a><span class="cm">Cycle the date-holding parameters in passed table date_parameters_list through check_date() to check compliance with MOS:DATE. For all valid dates, check_date() returns</span> </span><span id="L-617"><a href="#L-617"><span class="linenos" data-line="617"></span></a><span class="cm">true and values for anchor_year (used in CITEREF identifiers) and COinS_date (used in the COinS metadata). The |date= parameter test is unique. This function only </span> </span><span id="L-618"><a href="#L-618"><span class="linenos" data-line="618"></span></a><span class="cm">accepts anchor_year and COinS_date results from the |date= parameter test and |date= is the only date-holding parameter that is allowed to contain the no-date keywords</span> </span><span id="L-619"><a href="#L-619"><span class="linenos" data-line="619"></span></a><span class="cm">"n.d." or "nd" (without quotes).</span> </span><span id="L-620"><a href="#L-620"><span class="linenos" data-line="620"></span></a> </span><span id="L-621"><a href="#L-621"><span class="linenos" data-line="621"></span></a><span class="cm">Unlike most error messages created in this module, only one error message is created by this function. Because all of the date holding parameters are processed serially,</span> </span><span id="L-622"><a href="#L-622"><span class="linenos" data-line="622"></span></a><span class="cm">a single error message is created as the dates are tested.</span> </span><span id="L-623"><a href="#L-623"><span class="linenos" data-line="623"></span></a><span class="cm">]]</span> </span><span id="L-624"><a href="#L-624"><span class="linenos" data-line="624"></span></a> </span><span id="L-625"><a href="#L-625"><span class="linenos" data-line="625"></span></a><span class="kr">function</span> <span class="nf">dates</span><span class="p">(</span><span class="n">date_parameters_list</span><span class="p">)</span> </span><span id="L-626"><a href="#L-626"><span class="linenos" data-line="626"></span></a> <span class="kd">local</span> <span class="n">anchor_year</span><span class="p">;</span> <span class="c1">-- will return as nil if the date being tested is not |date=</span> </span><span id="L-627"><a href="#L-627"><span class="linenos" data-line="627"></span></a> <span class="kd">local</span> <span class="n">COinS_date</span><span class="p">;</span> <span class="c1">-- will return as nil if the date being tested is not |date=</span> </span><span id="L-628"><a href="#L-628"><span class="linenos" data-line="628"></span></a> <span class="kd">local</span> <span class="n">error_message</span> <span class="o">=</span><span class="s2">""</span><span class="p">;</span> </span><span id="L-629"><a href="#L-629"><span class="linenos" data-line="629"></span></a> <span class="kd">local</span> <span class="n">good_date</span><span class="o">=</span><span class="kc">false</span><span class="p">;</span> </span><span id="L-630"><a href="#L-630"><span class="linenos" data-line="630"></span></a> </span><span id="L-631"><a href="#L-631"><span class="linenos" data-line="631"></span></a> <span class="kr">for</span> <span class="n">k</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">pairs</span><span class="p">(</span><span class="n">date_parameters_list</span><span class="p">)</span> <span class="kr">do</span> <span class="c1">-- for each date-holding parameter in the list</span> </span><span id="L-632"><a href="#L-632"><span class="linenos" data-line="632"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">v</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- if the parameter has a value</span> </span><span id="L-633"><a href="#L-633"><span class="linenos" data-line="633"></span></a> <span class="kr">if</span> <span class="n">v</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"^c%. [1-9]%d%d%d?%a?$"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- special case for c. year or with or without CITEREF disambiguator - only |date= and |year=</span> </span><span id="L-634"><a href="#L-634"><span class="linenos" data-line="634"></span></a> <span class="kr">if</span> <span class="s1">'date'</span><span class="o">==</span><span class="n">k</span> <span class="kr">then</span> </span><span id="L-635"><a href="#L-635"><span class="linenos" data-line="635"></span></a> <span class="n">good_date</span><span class="p">,</span> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">COinS_date</span> <span class="o">=</span> <span class="kc">true</span><span class="p">,</span> <span class="n">v</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"((c%. [1-9]d%d%d?)%a?)"</span><span class="p">);</span> <span class="c1">-- anchor year and COinS_date only from |date= parameter</span> </span><span id="L-636"><a href="#L-636"><span class="linenos" data-line="636"></span></a> <span class="kr">elseif</span> <span class="s1">'year'</span><span class="o">==</span><span class="n">k</span> <span class="kr">then</span> </span><span id="L-637"><a href="#L-637"><span class="linenos" data-line="637"></span></a> <span class="n">good_date</span> <span class="o">=</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-638"><a href="#L-638"><span class="linenos" data-line="638"></span></a> <span class="kr">end</span> </span><span id="L-639"><a href="#L-639"><span class="linenos" data-line="639"></span></a> <span class="kr">elseif</span> <span class="s1">'year'</span><span class="o">==</span><span class="n">k</span> <span class="kr">then</span> <span class="c1">-- if the parameter is |year= (but not c. year)</span> </span><span id="L-640"><a href="#L-640"><span class="linenos" data-line="640"></span></a> <span class="kr">if</span> <span class="n">v</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"^[1-9]%d%d%d?%a?$"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- year with or without CITEREF disambiguator</span> </span><span id="L-641"><a href="#L-641"><span class="linenos" data-line="641"></span></a> <span class="n">good_date</span> <span class="o">=</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-642"><a href="#L-642"><span class="linenos" data-line="642"></span></a> <span class="kr">end</span> </span><span id="L-643"><a href="#L-643"><span class="linenos" data-line="643"></span></a> <span class="kr">elseif</span> <span class="s1">'date'</span><span class="o">==</span><span class="n">k</span> <span class="kr">then</span> <span class="c1">-- if the parameter is |date=</span> </span><span id="L-644"><a href="#L-644"><span class="linenos" data-line="644"></span></a> <span class="kr">if</span> <span class="n">v</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"n%.d%.%a?"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- if |date=n.d. with or without a CITEREF disambiguator</span> </span><span id="L-645"><a href="#L-645"><span class="linenos" data-line="645"></span></a> <span class="n">good_date</span><span class="p">,</span> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">COinS_date</span> <span class="o">=</span> <span class="kc">true</span><span class="p">,</span> <span class="n">v</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"((n%.d%.)%a?)"</span><span class="p">);</span> <span class="c1">--"n.d."; no error when date parameter is set to no date</span> </span><span id="L-646"><a href="#L-646"><span class="linenos" data-line="646"></span></a> <span class="kr">elseif</span> <span class="n">v</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"nd%a?$"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- if |date=nd with or without a CITEREF disambiguator</span> </span><span id="L-647"><a href="#L-647"><span class="linenos" data-line="647"></span></a> <span class="n">good_date</span><span class="p">,</span> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">COinS_date</span> <span class="o">=</span> <span class="kc">true</span><span class="p">,</span> <span class="n">v</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"((nd)%a?)"</span><span class="p">);</span> <span class="c1">--"nd"; no error when date parameter is set to no date</span> </span><span id="L-648"><a href="#L-648"><span class="linenos" data-line="648"></span></a> <span class="kr">else</span> </span><span id="L-649"><a href="#L-649"><span class="linenos" data-line="649"></span></a> <span class="n">good_date</span><span class="p">,</span> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">COinS_date</span> <span class="o">=</span> <span class="n">check_date</span> <span class="p">(</span><span class="n">v</span><span class="p">);</span> <span class="c1">-- go test the date</span> </span><span id="L-650"><a href="#L-650"><span class="linenos" data-line="650"></span></a> <span class="kr">end</span> </span><span id="L-651"><a href="#L-651"><span class="linenos" data-line="651"></span></a> <span class="kr">else</span> <span class="c1">-- any other date-holding parameter</span> </span><span id="L-652"><a href="#L-652"><span class="linenos" data-line="652"></span></a> <span class="n">good_date</span> <span class="o">=</span> <span class="n">check_date</span> <span class="p">(</span><span class="n">v</span><span class="p">);</span> <span class="c1">-- go test the date</span> </span><span id="L-653"><a href="#L-653"><span class="linenos" data-line="653"></span></a> <span class="kr">end</span> </span><span id="L-654"><a href="#L-654"><span class="linenos" data-line="654"></span></a> <span class="kr">if</span> <span class="kc">false</span><span class="o">==</span><span class="n">good_date</span> <span class="kr">then</span> <span class="c1">-- assemble one error message so we don't add the tracking category multiple times</span> </span><span id="L-655"><a href="#L-655"><span class="linenos" data-line="655"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">error_message</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- once we've added the first portion of the error message ...</span> </span><span id="L-656"><a href="#L-656"><span class="linenos" data-line="656"></span></a> <span class="n">error_message</span><span class="o">=</span><span class="n">error_message</span> <span class="o">..</span> <span class="s2">", "</span><span class="p">;</span> <span class="c1">-- ... add a comma space separator</span> </span><span id="L-657"><a href="#L-657"><span class="linenos" data-line="657"></span></a> <span class="kr">end</span> </span><span id="L-658"><a href="#L-658"><span class="linenos" data-line="658"></span></a> <span class="n">error_message</span><span class="o">=</span><span class="n">error_message</span> <span class="o">..</span> <span class="s2">"&#124;"</span> <span class="o">..</span> <span class="n">k</span> <span class="o">..</span> <span class="s2">"="</span><span class="p">;</span> <span class="c1">-- add the failed parameter</span> </span><span id="L-659"><a href="#L-659"><span class="linenos" data-line="659"></span></a> <span class="kr">end</span> </span><span id="L-660"><a href="#L-660"><span class="linenos" data-line="660"></span></a> <span class="kr">end</span> </span><span id="L-661"><a href="#L-661"><span class="linenos" data-line="661"></span></a> <span class="kr">end</span> </span><span id="L-662"><a href="#L-662"><span class="linenos" data-line="662"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">error_message</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-663"><a href="#L-663"><span class="linenos" data-line="663"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span><span class="p">,</span> <span class="p">{</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'bad_date'</span><span class="p">,</span> <span class="p">{</span><span class="n">error_message</span><span class="p">},</span> <span class="kc">true</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> <span class="c1">-- add this error message</span> </span><span id="L-664"><a href="#L-664"><span class="linenos" data-line="664"></span></a> <span class="kr">end</span> </span><span id="L-665"><a href="#L-665"><span class="linenos" data-line="665"></span></a> </span><span id="L-666"><a href="#L-666"><span class="linenos" data-line="666"></span></a> <span class="kr">return</span> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">COinS_date</span><span class="p">;</span> <span class="c1">-- and done</span> </span><span id="L-667"><a href="#L-667"><span class="linenos" data-line="667"></span></a><span class="kr">end</span> </span><span id="L-668"><a href="#L-668"><span class="linenos" data-line="668"></span></a> </span><span id="L-669"><a href="#L-669"><span class="linenos" data-line="669"></span></a><span class="cm">--[[</span> </span><span id="L-670"><a href="#L-670"><span class="linenos" data-line="670"></span></a><span class="cm">Determines whether a URL string is valid</span> </span><span id="L-671"><a href="#L-671"><span class="linenos" data-line="671"></span></a> </span><span id="L-672"><a href="#L-672"><span class="linenos" data-line="672"></span></a><span class="cm">At present the only check is whether the string appears to </span> </span><span id="L-673"><a href="#L-673"><span class="linenos" data-line="673"></span></a><span class="cm">be prefixed with a URI scheme. It is not determined whether </span> </span><span id="L-674"><a href="#L-674"><span class="linenos" data-line="674"></span></a><span class="cm">the URI scheme is valid or whether the URL is otherwise well </span> </span><span id="L-675"><a href="#L-675"><span class="linenos" data-line="675"></span></a><span class="cm">formed.</span> </span><span id="L-676"><a href="#L-676"><span class="linenos" data-line="676"></span></a><span class="cm">]]</span> </span><span id="L-677"><a href="#L-677"><span class="linenos" data-line="677"></span></a><span class="kr">function</span> <span class="nf">checkurl</span><span class="p">(</span> <span class="n">url_str</span> <span class="p">)</span> </span><span id="L-678"><a href="#L-678"><span class="linenos" data-line="678"></span></a> <span class="c1">-- Protocol-relative or URL scheme</span> </span><span id="L-679"><a href="#L-679"><span class="linenos" data-line="679"></span></a> <span class="kr">return</span> <span class="n">url_str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="mi">2</span><span class="p">)</span> <span class="o">==</span> <span class="s2">"//"</span> <span class="ow">or</span> <span class="n">url_str</span><span class="p">:</span><span class="n">match</span><span class="p">(</span> <span class="s2">"^[^/]*:"</span> <span class="p">)</span> <span class="o">~=</span> <span class="kc">nil</span><span class="p">;</span> </span><span id="L-680"><a href="#L-680"><span class="linenos" data-line="680"></span></a><span class="kr">end</span> </span><span id="L-681"><a href="#L-681"><span class="linenos" data-line="681"></span></a> </span><span id="L-682"><a href="#L-682"><span class="linenos" data-line="682"></span></a><span class="c1">-- Removes irrelevant text and dashes from ISBN number</span> </span><span id="L-683"><a href="#L-683"><span class="linenos" data-line="683"></span></a><span class="c1">-- Similar to that used for Special:BookSources</span> </span><span id="L-684"><a href="#L-684"><span class="linenos" data-line="684"></span></a><span class="kr">function</span> <span class="nf">cleanisbn</span><span class="p">(</span> <span class="n">isbn_str</span> <span class="p">)</span> </span><span id="L-685"><a href="#L-685"><span class="linenos" data-line="685"></span></a> <span class="kr">return</span> <span class="n">isbn_str</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s2">"[^-0-9X]"</span><span class="p">,</span> <span class="s2">""</span> <span class="p">);</span> </span><span id="L-686"><a href="#L-686"><span class="linenos" data-line="686"></span></a><span class="kr">end</span> </span><span id="L-687"><a href="#L-687"><span class="linenos" data-line="687"></span></a> </span><span id="L-688"><a href="#L-688"><span class="linenos" data-line="688"></span></a><span class="cm">--[[</span> </span><span id="L-689"><a href="#L-689"><span class="linenos" data-line="689"></span></a><span class="cm">ISBN-10 and ISSN validator code calculates checksum across all isbn/issn digits including the check digit. ISBN-13 is checked in checkisbn().</span> </span><span id="L-690"><a href="#L-690"><span class="linenos" data-line="690"></span></a><span class="cm">If the number is valid the result will be 0. Before calling this function, issbn/issn must be checked for length and stripped of dashes,</span> </span><span id="L-691"><a href="#L-691"><span class="linenos" data-line="691"></span></a><span class="cm">spaces and other non-isxn characters.</span> </span><span id="L-692"><a href="#L-692"><span class="linenos" data-line="692"></span></a><span class="cm">]]</span> </span><span id="L-693"><a href="#L-693"><span class="linenos" data-line="693"></span></a><span class="kr">function</span> <span class="nf">is_valid_isxn</span> <span class="p">(</span><span class="n">isxn_str</span><span class="p">,</span> <span class="n">len</span><span class="p">)</span> </span><span id="L-694"><a href="#L-694"><span class="linenos" data-line="694"></span></a> <span class="kd">local</span> <span class="n">temp</span> <span class="o">=</span> <span class="mi">0</span><span class="p">;</span> </span><span id="L-695"><a href="#L-695"><span class="linenos" data-line="695"></span></a> <span class="n">isxn_str</span> <span class="o">=</span> <span class="p">{</span> <span class="n">isxn_str</span><span class="p">:</span><span class="n">byte</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">len</span><span class="p">)</span> <span class="p">};</span> <span class="c1">-- make a table of bytes</span> </span><span id="L-696"><a href="#L-696"><span class="linenos" data-line="696"></span></a> <span class="n">len</span> <span class="o">=</span> <span class="n">len</span><span class="o">+</span><span class="mi">1</span><span class="p">;</span> <span class="c1">-- adjust to be a loop counter</span> </span><span id="L-697"><a href="#L-697"><span class="linenos" data-line="697"></span></a> <span class="kr">for</span> <span class="n">i</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span> <span class="n">isxn_str</span> <span class="p">)</span> <span class="kr">do</span> <span class="c1">-- loop through all of the bytes and calculate the checksum</span> </span><span id="L-698"><a href="#L-698"><span class="linenos" data-line="698"></span></a> <span class="kr">if</span> <span class="n">v</span> <span class="o">==</span> <span class="nb">string.byte</span><span class="p">(</span> <span class="s2">"X"</span> <span class="p">)</span> <span class="kr">then</span> <span class="c1">-- if checkdigit is X</span> </span><span id="L-699"><a href="#L-699"><span class="linenos" data-line="699"></span></a> <span class="n">temp</span> <span class="o">=</span> <span class="n">temp</span> <span class="o">+</span> <span class="mi">10</span><span class="o">*</span><span class="p">(</span> <span class="n">len</span> <span class="o">-</span> <span class="n">i</span> <span class="p">);</span> <span class="c1">-- it represents 10 decimal</span> </span><span id="L-700"><a href="#L-700"><span class="linenos" data-line="700"></span></a> <span class="kr">else</span> </span><span id="L-701"><a href="#L-701"><span class="linenos" data-line="701"></span></a> <span class="n">temp</span> <span class="o">=</span> <span class="n">temp</span> <span class="o">+</span> <span class="nb">tonumber</span><span class="p">(</span> <span class="nb">string.char</span><span class="p">(</span><span class="n">v</span><span class="p">)</span> <span class="p">)</span><span class="o">*</span><span class="p">(</span><span class="n">len</span><span class="o">-</span><span class="n">i</span><span class="p">);</span> </span><span id="L-702"><a href="#L-702"><span class="linenos" data-line="702"></span></a> <span class="kr">end</span> </span><span id="L-703"><a href="#L-703"><span class="linenos" data-line="703"></span></a> <span class="kr">end</span> </span><span id="L-704"><a href="#L-704"><span class="linenos" data-line="704"></span></a> <span class="kr">return</span> <span class="n">temp</span> <span class="o">%</span> <span class="mi">11</span> <span class="o">==</span> <span class="mi">0</span><span class="p">;</span> <span class="c1">-- returns true if calculation result is zero</span> </span><span id="L-705"><a href="#L-705"><span class="linenos" data-line="705"></span></a><span class="kr">end</span> </span><span id="L-706"><a href="#L-706"><span class="linenos" data-line="706"></span></a> </span><span id="L-707"><a href="#L-707"><span class="linenos" data-line="707"></span></a><span class="c1">-- Determines whether an ISBN string is valid</span> </span><span id="L-708"><a href="#L-708"><span class="linenos" data-line="708"></span></a><span class="kr">function</span> <span class="nf">checkisbn</span><span class="p">(</span> <span class="n">isbn_str</span> <span class="p">)</span> </span><span id="L-709"><a href="#L-709"><span class="linenos" data-line="709"></span></a> <span class="kr">if</span> <span class="kc">nil</span> <span class="o">~=</span> <span class="n">isbn_str</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"[^%s-0-9X]"</span><span class="p">)</span> <span class="kr">then</span> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- fail if isbn_str contains anything but digits, hyphens, or the uppercase X</span> </span><span id="L-710"><a href="#L-710"><span class="linenos" data-line="710"></span></a> <span class="n">isbn_str</span> <span class="o">=</span> <span class="n">isbn_str</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s2">"-"</span><span class="p">,</span> <span class="s2">""</span> <span class="p">):</span><span class="n">gsub</span><span class="p">(</span> <span class="s2">" "</span><span class="p">,</span> <span class="s2">""</span> <span class="p">);</span> <span class="c1">-- remove hyphens and spaces</span> </span><span id="L-711"><a href="#L-711"><span class="linenos" data-line="711"></span></a> <span class="kd">local</span> <span class="n">len</span> <span class="o">=</span> <span class="n">isbn_str</span><span class="p">:</span><span class="n">len</span><span class="p">();</span> </span><span id="L-712"><a href="#L-712"><span class="linenos" data-line="712"></span></a> </span><span id="L-713"><a href="#L-713"><span class="linenos" data-line="713"></span></a> <span class="kr">if</span> <span class="n">len</span> <span class="o">~=</span> <span class="mi">10</span> <span class="ow">and</span> <span class="n">len</span> <span class="o">~=</span> <span class="mi">13</span> <span class="kr">then</span> </span><span id="L-714"><a href="#L-714"><span class="linenos" data-line="714"></span></a> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> </span><span id="L-715"><a href="#L-715"><span class="linenos" data-line="715"></span></a> <span class="kr">end</span> </span><span id="L-716"><a href="#L-716"><span class="linenos" data-line="716"></span></a> </span><span id="L-717"><a href="#L-717"><span class="linenos" data-line="717"></span></a> <span class="kr">if</span> <span class="n">len</span> <span class="o">==</span> <span class="mi">10</span> <span class="kr">then</span> </span><span id="L-718"><a href="#L-718"><span class="linenos" data-line="718"></span></a> <span class="kr">if</span> <span class="n">isbn_str</span><span class="p">:</span><span class="n">match</span><span class="p">(</span> <span class="s2">"^%d*X?$"</span> <span class="p">)</span> <span class="o">==</span> <span class="kc">nil</span> <span class="kr">then</span> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="kr">end</span> </span><span id="L-719"><a href="#L-719"><span class="linenos" data-line="719"></span></a> <span class="kr">return</span> <span class="n">is_valid_isxn</span><span class="p">(</span><span class="n">isbn_str</span><span class="p">,</span> <span class="mi">10</span><span class="p">);</span> </span><span id="L-720"><a href="#L-720"><span class="linenos" data-line="720"></span></a> <span class="kr">else</span> </span><span id="L-721"><a href="#L-721"><span class="linenos" data-line="721"></span></a> <span class="kd">local</span> <span class="n">temp</span> <span class="o">=</span> <span class="mi">0</span><span class="p">;</span> </span><span id="L-722"><a href="#L-722"><span class="linenos" data-line="722"></span></a> <span class="kr">if</span> <span class="n">isbn_str</span><span class="p">:</span><span class="n">match</span><span class="p">(</span> <span class="s2">"^97[89]%d*$"</span> <span class="p">)</span> <span class="o">==</span> <span class="kc">nil</span> <span class="kr">then</span> <span class="kr">return</span> <span class="kc">false</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- isbn13 begins with 978 or 979</span> </span><span id="L-723"><a href="#L-723"><span class="linenos" data-line="723"></span></a> <span class="n">isbn_str</span> <span class="o">=</span> <span class="p">{</span> <span class="n">isbn_str</span><span class="p">:</span><span class="n">byte</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">len</span><span class="p">)</span> <span class="p">};</span> </span><span id="L-724"><a href="#L-724"><span class="linenos" data-line="724"></span></a> <span class="kr">for</span> <span class="n">i</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span> <span class="n">isbn_str</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-725"><a href="#L-725"><span class="linenos" data-line="725"></span></a> <span class="n">temp</span> <span class="o">=</span> <span class="n">temp</span> <span class="o">+</span> <span class="p">(</span><span class="mi">3</span> <span class="o">-</span> <span class="mi">2</span><span class="o">*</span><span class="p">(</span><span class="n">i</span> <span class="o">%</span> <span class="mi">2</span><span class="p">))</span> <span class="o">*</span> <span class="nb">tonumber</span><span class="p">(</span> <span class="nb">string.char</span><span class="p">(</span><span class="n">v</span><span class="p">)</span> <span class="p">);</span> </span><span id="L-726"><a href="#L-726"><span class="linenos" data-line="726"></span></a> <span class="kr">end</span> </span><span id="L-727"><a href="#L-727"><span class="linenos" data-line="727"></span></a> <span class="kr">return</span> <span class="n">temp</span> <span class="o">%</span> <span class="mi">10</span> <span class="o">==</span> <span class="mi">0</span><span class="p">;</span> </span><span id="L-728"><a href="#L-728"><span class="linenos" data-line="728"></span></a> <span class="kr">end</span> </span><span id="L-729"><a href="#L-729"><span class="linenos" data-line="729"></span></a><span class="kr">end</span> </span><span id="L-730"><a href="#L-730"><span class="linenos" data-line="730"></span></a> </span><span id="L-731"><a href="#L-731"><span class="linenos" data-line="731"></span></a><span class="c1">-- Gets the display text for a wikilink like [[A|B]] or [[B]] gives B</span> </span><span id="L-732"><a href="#L-732"><span class="linenos" data-line="732"></span></a><span class="kr">function</span> <span class="nf">removewikilink</span><span class="p">(</span> <span class="n">str</span> <span class="p">)</span> </span><span id="L-733"><a href="#L-733"><span class="linenos" data-line="733"></span></a> <span class="kr">return</span> <span class="p">(</span><span class="n">str</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s2">"%[%[([^%[%]]*)%]%]"</span><span class="p">,</span> <span class="kr">function</span><span class="p">(</span><span class="n">l</span><span class="p">)</span> </span><span id="L-734"><a href="#L-734"><span class="linenos" data-line="734"></span></a> <span class="kr">return</span> <span class="n">l</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s2">"^[^|]*|(.*)$"</span><span class="p">,</span> <span class="s2">"%1"</span> <span class="p">):</span><span class="n">gsub</span><span class="p">(</span><span class="s2">"^%s*(.-)%s*$"</span><span class="p">,</span> <span class="s2">"%1"</span><span class="p">);</span> </span><span id="L-735"><a href="#L-735"><span class="linenos" data-line="735"></span></a> <span class="kr">end</span><span class="p">));</span> </span><span id="L-736"><a href="#L-736"><span class="linenos" data-line="736"></span></a><span class="kr">end</span> </span><span id="L-737"><a href="#L-737"><span class="linenos" data-line="737"></span></a> </span><span id="L-738"><a href="#L-738"><span class="linenos" data-line="738"></span></a><span class="c1">-- Escape sequences for content that will be used for URL descriptions</span> </span><span id="L-739"><a href="#L-739"><span class="linenos" data-line="739"></span></a><span class="kr">function</span> <span class="nf">safeforurl</span><span class="p">(</span> <span class="n">str</span> <span class="p">)</span> </span><span id="L-740"><a href="#L-740"><span class="linenos" data-line="740"></span></a> <span class="kr">if</span> <span class="n">str</span><span class="p">:</span><span class="n">match</span><span class="p">(</span> <span class="s2">"%[%[.-%]%]"</span> <span class="p">)</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-741"><a href="#L-741"><span class="linenos" data-line="741"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span><span class="p">,</span> <span class="p">{</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'wikilink_in_url'</span><span class="p">,</span> <span class="p">{},</span> <span class="kc">true</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-742"><a href="#L-742"><span class="linenos" data-line="742"></span></a> <span class="kr">end</span> </span><span id="L-743"><a href="#L-743"><span class="linenos" data-line="743"></span></a> </span><span id="L-744"><a href="#L-744"><span class="linenos" data-line="744"></span></a> <span class="kr">return</span> <span class="n">str</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s1">'[%[%]</span><span class="se">\n</span><span class="s1">]'</span><span class="p">,</span> <span class="p">{</span> </span><span id="L-745"><a href="#L-745"><span class="linenos" data-line="745"></span></a> <span class="p">[</span><span class="s1">'['</span><span class="p">]</span> <span class="o">=</span> <span class="s1">'&#91;'</span><span class="p">,</span> </span><span id="L-746"><a href="#L-746"><span class="linenos" data-line="746"></span></a> <span class="p">[</span><span class="s1">']'</span><span class="p">]</span> <span class="o">=</span> <span class="s1">'&#93;'</span><span class="p">,</span> </span><span id="L-747"><a href="#L-747"><span class="linenos" data-line="747"></span></a> <span class="p">[</span><span class="s1">'</span><span class="se">\n</span><span class="s1">'</span><span class="p">]</span> <span class="o">=</span> <span class="s1">' '</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-748"><a href="#L-748"><span class="linenos" data-line="748"></span></a><span class="kr">end</span> </span><span id="L-749"><a href="#L-749"><span class="linenos" data-line="749"></span></a> </span><span id="L-750"><a href="#L-750"><span class="linenos" data-line="750"></span></a><span class="c1">-- Converts a hyphen to a dash</span> </span><span id="L-751"><a href="#L-751"><span class="linenos" data-line="751"></span></a><span class="kr">function</span> <span class="nf">hyphentodash</span><span class="p">(</span> <span class="n">str</span> <span class="p">)</span> </span><span id="L-752"><a href="#L-752"><span class="linenos" data-line="752"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">str</span><span class="p">)</span> <span class="ow">or</span> <span class="n">str</span><span class="p">:</span><span class="n">match</span><span class="p">(</span> <span class="s2">"[%[%]{}<>]"</span> <span class="p">)</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-753"><a href="#L-753"><span class="linenos" data-line="753"></span></a> <span class="kr">return</span> <span class="n">str</span><span class="p">;</span> </span><span id="L-754"><a href="#L-754"><span class="linenos" data-line="754"></span></a> <span class="kr">end</span> </span><span id="L-755"><a href="#L-755"><span class="linenos" data-line="755"></span></a> <span class="kr">return</span> <span class="n">str</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s1">'-'</span><span class="p">,</span> <span class="s1">'–'</span> <span class="p">);</span> </span><span id="L-756"><a href="#L-756"><span class="linenos" data-line="756"></span></a><span class="kr">end</span> </span><span id="L-757"><a href="#L-757"><span class="linenos" data-line="757"></span></a> </span><span id="L-758"><a href="#L-758"><span class="linenos" data-line="758"></span></a><span class="c1">-- Protects a string that will be wrapped in wiki italic markup '' ... ''</span> </span><span id="L-759"><a href="#L-759"><span class="linenos" data-line="759"></span></a><span class="kr">function</span> <span class="nf">safeforitalics</span><span class="p">(</span> <span class="n">str</span> <span class="p">)</span> </span><span id="L-760"><a href="#L-760"><span class="linenos" data-line="760"></span></a> <span class="cm">--[[ Note: We can not use <i> for italics, as the expected behavior for</span> </span><span id="L-761"><a href="#L-761"><span class="linenos" data-line="761"></span></a><span class="cm"> italics specified by ''...'' in the title is that they will be inverted</span> </span><span id="L-762"><a href="#L-762"><span class="linenos" data-line="762"></span></a><span class="cm"> (i.e. unitalicized) in the resulting references. In addition, <i> and ''</span> </span><span id="L-763"><a href="#L-763"><span class="linenos" data-line="763"></span></a><span class="cm"> tend to interact poorly under Mediawiki's HTML tidy. ]]</span> </span><span id="L-764"><a href="#L-764"><span class="linenos" data-line="764"></span></a> </span><span id="L-765"><a href="#L-765"><span class="linenos" data-line="765"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">str</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-766"><a href="#L-766"><span class="linenos" data-line="766"></span></a> <span class="kr">return</span> <span class="n">str</span><span class="p">;</span> </span><span id="L-767"><a href="#L-767"><span class="linenos" data-line="767"></span></a> <span class="kr">else</span> </span><span id="L-768"><a href="#L-768"><span class="linenos" data-line="768"></span></a> <span class="kr">if</span> <span class="n">str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="s2">"'"</span> <span class="kr">then</span> <span class="n">str</span> <span class="o">=</span> <span class="s2">"<span />"</span> <span class="o">..</span> <span class="n">str</span><span class="p">;</span> <span class="kr">end</span> </span><span id="L-769"><a href="#L-769"><span class="linenos" data-line="769"></span></a> <span class="kr">if</span> <span class="n">str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="o">-</span><span class="mi">1</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="s2">"'"</span> <span class="kr">then</span> <span class="n">str</span> <span class="o">=</span> <span class="n">str</span> <span class="o">..</span> <span class="s2">"<span />"</span><span class="p">;</span> <span class="kr">end</span> </span><span id="L-770"><a href="#L-770"><span class="linenos" data-line="770"></span></a> </span><span id="L-771"><a href="#L-771"><span class="linenos" data-line="771"></span></a> <span class="c1">-- Remove newlines as they break italics.</span> </span><span id="L-772"><a href="#L-772"><span class="linenos" data-line="772"></span></a> <span class="kr">return</span> <span class="n">str</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s1">'</span><span class="se">\n</span><span class="s1">'</span><span class="p">,</span> <span class="s1">' '</span> <span class="p">);</span> </span><span id="L-773"><a href="#L-773"><span class="linenos" data-line="773"></span></a> <span class="kr">end</span> </span><span id="L-774"><a href="#L-774"><span class="linenos" data-line="774"></span></a><span class="kr">end</span> </span><span id="L-775"><a href="#L-775"><span class="linenos" data-line="775"></span></a> </span><span id="L-776"><a href="#L-776"><span class="linenos" data-line="776"></span></a><span class="cm">--[[</span> </span><span id="L-777"><a href="#L-777"><span class="linenos" data-line="777"></span></a><span class="cm">Joins a sequence of strings together while checking for duplicate separation</span> </span><span id="L-778"><a href="#L-778"><span class="linenos" data-line="778"></span></a><span class="cm">characters.</span> </span><span id="L-779"><a href="#L-779"><span class="linenos" data-line="779"></span></a><span class="cm">]]</span> </span><span id="L-780"><a href="#L-780"><span class="linenos" data-line="780"></span></a><span class="kr">function</span> <span class="nf">safejoin</span><span class="p">(</span> <span class="n">tbl</span><span class="p">,</span> <span class="n">duplicate_char</span> <span class="p">)</span> </span><span id="L-781"><a href="#L-781"><span class="linenos" data-line="781"></span></a> <span class="cm">--[[</span> </span><span id="L-782"><a href="#L-782"><span class="linenos" data-line="782"></span></a><span class="cm"> Note: we use string functions here, rather than ustring functions.</span> </span><span id="L-783"><a href="#L-783"><span class="linenos" data-line="783"></span></a><span class="cm"> </span> </span><span id="L-784"><a href="#L-784"><span class="linenos" data-line="784"></span></a><span class="cm"> This has considerably faster performance and should work correctly as </span> </span><span id="L-785"><a href="#L-785"><span class="linenos" data-line="785"></span></a><span class="cm"> long as the duplicate_char is strict ASCII. The strings</span> </span><span id="L-786"><a href="#L-786"><span class="linenos" data-line="786"></span></a><span class="cm"> in tbl may be ASCII or UTF8.</span> </span><span id="L-787"><a href="#L-787"><span class="linenos" data-line="787"></span></a><span class="cm"> ]]</span> </span><span id="L-788"><a href="#L-788"><span class="linenos" data-line="788"></span></a> </span><span id="L-789"><a href="#L-789"><span class="linenos" data-line="789"></span></a> <span class="kd">local</span> <span class="n">str</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-790"><a href="#L-790"><span class="linenos" data-line="790"></span></a> <span class="kd">local</span> <span class="n">comp</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-791"><a href="#L-791"><span class="linenos" data-line="791"></span></a> <span class="kd">local</span> <span class="n">end_chr</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-792"><a href="#L-792"><span class="linenos" data-line="792"></span></a> <span class="kd">local</span> <span class="n">trim</span><span class="p">;</span> </span><span id="L-793"><a href="#L-793"><span class="linenos" data-line="793"></span></a> <span class="kr">for</span> <span class="n">_</span><span class="p">,</span> <span class="n">value</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span> <span class="n">tbl</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-794"><a href="#L-794"><span class="linenos" data-line="794"></span></a> <span class="kr">if</span> <span class="n">value</span> <span class="o">==</span> <span class="kc">nil</span> <span class="kr">then</span> <span class="n">value</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> <span class="kr">end</span> </span><span id="L-795"><a href="#L-795"><span class="linenos" data-line="795"></span></a> </span><span id="L-796"><a href="#L-796"><span class="linenos" data-line="796"></span></a> <span class="kr">if</span> <span class="n">str</span> <span class="o">==</span> <span class="s1">''</span> <span class="kr">then</span> </span><span id="L-797"><a href="#L-797"><span class="linenos" data-line="797"></span></a> <span class="n">str</span> <span class="o">=</span> <span class="n">value</span><span class="p">;</span> </span><span id="L-798"><a href="#L-798"><span class="linenos" data-line="798"></span></a> <span class="kr">elseif</span> <span class="n">value</span> <span class="o">~=</span> <span class="s1">''</span> <span class="kr">then</span> </span><span id="L-799"><a href="#L-799"><span class="linenos" data-line="799"></span></a> <span class="kr">if</span> <span class="n">value</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="s1">'<'</span> <span class="kr">then</span> </span><span id="L-800"><a href="#L-800"><span class="linenos" data-line="800"></span></a> <span class="c1">-- Special case of values enclosed in spans and other markup.</span> </span><span id="L-801"><a href="#L-801"><span class="linenos" data-line="801"></span></a> <span class="n">comp</span> <span class="o">=</span> <span class="n">value</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s2">"%b<>"</span><span class="p">,</span> <span class="s2">""</span> <span class="p">);</span> </span><span id="L-802"><a href="#L-802"><span class="linenos" data-line="802"></span></a> <span class="kr">else</span> </span><span id="L-803"><a href="#L-803"><span class="linenos" data-line="803"></span></a> <span class="n">comp</span> <span class="o">=</span> <span class="n">value</span><span class="p">;</span> </span><span id="L-804"><a href="#L-804"><span class="linenos" data-line="804"></span></a> <span class="kr">end</span> </span><span id="L-805"><a href="#L-805"><span class="linenos" data-line="805"></span></a> </span><span id="L-806"><a href="#L-806"><span class="linenos" data-line="806"></span></a> <span class="kr">if</span> <span class="n">comp</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="n">duplicate_char</span> <span class="kr">then</span> </span><span id="L-807"><a href="#L-807"><span class="linenos" data-line="807"></span></a> <span class="n">trim</span> <span class="o">=</span> <span class="kc">false</span><span class="p">;</span> </span><span id="L-808"><a href="#L-808"><span class="linenos" data-line="808"></span></a> <span class="n">end_chr</span> <span class="o">=</span> <span class="n">str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="o">-</span><span class="mi">1</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">);</span> </span><span id="L-809"><a href="#L-809"><span class="linenos" data-line="809"></span></a> <span class="c1">-- str = str .. "<HERE(enchr=" .. end_chr.. ")"</span> </span><span id="L-810"><a href="#L-810"><span class="linenos" data-line="810"></span></a> <span class="kr">if</span> <span class="n">end_chr</span> <span class="o">==</span> <span class="n">duplicate_char</span> <span class="kr">then</span> </span><span id="L-811"><a href="#L-811"><span class="linenos" data-line="811"></span></a> <span class="n">str</span> <span class="o">=</span> <span class="n">str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="o">-</span><span class="mi">2</span><span class="p">);</span> </span><span id="L-812"><a href="#L-812"><span class="linenos" data-line="812"></span></a> <span class="kr">elseif</span> <span class="n">end_chr</span> <span class="o">==</span> <span class="s2">"'"</span> <span class="kr">then</span> </span><span id="L-813"><a href="#L-813"><span class="linenos" data-line="813"></span></a> <span class="kr">if</span> <span class="n">str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="o">-</span><span class="mi">3</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="n">duplicate_char</span> <span class="o">..</span> <span class="s2">"''"</span> <span class="kr">then</span> </span><span id="L-814"><a href="#L-814"><span class="linenos" data-line="814"></span></a> <span class="n">str</span> <span class="o">=</span> <span class="n">str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="o">-</span><span class="mi">4</span><span class="p">)</span> <span class="o">..</span> <span class="s2">"''"</span><span class="p">;</span> </span><span id="L-815"><a href="#L-815"><span class="linenos" data-line="815"></span></a> <span class="kr">elseif</span> <span class="n">str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="o">-</span><span class="mi">5</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="n">duplicate_char</span> <span class="o">..</span> <span class="s2">"]]''"</span> <span class="kr">then</span> </span><span id="L-816"><a href="#L-816"><span class="linenos" data-line="816"></span></a> <span class="n">trim</span> <span class="o">=</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-817"><a href="#L-817"><span class="linenos" data-line="817"></span></a> <span class="kr">elseif</span> <span class="n">str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="o">-</span><span class="mi">4</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="n">duplicate_char</span> <span class="o">..</span> <span class="s2">"]''"</span> <span class="kr">then</span> </span><span id="L-818"><a href="#L-818"><span class="linenos" data-line="818"></span></a> <span class="n">trim</span> <span class="o">=</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-819"><a href="#L-819"><span class="linenos" data-line="819"></span></a> <span class="kr">end</span> </span><span id="L-820"><a href="#L-820"><span class="linenos" data-line="820"></span></a> <span class="kr">elseif</span> <span class="n">end_chr</span> <span class="o">==</span> <span class="s2">"]"</span> <span class="kr">then</span> </span><span id="L-821"><a href="#L-821"><span class="linenos" data-line="821"></span></a> <span class="kr">if</span> <span class="n">str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="o">-</span><span class="mi">3</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="n">duplicate_char</span> <span class="o">..</span> <span class="s2">"]]"</span> <span class="kr">then</span> </span><span id="L-822"><a href="#L-822"><span class="linenos" data-line="822"></span></a> <span class="n">trim</span> <span class="o">=</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-823"><a href="#L-823"><span class="linenos" data-line="823"></span></a> <span class="kr">elseif</span> <span class="n">str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="o">-</span><span class="mi">2</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="n">duplicate_char</span> <span class="o">..</span> <span class="s2">"]"</span> <span class="kr">then</span> </span><span id="L-824"><a href="#L-824"><span class="linenos" data-line="824"></span></a> <span class="n">trim</span> <span class="o">=</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-825"><a href="#L-825"><span class="linenos" data-line="825"></span></a> <span class="kr">end</span> </span><span id="L-826"><a href="#L-826"><span class="linenos" data-line="826"></span></a> <span class="kr">elseif</span> <span class="n">end_chr</span> <span class="o">==</span> <span class="s2">" "</span> <span class="kr">then</span> </span><span id="L-827"><a href="#L-827"><span class="linenos" data-line="827"></span></a> <span class="kr">if</span> <span class="n">str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="o">-</span><span class="mi">2</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="n">duplicate_char</span> <span class="o">..</span> <span class="s2">" "</span> <span class="kr">then</span> </span><span id="L-828"><a href="#L-828"><span class="linenos" data-line="828"></span></a> <span class="n">str</span> <span class="o">=</span> <span class="n">str</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="o">-</span><span class="mi">3</span><span class="p">);</span> </span><span id="L-829"><a href="#L-829"><span class="linenos" data-line="829"></span></a> <span class="kr">end</span> </span><span id="L-830"><a href="#L-830"><span class="linenos" data-line="830"></span></a> <span class="kr">end</span> </span><span id="L-831"><a href="#L-831"><span class="linenos" data-line="831"></span></a> </span><span id="L-832"><a href="#L-832"><span class="linenos" data-line="832"></span></a> <span class="kr">if</span> <span class="n">trim</span> <span class="kr">then</span> </span><span id="L-833"><a href="#L-833"><span class="linenos" data-line="833"></span></a> <span class="kr">if</span> <span class="n">value</span> <span class="o">~=</span> <span class="n">comp</span> <span class="kr">then</span> </span><span id="L-834"><a href="#L-834"><span class="linenos" data-line="834"></span></a> <span class="kd">local</span> <span class="n">dup2</span> <span class="o">=</span> <span class="n">duplicate_char</span><span class="p">;</span> </span><span id="L-835"><a href="#L-835"><span class="linenos" data-line="835"></span></a> <span class="kr">if</span> <span class="n">dup2</span><span class="p">:</span><span class="n">match</span><span class="p">(</span> <span class="s2">"%A"</span> <span class="p">)</span> <span class="kr">then</span> <span class="n">dup2</span> <span class="o">=</span> <span class="s2">"%"</span> <span class="o">..</span> <span class="n">dup2</span><span class="p">;</span> <span class="kr">end</span> </span><span id="L-836"><a href="#L-836"><span class="linenos" data-line="836"></span></a> </span><span id="L-837"><a href="#L-837"><span class="linenos" data-line="837"></span></a> <span class="n">value</span> <span class="o">=</span> <span class="n">value</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s2">"(%b<>)"</span> <span class="o">..</span> <span class="n">dup2</span><span class="p">,</span> <span class="s2">"%1"</span><span class="p">,</span> <span class="mi">1</span> <span class="p">)</span> </span><span id="L-838"><a href="#L-838"><span class="linenos" data-line="838"></span></a> <span class="kr">else</span> </span><span id="L-839"><a href="#L-839"><span class="linenos" data-line="839"></span></a> <span class="n">value</span> <span class="o">=</span> <span class="n">value</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span> <span class="mi">2</span><span class="p">,</span> <span class="o">-</span><span class="mi">1</span> <span class="p">);</span> </span><span id="L-840"><a href="#L-840"><span class="linenos" data-line="840"></span></a> <span class="kr">end</span> </span><span id="L-841"><a href="#L-841"><span class="linenos" data-line="841"></span></a> <span class="kr">end</span> </span><span id="L-842"><a href="#L-842"><span class="linenos" data-line="842"></span></a> <span class="kr">end</span> </span><span id="L-843"><a href="#L-843"><span class="linenos" data-line="843"></span></a> <span class="n">str</span> <span class="o">=</span> <span class="n">str</span> <span class="o">..</span> <span class="n">value</span><span class="p">;</span> </span><span id="L-844"><a href="#L-844"><span class="linenos" data-line="844"></span></a> <span class="kr">end</span> </span><span id="L-845"><a href="#L-845"><span class="linenos" data-line="845"></span></a> <span class="kr">end</span> </span><span id="L-846"><a href="#L-846"><span class="linenos" data-line="846"></span></a> <span class="kr">return</span> <span class="n">str</span><span class="p">;</span> </span><span id="L-847"><a href="#L-847"><span class="linenos" data-line="847"></span></a><span class="kr">end</span> </span><span id="L-848"><a href="#L-848"><span class="linenos" data-line="848"></span></a> </span><span id="L-849"><a href="#L-849"><span class="linenos" data-line="849"></span></a><span class="c1">-- Attempts to convert names to initials.</span> </span><span id="L-850"><a href="#L-850"><span class="linenos" data-line="850"></span></a><span class="kr">function</span> <span class="nf">reducetoinitials</span><span class="p">(</span><span class="n">first</span><span class="p">)</span> </span><span id="L-851"><a href="#L-851"><span class="linenos" data-line="851"></span></a> <span class="kd">local</span> <span class="n">initials</span> <span class="o">=</span> <span class="p">{}</span> </span><span id="L-852"><a href="#L-852"><span class="linenos" data-line="852"></span></a> <span class="kr">for</span> <span class="n">word</span> <span class="kr">in</span> <span class="nb">string.gmatch</span><span class="p">(</span><span class="n">first</span><span class="p">,</span> <span class="s2">"%S+"</span><span class="p">)</span> <span class="kr">do</span> </span><span id="L-853"><a href="#L-853"><span class="linenos" data-line="853"></span></a> <span class="nb">table.insert</span><span class="p">(</span><span class="n">initials</span><span class="p">,</span> <span class="nb">string.sub</span><span class="p">(</span><span class="n">word</span><span class="p">,</span><span class="mi">1</span><span class="p">,</span><span class="mi">1</span><span class="p">))</span> <span class="c1">-- Vancouver format does not include full stops.</span> </span><span id="L-854"><a href="#L-854"><span class="linenos" data-line="854"></span></a> <span class="kr">end</span> </span><span id="L-855"><a href="#L-855"><span class="linenos" data-line="855"></span></a> <span class="kr">return</span> <span class="nb">table.concat</span><span class="p">(</span><span class="n">initials</span><span class="p">)</span> <span class="c1">-- Vancouver format does not include spaces.</span> </span><span id="L-856"><a href="#L-856"><span class="linenos" data-line="856"></span></a><span class="kr">end</span> </span><span id="L-857"><a href="#L-857"><span class="linenos" data-line="857"></span></a> </span><span id="L-858"><a href="#L-858"><span class="linenos" data-line="858"></span></a><span class="c1">-- Formats a list of people (e.g. authors / editors) </span> </span><span id="L-859"><a href="#L-859"><span class="linenos" data-line="859"></span></a><span class="kr">function</span> <span class="nf">listpeople</span><span class="p">(</span><span class="n">control</span><span class="p">,</span> <span class="n">people</span><span class="p">)</span> </span><span id="L-860"><a href="#L-860"><span class="linenos" data-line="860"></span></a> <span class="kd">local</span> <span class="n">sep</span> <span class="o">=</span> <span class="n">control</span><span class="p">.</span><span class="n">sep</span><span class="p">;</span> </span><span id="L-861"><a href="#L-861"><span class="linenos" data-line="861"></span></a> <span class="kd">local</span> <span class="n">namesep</span> <span class="o">=</span> <span class="n">control</span><span class="p">.</span><span class="n">namesep</span> </span><span id="L-862"><a href="#L-862"><span class="linenos" data-line="862"></span></a> <span class="kd">local</span> <span class="n">format</span> <span class="o">=</span> <span class="n">control</span><span class="p">.</span><span class="n">format</span> </span><span id="L-863"><a href="#L-863"><span class="linenos" data-line="863"></span></a> <span class="kd">local</span> <span class="n">maximum</span> <span class="o">=</span> <span class="n">control</span><span class="p">.</span><span class="n">maximum</span> </span><span id="L-864"><a href="#L-864"><span class="linenos" data-line="864"></span></a> <span class="kd">local</span> <span class="n">lastauthoramp</span> <span class="o">=</span> <span class="n">control</span><span class="p">.</span><span class="n">lastauthoramp</span><span class="p">;</span> </span><span id="L-865"><a href="#L-865"><span class="linenos" data-line="865"></span></a> <span class="kd">local</span> <span class="n">text</span> <span class="o">=</span> <span class="p">{}</span> </span><span id="L-866"><a href="#L-866"><span class="linenos" data-line="866"></span></a> <span class="kd">local</span> <span class="n">etal</span> <span class="o">=</span> <span class="kc">false</span><span class="p">;</span> </span><span id="L-867"><a href="#L-867"><span class="linenos" data-line="867"></span></a> </span><span id="L-868"><a href="#L-868"><span class="linenos" data-line="868"></span></a> <span class="kr">if</span> <span class="n">sep</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="o">-</span><span class="mi">1</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> <span class="o">~=</span> <span class="s2">" "</span> <span class="kr">then</span> <span class="n">sep</span> <span class="o">=</span> <span class="n">sep</span> <span class="o">..</span> <span class="s2">" "</span> <span class="kr">end</span> </span><span id="L-869"><a href="#L-869"><span class="linenos" data-line="869"></span></a> <span class="kr">if</span> <span class="n">maximum</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="ow">and</span> <span class="n">maximum</span> <span class="o"><</span> <span class="mi">1</span> <span class="kr">then</span> <span class="kr">return</span> <span class="s2">""</span><span class="p">,</span> <span class="mi">0</span><span class="p">;</span> <span class="kr">end</span> </span><span id="L-870"><a href="#L-870"><span class="linenos" data-line="870"></span></a> </span><span id="L-871"><a href="#L-871"><span class="linenos" data-line="871"></span></a> <span class="kr">for</span> <span class="n">i</span><span class="p">,</span><span class="n">person</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span><span class="n">people</span><span class="p">)</span> <span class="kr">do</span> </span><span id="L-872"><a href="#L-872"><span class="linenos" data-line="872"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">person</span><span class="p">.</span><span class="n">last</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-873"><a href="#L-873"><span class="linenos" data-line="873"></span></a> <span class="kd">local</span> <span class="n">mask</span> <span class="o">=</span> <span class="n">person</span><span class="p">.</span><span class="n">mask</span> </span><span id="L-874"><a href="#L-874"><span class="linenos" data-line="874"></span></a> <span class="kd">local</span> <span class="n">one</span> </span><span id="L-875"><a href="#L-875"><span class="linenos" data-line="875"></span></a> <span class="kd">local</span> <span class="n">sep_one</span> <span class="o">=</span> <span class="n">sep</span><span class="p">;</span> </span><span id="L-876"><a href="#L-876"><span class="linenos" data-line="876"></span></a> <span class="kr">if</span> <span class="n">maximum</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="ow">and</span> <span class="n">i</span> <span class="o">></span> <span class="n">maximum</span> <span class="kr">then</span> </span><span id="L-877"><a href="#L-877"><span class="linenos" data-line="877"></span></a> <span class="n">etal</span> <span class="o">=</span> <span class="kc">true</span><span class="p">;</span> </span><span id="L-878"><a href="#L-878"><span class="linenos" data-line="878"></span></a> <span class="kr">break</span><span class="p">;</span> </span><span id="L-879"><a href="#L-879"><span class="linenos" data-line="879"></span></a> <span class="kr">elseif</span> <span class="p">(</span><span class="n">mask</span> <span class="o">~=</span> <span class="kc">nil</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-880"><a href="#L-880"><span class="linenos" data-line="880"></span></a> <span class="kd">local</span> <span class="n">n</span> <span class="o">=</span> <span class="nb">tonumber</span><span class="p">(</span><span class="n">mask</span><span class="p">)</span> </span><span id="L-881"><a href="#L-881"><span class="linenos" data-line="881"></span></a> <span class="kr">if</span> <span class="p">(</span><span class="n">n</span> <span class="o">~=</span> <span class="kc">nil</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-882"><a href="#L-882"><span class="linenos" data-line="882"></span></a> <span class="n">one</span> <span class="o">=</span> <span class="nb">string.rep</span><span class="p">(</span><span class="s2">"&mdash;"</span><span class="p">,</span><span class="n">n</span><span class="p">)</span> </span><span id="L-883"><a href="#L-883"><span class="linenos" data-line="883"></span></a> <span class="kr">else</span> </span><span id="L-884"><a href="#L-884"><span class="linenos" data-line="884"></span></a> <span class="n">one</span> <span class="o">=</span> <span class="n">mask</span><span class="p">;</span> </span><span id="L-885"><a href="#L-885"><span class="linenos" data-line="885"></span></a> <span class="n">sep_one</span> <span class="o">=</span> <span class="s2">" "</span><span class="p">;</span> </span><span id="L-886"><a href="#L-886"><span class="linenos" data-line="886"></span></a> <span class="kr">end</span> </span><span id="L-887"><a href="#L-887"><span class="linenos" data-line="887"></span></a> <span class="kr">else</span> </span><span id="L-888"><a href="#L-888"><span class="linenos" data-line="888"></span></a> <span class="n">one</span> <span class="o">=</span> <span class="n">person</span><span class="p">.</span><span class="n">last</span> </span><span id="L-889"><a href="#L-889"><span class="linenos" data-line="889"></span></a> <span class="kd">local</span> <span class="n">first</span> <span class="o">=</span> <span class="n">person</span><span class="p">.</span><span class="n">first</span> </span><span id="L-890"><a href="#L-890"><span class="linenos" data-line="890"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">first</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-891"><a href="#L-891"><span class="linenos" data-line="891"></span></a> <span class="kr">if</span> <span class="p">(</span> <span class="s2">"vanc"</span> <span class="o">==</span> <span class="n">format</span> <span class="p">)</span> <span class="kr">then</span> <span class="n">first</span> <span class="o">=</span> <span class="n">reducetoinitials</span><span class="p">(</span><span class="n">first</span><span class="p">)</span> <span class="kr">end</span> </span><span id="L-892"><a href="#L-892"><span class="linenos" data-line="892"></span></a> <span class="n">one</span> <span class="o">=</span> <span class="n">one</span> <span class="o">..</span> <span class="n">namesep</span> <span class="o">..</span> <span class="n">first</span> </span><span id="L-893"><a href="#L-893"><span class="linenos" data-line="893"></span></a> <span class="kr">end</span> </span><span id="L-894"><a href="#L-894"><span class="linenos" data-line="894"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">person</span><span class="p">.</span><span class="n">link</span><span class="p">)</span> <span class="kr">then</span> <span class="n">one</span> <span class="o">=</span> <span class="s2">"[["</span> <span class="o">..</span> <span class="n">person</span><span class="p">.</span><span class="n">link</span> <span class="o">..</span> <span class="s2">"|"</span> <span class="o">..</span> <span class="n">one</span> <span class="o">..</span> <span class="s2">"]]"</span> <span class="kr">end</span> </span><span id="L-895"><a href="#L-895"><span class="linenos" data-line="895"></span></a> <span class="kr">end</span> </span><span id="L-896"><a href="#L-896"><span class="linenos" data-line="896"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">text</span><span class="p">,</span> <span class="n">one</span> <span class="p">)</span> </span><span id="L-897"><a href="#L-897"><span class="linenos" data-line="897"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">text</span><span class="p">,</span> <span class="n">sep_one</span> <span class="p">)</span> </span><span id="L-898"><a href="#L-898"><span class="linenos" data-line="898"></span></a> <span class="kr">end</span> </span><span id="L-899"><a href="#L-899"><span class="linenos" data-line="899"></span></a> <span class="kr">end</span> </span><span id="L-900"><a href="#L-900"><span class="linenos" data-line="900"></span></a> </span><span id="L-901"><a href="#L-901"><span class="linenos" data-line="901"></span></a> <span class="kd">local</span> <span class="n">count</span> <span class="o">=</span> <span class="o">#</span><span class="n">text</span> <span class="o">/</span> <span class="mi">2</span><span class="p">;</span> </span><span id="L-902"><a href="#L-902"><span class="linenos" data-line="902"></span></a> <span class="kr">if</span> <span class="n">count</span> <span class="o">></span> <span class="mi">0</span> <span class="kr">then</span> </span><span id="L-903"><a href="#L-903"><span class="linenos" data-line="903"></span></a> <span class="kr">if</span> <span class="n">count</span> <span class="o">></span> <span class="mi">1</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">lastauthoramp</span><span class="p">)</span> <span class="ow">and</span> <span class="ow">not</span> <span class="n">etal</span> <span class="kr">then</span> </span><span id="L-904"><a href="#L-904"><span class="linenos" data-line="904"></span></a> <span class="n">text</span><span class="p">[</span><span class="o">#</span><span class="n">text</span><span class="o">-</span><span class="mi">2</span><span class="p">]</span> <span class="o">=</span> <span class="s2">" & "</span><span class="p">;</span> </span><span id="L-905"><a href="#L-905"><span class="linenos" data-line="905"></span></a> <span class="kr">end</span> </span><span id="L-906"><a href="#L-906"><span class="linenos" data-line="906"></span></a> <span class="n">text</span><span class="p">[</span><span class="o">#</span><span class="n">text</span><span class="p">]</span> <span class="o">=</span> <span class="kc">nil</span><span class="p">;</span> </span><span id="L-907"><a href="#L-907"><span class="linenos" data-line="907"></span></a> <span class="kr">end</span> </span><span id="L-908"><a href="#L-908"><span class="linenos" data-line="908"></span></a> </span><span id="L-909"><a href="#L-909"><span class="linenos" data-line="909"></span></a> <span class="kd">local</span> <span class="n">result</span> <span class="o">=</span> <span class="nb">table.concat</span><span class="p">(</span><span class="n">text</span><span class="p">)</span> <span class="c1">-- construct list</span> </span><span id="L-910"><a href="#L-910"><span class="linenos" data-line="910"></span></a> <span class="kr">if</span> <span class="n">etal</span> <span class="kr">then</span> </span><span id="L-911"><a href="#L-911"><span class="linenos" data-line="911"></span></a> <span class="kd">local</span> <span class="n">etal_text</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'et al'</span><span class="p">];</span> </span><span id="L-912"><a href="#L-912"><span class="linenos" data-line="912"></span></a> <span class="n">result</span> <span class="o">=</span> <span class="n">result</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">etal_text</span><span class="p">;</span> </span><span id="L-913"><a href="#L-913"><span class="linenos" data-line="913"></span></a> <span class="kr">end</span> </span><span id="L-914"><a href="#L-914"><span class="linenos" data-line="914"></span></a> </span><span id="L-915"><a href="#L-915"><span class="linenos" data-line="915"></span></a> <span class="c1">-- if necessary wrap result in <span> tag to format in Small Caps</span> </span><span id="L-916"><a href="#L-916"><span class="linenos" data-line="916"></span></a> <span class="kr">if</span> <span class="p">(</span> <span class="s2">"scap"</span> <span class="o">==</span> <span class="n">format</span> <span class="p">)</span> <span class="kr">then</span> <span class="n">result</span> <span class="o">=</span> </span><span id="L-917"><a href="#L-917"><span class="linenos" data-line="917"></span></a> <span class="s1">'<span class="smallcaps" style="font-variant:small-caps">'</span> <span class="o">..</span> <span class="n">result</span> <span class="o">..</span> <span class="s1">'</span>'</span><span class="p">;</span> </span><span id="L-918"><a href="#L-918"><span class="linenos" data-line="918"></span></a> <span class="kr">end</span> </span><span id="L-919"><a href="#L-919"><span class="linenos" data-line="919"></span></a> <span class="kr">return</span> <span class="n">result</span><span class="p">,</span> <span class="n">count</span> </span><span id="L-920"><a href="#L-920"><span class="linenos" data-line="920"></span></a><span class="kr">end</span> </span><span id="L-921"><a href="#L-921"><span class="linenos" data-line="921"></span></a> </span><span id="L-922"><a href="#L-922"><span class="linenos" data-line="922"></span></a><span class="c1">-- Generates a CITEREF anchor ID.</span> </span><span id="L-923"><a href="#L-923"><span class="linenos" data-line="923"></span></a><span class="kr">function</span> <span class="nf">anchorid</span><span class="p">(</span> <span class="n">options</span> <span class="p">)</span> </span><span id="L-924"><a href="#L-924"><span class="linenos" data-line="924"></span></a> <span class="kr">return</span> <span class="s2">"CITEREF"</span> <span class="o">..</span> <span class="nb">table.concat</span><span class="p">(</span> <span class="n">options</span> <span class="p">);</span> </span><span id="L-925"><a href="#L-925"><span class="linenos" data-line="925"></span></a><span class="kr">end</span> </span><span id="L-926"><a href="#L-926"><span class="linenos" data-line="926"></span></a> </span><span id="L-927"><a href="#L-927"><span class="linenos" data-line="927"></span></a><span class="c1">-- Gets name list from the input arguments</span> </span><span id="L-928"><a href="#L-928"><span class="linenos" data-line="928"></span></a><span class="kr">function</span> <span class="nf">extractnames</span><span class="p">(</span><span class="n">args</span><span class="p">,</span> <span class="n">list_name</span><span class="p">)</span> </span><span id="L-929"><a href="#L-929"><span class="linenos" data-line="929"></span></a> <span class="kd">local</span> <span class="n">names</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-930"><a href="#L-930"><span class="linenos" data-line="930"></span></a> <span class="kd">local</span> <span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">;</span> </span><span id="L-931"><a href="#L-931"><span class="linenos" data-line="931"></span></a> <span class="kd">local</span> <span class="n">last</span><span class="p">;</span> </span><span id="L-932"><a href="#L-932"><span class="linenos" data-line="932"></span></a> </span><span id="L-933"><a href="#L-933"><span class="linenos" data-line="933"></span></a> <span class="kr">while</span> <span class="kc">true</span> <span class="kr">do</span> </span><span id="L-934"><a href="#L-934"><span class="linenos" data-line="934"></span></a> <span class="n">last</span> <span class="o">=</span> <span class="n">selectone</span><span class="p">(</span> <span class="n">args</span><span class="p">,</span> <span class="n">cfg</span><span class="p">.</span><span class="n">aliases</span><span class="p">[</span><span class="n">list_name</span> <span class="o">..</span> <span class="s1">'-Last'</span><span class="p">],</span> <span class="s1">'redundant_parameters'</span><span class="p">,</span> <span class="n">i</span> <span class="p">);</span> </span><span id="L-935"><a href="#L-935"><span class="linenos" data-line="935"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">last</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-936"><a href="#L-936"><span class="linenos" data-line="936"></span></a> <span class="c1">-- just in case someone passed in an empty parameter</span> </span><span id="L-937"><a href="#L-937"><span class="linenos" data-line="937"></span></a> <span class="kr">break</span><span class="p">;</span> </span><span id="L-938"><a href="#L-938"><span class="linenos" data-line="938"></span></a> <span class="kr">end</span> </span><span id="L-939"><a href="#L-939"><span class="linenos" data-line="939"></span></a> <span class="n">names</span><span class="p">[</span><span class="n">i</span><span class="p">]</span> <span class="o">=</span> <span class="p">{</span> </span><span id="L-940"><a href="#L-940"><span class="linenos" data-line="940"></span></a> <span class="n">last</span> <span class="o">=</span> <span class="n">last</span><span class="p">,</span> </span><span id="L-941"><a href="#L-941"><span class="linenos" data-line="941"></span></a> <span class="n">first</span> <span class="o">=</span> <span class="n">selectone</span><span class="p">(</span> <span class="n">args</span><span class="p">,</span> <span class="n">cfg</span><span class="p">.</span><span class="n">aliases</span><span class="p">[</span><span class="n">list_name</span> <span class="o">..</span> <span class="s1">'-First'</span><span class="p">],</span> <span class="s1">'redundant_parameters'</span><span class="p">,</span> <span class="n">i</span> <span class="p">),</span> </span><span id="L-942"><a href="#L-942"><span class="linenos" data-line="942"></span></a> <span class="n">link</span> <span class="o">=</span> <span class="n">selectone</span><span class="p">(</span> <span class="n">args</span><span class="p">,</span> <span class="n">cfg</span><span class="p">.</span><span class="n">aliases</span><span class="p">[</span><span class="n">list_name</span> <span class="o">..</span> <span class="s1">'-Link'</span><span class="p">],</span> <span class="s1">'redundant_parameters'</span><span class="p">,</span> <span class="n">i</span> <span class="p">),</span> </span><span id="L-943"><a href="#L-943"><span class="linenos" data-line="943"></span></a> <span class="n">mask</span> <span class="o">=</span> <span class="n">selectone</span><span class="p">(</span> <span class="n">args</span><span class="p">,</span> <span class="n">cfg</span><span class="p">.</span><span class="n">aliases</span><span class="p">[</span><span class="n">list_name</span> <span class="o">..</span> <span class="s1">'-Mask'</span><span class="p">],</span> <span class="s1">'redundant_parameters'</span><span class="p">,</span> <span class="n">i</span> <span class="p">)</span> </span><span id="L-944"><a href="#L-944"><span class="linenos" data-line="944"></span></a> <span class="p">};</span> </span><span id="L-945"><a href="#L-945"><span class="linenos" data-line="945"></span></a> <span class="n">i</span> <span class="o">=</span> <span class="n">i</span> <span class="o">+</span> <span class="mi">1</span><span class="p">;</span> </span><span id="L-946"><a href="#L-946"><span class="linenos" data-line="946"></span></a> <span class="kr">end</span> </span><span id="L-947"><a href="#L-947"><span class="linenos" data-line="947"></span></a> <span class="kr">return</span> <span class="n">names</span><span class="p">;</span> </span><span id="L-948"><a href="#L-948"><span class="linenos" data-line="948"></span></a><span class="kr">end</span> </span><span id="L-949"><a href="#L-949"><span class="linenos" data-line="949"></span></a> </span><span id="L-950"><a href="#L-950"><span class="linenos" data-line="950"></span></a><span class="c1">-- Populates ID table from arguments using configuration settings</span> </span><span id="L-951"><a href="#L-951"><span class="linenos" data-line="951"></span></a><span class="kr">function</span> <span class="nf">extractids</span><span class="p">(</span> <span class="n">args</span> <span class="p">)</span> </span><span id="L-952"><a href="#L-952"><span class="linenos" data-line="952"></span></a> <span class="kd">local</span> <span class="n">id_list</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-953"><a href="#L-953"><span class="linenos" data-line="953"></span></a> <span class="kr">for</span> <span class="n">k</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">pairs</span><span class="p">(</span> <span class="n">cfg</span><span class="p">.</span><span class="n">id_handlers</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-954"><a href="#L-954"><span class="linenos" data-line="954"></span></a> <span class="n">v</span> <span class="o">=</span> <span class="n">selectone</span><span class="p">(</span> <span class="n">args</span><span class="p">,</span> <span class="n">v</span><span class="p">.</span><span class="n">parameters</span><span class="p">,</span> <span class="s1">'redundant_parameters'</span> <span class="p">);</span> </span><span id="L-955"><a href="#L-955"><span class="linenos" data-line="955"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">v</span><span class="p">)</span> <span class="kr">then</span> <span class="n">id_list</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">=</span> <span class="n">v</span><span class="p">;</span> <span class="kr">end</span> </span><span id="L-956"><a href="#L-956"><span class="linenos" data-line="956"></span></a> <span class="kr">end</span> </span><span id="L-957"><a href="#L-957"><span class="linenos" data-line="957"></span></a> <span class="kr">return</span> <span class="n">id_list</span><span class="p">;</span> </span><span id="L-958"><a href="#L-958"><span class="linenos" data-line="958"></span></a><span class="kr">end</span> </span><span id="L-959"><a href="#L-959"><span class="linenos" data-line="959"></span></a> </span><span id="L-960"><a href="#L-960"><span class="linenos" data-line="960"></span></a><span class="c1">-- Takes a table of IDs and turns it into a table of formatted ID outputs.</span> </span><span id="L-961"><a href="#L-961"><span class="linenos" data-line="961"></span></a><span class="kr">function</span> <span class="nf">buildidlist</span><span class="p">(</span> <span class="n">id_list</span><span class="p">,</span> <span class="n">options</span> <span class="p">)</span> </span><span id="L-962"><a href="#L-962"><span class="linenos" data-line="962"></span></a> <span class="kd">local</span> <span class="n">new_list</span><span class="p">,</span> <span class="n">handler</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-963"><a href="#L-963"><span class="linenos" data-line="963"></span></a> </span><span id="L-964"><a href="#L-964"><span class="linenos" data-line="964"></span></a> <span class="kr">function</span> <span class="nf">fallback</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="kr">return</span> <span class="p">{</span> <span class="n">__index</span> <span class="o">=</span> <span class="kr">function</span><span class="p">(</span><span class="n">t</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="kr">return</span> <span class="n">cfg</span><span class="p">.</span><span class="n">id_handlers</span><span class="p">[</span><span class="n">k</span><span class="p">][</span><span class="n">i</span><span class="p">]</span> <span class="kr">end</span> <span class="p">}</span> <span class="kr">end</span><span class="p">;</span> </span><span id="L-965"><a href="#L-965"><span class="linenos" data-line="965"></span></a> </span><span id="L-966"><a href="#L-966"><span class="linenos" data-line="966"></span></a> <span class="kr">for</span> <span class="n">k</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">pairs</span><span class="p">(</span> <span class="n">id_list</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-967"><a href="#L-967"><span class="linenos" data-line="967"></span></a> <span class="c1">-- fallback to read-only cfg</span> </span><span id="L-968"><a href="#L-968"><span class="linenos" data-line="968"></span></a> <span class="n">handler</span> <span class="o">=</span> <span class="nb">setmetatable</span><span class="p">(</span> <span class="p">{</span> <span class="p">[</span><span class="s1">'id'</span><span class="p">]</span> <span class="o">=</span> <span class="n">v</span> <span class="p">},</span> <span class="n">fallback</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="p">);</span> </span><span id="L-969"><a href="#L-969"><span class="linenos" data-line="969"></span></a> </span><span id="L-970"><a href="#L-970"><span class="linenos" data-line="970"></span></a> <span class="kr">if</span> <span class="n">handler</span><span class="p">.</span><span class="n">mode</span> <span class="o">==</span> <span class="s1">'external'</span> <span class="kr">then</span> </span><span id="L-971"><a href="#L-971"><span class="linenos" data-line="971"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">new_list</span><span class="p">,</span> <span class="p">{</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> <span class="n">externallinkid</span><span class="p">(</span> <span class="n">handler</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-972"><a href="#L-972"><span class="linenos" data-line="972"></span></a> <span class="kr">elseif</span> <span class="n">handler</span><span class="p">.</span><span class="n">mode</span> <span class="o">==</span> <span class="s1">'internal'</span> <span class="kr">then</span> </span><span id="L-973"><a href="#L-973"><span class="linenos" data-line="973"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">new_list</span><span class="p">,</span> <span class="p">{</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> <span class="n">internallinkid</span><span class="p">(</span> <span class="n">handler</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-974"><a href="#L-974"><span class="linenos" data-line="974"></span></a> <span class="kr">elseif</span> <span class="n">handler</span><span class="p">.</span><span class="n">mode</span> <span class="o">~=</span> <span class="s1">'manual'</span> <span class="kr">then</span> </span><span id="L-975"><a href="#L-975"><span class="linenos" data-line="975"></span></a> <span class="nb">error</span><span class="p">(</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'unknown_ID_mode'</span><span class="p">]</span> <span class="p">);</span> </span><span id="L-976"><a href="#L-976"><span class="linenos" data-line="976"></span></a> <span class="kr">elseif</span> <span class="n">k</span> <span class="o">==</span> <span class="s1">'DOI'</span> <span class="kr">then</span> </span><span id="L-977"><a href="#L-977"><span class="linenos" data-line="977"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">new_list</span><span class="p">,</span> <span class="p">{</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> <span class="n">doi</span><span class="p">(</span> <span class="n">v</span><span class="p">,</span> <span class="n">options</span><span class="p">.</span><span class="n">DoiBroken</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-978"><a href="#L-978"><span class="linenos" data-line="978"></span></a> <span class="kr">elseif</span> <span class="n">k</span> <span class="o">==</span> <span class="s1">'ASIN'</span> <span class="kr">then</span> </span><span id="L-979"><a href="#L-979"><span class="linenos" data-line="979"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">new_list</span><span class="p">,</span> <span class="p">{</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> <span class="n">amazon</span><span class="p">(</span> <span class="n">v</span><span class="p">,</span> <span class="n">options</span><span class="p">.</span><span class="n">ASINTLD</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-980"><a href="#L-980"><span class="linenos" data-line="980"></span></a> <span class="kr">elseif</span> <span class="n">k</span> <span class="o">==</span> <span class="s1">'OL'</span> <span class="kr">then</span> </span><span id="L-981"><a href="#L-981"><span class="linenos" data-line="981"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">new_list</span><span class="p">,</span> <span class="p">{</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> <span class="n">openlibrary</span><span class="p">(</span> <span class="n">v</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-982"><a href="#L-982"><span class="linenos" data-line="982"></span></a> <span class="kr">elseif</span> <span class="n">k</span> <span class="o">==</span> <span class="s1">'PMC'</span> <span class="kr">then</span> </span><span id="L-983"><a href="#L-983"><span class="linenos" data-line="983"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">new_list</span><span class="p">,</span> <span class="p">{</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> <span class="n">pmc</span><span class="p">(</span> <span class="n">v</span><span class="p">,</span> <span class="n">options</span><span class="p">.</span><span class="n">Embargo</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-984"><a href="#L-984"><span class="linenos" data-line="984"></span></a> <span class="kr">elseif</span> <span class="n">k</span> <span class="o">==</span> <span class="s1">'PMID'</span> <span class="kr">then</span> </span><span id="L-985"><a href="#L-985"><span class="linenos" data-line="985"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">new_list</span><span class="p">,</span> <span class="p">{</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> <span class="n">pmid</span><span class="p">(</span> <span class="n">v</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-986"><a href="#L-986"><span class="linenos" data-line="986"></span></a> <span class="kr">elseif</span> <span class="n">k</span> <span class="o">==</span> <span class="s1">'ISSN'</span> <span class="kr">then</span> </span><span id="L-987"><a href="#L-987"><span class="linenos" data-line="987"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">new_list</span><span class="p">,</span> <span class="p">{</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> <span class="n">issn</span><span class="p">(</span> <span class="n">v</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-988"><a href="#L-988"><span class="linenos" data-line="988"></span></a> <span class="kr">elseif</span> <span class="n">k</span> <span class="o">==</span> <span class="s1">'ISBN'</span> <span class="kr">then</span> </span><span id="L-989"><a href="#L-989"><span class="linenos" data-line="989"></span></a> <span class="kd">local</span> <span class="n">ISBN</span> <span class="o">=</span> <span class="n">internallinkid</span><span class="p">(</span> <span class="n">handler</span> <span class="p">);</span> </span><span id="L-990"><a href="#L-990"><span class="linenos" data-line="990"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">checkisbn</span><span class="p">(</span> <span class="n">v</span> <span class="p">)</span> <span class="ow">and</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">options</span><span class="p">.</span><span class="n">IgnoreISBN</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-991"><a href="#L-991"><span class="linenos" data-line="991"></span></a> <span class="n">ISBN</span> <span class="o">=</span> <span class="n">ISBN</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'bad_isbn'</span><span class="p">,</span> <span class="p">{},</span> <span class="kc">false</span><span class="p">,</span> <span class="s2">" "</span><span class="p">,</span> <span class="s2">""</span> <span class="p">);</span> </span><span id="L-992"><a href="#L-992"><span class="linenos" data-line="992"></span></a> <span class="kr">end</span> </span><span id="L-993"><a href="#L-993"><span class="linenos" data-line="993"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">new_list</span><span class="p">,</span> <span class="p">{</span><span class="n">handler</span><span class="p">.</span><span class="n">label</span><span class="p">,</span> <span class="n">ISBN</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-994"><a href="#L-994"><span class="linenos" data-line="994"></span></a> <span class="kr">else</span> </span><span id="L-995"><a href="#L-995"><span class="linenos" data-line="995"></span></a> <span class="nb">error</span><span class="p">(</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'unknown_manual_ID'</span><span class="p">]</span> <span class="p">);</span> </span><span id="L-996"><a href="#L-996"><span class="linenos" data-line="996"></span></a> <span class="kr">end</span> </span><span id="L-997"><a href="#L-997"><span class="linenos" data-line="997"></span></a> <span class="kr">end</span> </span><span id="L-998"><a href="#L-998"><span class="linenos" data-line="998"></span></a> </span><span id="L-999"><a href="#L-999"><span class="linenos" data-line="999"></span></a> <span class="kr">function</span> <span class="nf">comp</span><span class="p">(</span> <span class="n">a</span><span class="p">,</span> <span class="n">b</span> <span class="p">)</span> <span class="c1">-- used in following table.sort()</span> </span><span id="L-1000"><a href="#L-1000"><span class="linenos" data-line="1000"></span></a> <span class="kr">return</span> <span class="n">a</span><span class="p">[</span><span class="mi">1</span><span class="p">]</span> <span class="o"><</span> <span class="n">b</span><span class="p">[</span><span class="mi">1</span><span class="p">];</span> </span><span id="L-1001"><a href="#L-1001"><span class="linenos" data-line="1001"></span></a> <span class="kr">end</span> </span><span id="L-1002"><a href="#L-1002"><span class="linenos" data-line="1002"></span></a> </span><span id="L-1003"><a href="#L-1003"><span class="linenos" data-line="1003"></span></a> <span class="nb">table.sort</span><span class="p">(</span> <span class="n">new_list</span><span class="p">,</span> <span class="n">comp</span> <span class="p">);</span> </span><span id="L-1004"><a href="#L-1004"><span class="linenos" data-line="1004"></span></a> <span class="kr">for</span> <span class="n">k</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span> <span class="n">new_list</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-1005"><a href="#L-1005"><span class="linenos" data-line="1005"></span></a> <span class="n">new_list</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">=</span> <span class="n">v</span><span class="p">[</span><span class="mi">2</span><span class="p">];</span> </span><span id="L-1006"><a href="#L-1006"><span class="linenos" data-line="1006"></span></a> <span class="kr">end</span> </span><span id="L-1007"><a href="#L-1007"><span class="linenos" data-line="1007"></span></a> </span><span id="L-1008"><a href="#L-1008"><span class="linenos" data-line="1008"></span></a> <span class="kr">return</span> <span class="n">new_list</span><span class="p">;</span> </span><span id="L-1009"><a href="#L-1009"><span class="linenos" data-line="1009"></span></a><span class="kr">end</span> </span><span id="L-1010"><a href="#L-1010"><span class="linenos" data-line="1010"></span></a> </span><span id="L-1011"><a href="#L-1011"><span class="linenos" data-line="1011"></span></a><span class="c1">-- Chooses one matching parameter from a list of parameters to consider</span> </span><span id="L-1012"><a href="#L-1012"><span class="linenos" data-line="1012"></span></a><span class="c1">-- Generates an error if more than one match is present.</span> </span><span id="L-1013"><a href="#L-1013"><span class="linenos" data-line="1013"></span></a><span class="kr">function</span> <span class="nf">selectone</span><span class="p">(</span> <span class="n">args</span><span class="p">,</span> <span class="n">possible</span><span class="p">,</span> <span class="n">error_condition</span><span class="p">,</span> <span class="n">index</span> <span class="p">)</span> </span><span id="L-1014"><a href="#L-1014"><span class="linenos" data-line="1014"></span></a> <span class="kd">local</span> <span class="n">value</span> <span class="o">=</span> <span class="kc">nil</span><span class="p">;</span> </span><span id="L-1015"><a href="#L-1015"><span class="linenos" data-line="1015"></span></a> <span class="kd">local</span> <span class="n">selected</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1016"><a href="#L-1016"><span class="linenos" data-line="1016"></span></a> <span class="kd">local</span> <span class="n">error_list</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-1017"><a href="#L-1017"><span class="linenos" data-line="1017"></span></a> </span><span id="L-1018"><a href="#L-1018"><span class="linenos" data-line="1018"></span></a> <span class="kr">if</span> <span class="n">index</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="kr">then</span> <span class="n">index</span> <span class="o">=</span> <span class="nb">tostring</span><span class="p">(</span><span class="n">index</span><span class="p">);</span> <span class="kr">end</span> </span><span id="L-1019"><a href="#L-1019"><span class="linenos" data-line="1019"></span></a> </span><span id="L-1020"><a href="#L-1020"><span class="linenos" data-line="1020"></span></a> <span class="c1">-- Handle special case of "#" replaced by empty string</span> </span><span id="L-1021"><a href="#L-1021"><span class="linenos" data-line="1021"></span></a> <span class="kr">if</span> <span class="n">index</span> <span class="o">==</span> <span class="s1">'1'</span> <span class="kr">then</span> </span><span id="L-1022"><a href="#L-1022"><span class="linenos" data-line="1022"></span></a> <span class="kr">for</span> <span class="n">_</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span> <span class="n">possible</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-1023"><a href="#L-1023"><span class="linenos" data-line="1023"></span></a> <span class="n">v</span> <span class="o">=</span> <span class="n">v</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s2">"#"</span><span class="p">,</span> <span class="s2">""</span> <span class="p">);</span> </span><span id="L-1024"><a href="#L-1024"><span class="linenos" data-line="1024"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">args</span><span class="p">[</span><span class="n">v</span><span class="p">])</span> <span class="kr">then</span> </span><span id="L-1025"><a href="#L-1025"><span class="linenos" data-line="1025"></span></a> <span class="kr">if</span> <span class="n">value</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="ow">and</span> <span class="n">selected</span> <span class="o">~=</span> <span class="n">v</span> <span class="kr">then</span> </span><span id="L-1026"><a href="#L-1026"><span class="linenos" data-line="1026"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">error_list</span><span class="p">,</span> <span class="n">v</span> <span class="p">);</span> </span><span id="L-1027"><a href="#L-1027"><span class="linenos" data-line="1027"></span></a> <span class="kr">else</span> </span><span id="L-1028"><a href="#L-1028"><span class="linenos" data-line="1028"></span></a> <span class="n">value</span> <span class="o">=</span> <span class="n">args</span><span class="p">[</span><span class="n">v</span><span class="p">];</span> </span><span id="L-1029"><a href="#L-1029"><span class="linenos" data-line="1029"></span></a> <span class="n">selected</span> <span class="o">=</span> <span class="n">v</span><span class="p">;</span> </span><span id="L-1030"><a href="#L-1030"><span class="linenos" data-line="1030"></span></a> <span class="kr">end</span> </span><span id="L-1031"><a href="#L-1031"><span class="linenos" data-line="1031"></span></a> <span class="kr">end</span> </span><span id="L-1032"><a href="#L-1032"><span class="linenos" data-line="1032"></span></a> <span class="kr">end</span> </span><span id="L-1033"><a href="#L-1033"><span class="linenos" data-line="1033"></span></a> <span class="kr">end</span> </span><span id="L-1034"><a href="#L-1034"><span class="linenos" data-line="1034"></span></a> </span><span id="L-1035"><a href="#L-1035"><span class="linenos" data-line="1035"></span></a> <span class="kr">for</span> <span class="n">_</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span> <span class="n">possible</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-1036"><a href="#L-1036"><span class="linenos" data-line="1036"></span></a> <span class="kr">if</span> <span class="n">index</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-1037"><a href="#L-1037"><span class="linenos" data-line="1037"></span></a> <span class="n">v</span> <span class="o">=</span> <span class="n">v</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span> <span class="s2">"#"</span><span class="p">,</span> <span class="n">index</span> <span class="p">);</span> </span><span id="L-1038"><a href="#L-1038"><span class="linenos" data-line="1038"></span></a> <span class="kr">end</span> </span><span id="L-1039"><a href="#L-1039"><span class="linenos" data-line="1039"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">args</span><span class="p">[</span><span class="n">v</span><span class="p">])</span> <span class="kr">then</span> </span><span id="L-1040"><a href="#L-1040"><span class="linenos" data-line="1040"></span></a> <span class="kr">if</span> <span class="n">value</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="ow">and</span> <span class="n">selected</span> <span class="o">~=</span> <span class="n">v</span> <span class="kr">then</span> </span><span id="L-1041"><a href="#L-1041"><span class="linenos" data-line="1041"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">error_list</span><span class="p">,</span> <span class="n">v</span> <span class="p">);</span> </span><span id="L-1042"><a href="#L-1042"><span class="linenos" data-line="1042"></span></a> <span class="kr">else</span> </span><span id="L-1043"><a href="#L-1043"><span class="linenos" data-line="1043"></span></a> <span class="n">value</span> <span class="o">=</span> <span class="n">args</span><span class="p">[</span><span class="n">v</span><span class="p">];</span> </span><span id="L-1044"><a href="#L-1044"><span class="linenos" data-line="1044"></span></a> <span class="n">selected</span> <span class="o">=</span> <span class="n">v</span><span class="p">;</span> </span><span id="L-1045"><a href="#L-1045"><span class="linenos" data-line="1045"></span></a> <span class="kr">end</span> </span><span id="L-1046"><a href="#L-1046"><span class="linenos" data-line="1046"></span></a> <span class="kr">end</span> </span><span id="L-1047"><a href="#L-1047"><span class="linenos" data-line="1047"></span></a> <span class="kr">end</span> </span><span id="L-1048"><a href="#L-1048"><span class="linenos" data-line="1048"></span></a> </span><span id="L-1049"><a href="#L-1049"><span class="linenos" data-line="1049"></span></a> <span class="kr">if</span> <span class="o">#</span><span class="n">error_list</span> <span class="o">></span> <span class="mi">0</span> <span class="kr">then</span> </span><span id="L-1050"><a href="#L-1050"><span class="linenos" data-line="1050"></span></a> <span class="kd">local</span> <span class="n">error_str</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1051"><a href="#L-1051"><span class="linenos" data-line="1051"></span></a> <span class="kr">for</span> <span class="n">_</span><span class="p">,</span> <span class="n">k</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span> <span class="n">error_list</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-1052"><a href="#L-1052"><span class="linenos" data-line="1052"></span></a> <span class="kr">if</span> <span class="n">error_str</span> <span class="o">~=</span> <span class="s2">""</span> <span class="kr">then</span> <span class="n">error_str</span> <span class="o">=</span> <span class="n">error_str</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'parameter-separator'</span><span class="p">]</span> <span class="kr">end</span> </span><span id="L-1053"><a href="#L-1053"><span class="linenos" data-line="1053"></span></a> <span class="n">error_str</span> <span class="o">=</span> <span class="n">error_str</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'parameter'</span><span class="p">,</span> <span class="n">k</span> <span class="p">);</span> </span><span id="L-1054"><a href="#L-1054"><span class="linenos" data-line="1054"></span></a> <span class="kr">end</span> </span><span id="L-1055"><a href="#L-1055"><span class="linenos" data-line="1055"></span></a> <span class="kr">if</span> <span class="o">#</span><span class="n">error_list</span> <span class="o">></span> <span class="mi">1</span> <span class="kr">then</span> </span><span id="L-1056"><a href="#L-1056"><span class="linenos" data-line="1056"></span></a> <span class="n">error_str</span> <span class="o">=</span> <span class="n">error_str</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'parameter-final-separator'</span><span class="p">];</span> </span><span id="L-1057"><a href="#L-1057"><span class="linenos" data-line="1057"></span></a> <span class="kr">else</span> </span><span id="L-1058"><a href="#L-1058"><span class="linenos" data-line="1058"></span></a> <span class="n">error_str</span> <span class="o">=</span> <span class="n">error_str</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'parameter-pair-separator'</span><span class="p">];</span> </span><span id="L-1059"><a href="#L-1059"><span class="linenos" data-line="1059"></span></a> <span class="kr">end</span> </span><span id="L-1060"><a href="#L-1060"><span class="linenos" data-line="1060"></span></a> <span class="n">error_str</span> <span class="o">=</span> <span class="n">error_str</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'parameter'</span><span class="p">,</span> <span class="n">selected</span> <span class="p">);</span> </span><span id="L-1061"><a href="#L-1061"><span class="linenos" data-line="1061"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span><span class="p">,</span> <span class="p">{</span> <span class="n">seterror</span><span class="p">(</span> <span class="n">error_condition</span><span class="p">,</span> <span class="p">{</span><span class="n">error_str</span><span class="p">},</span> <span class="kc">true</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-1062"><a href="#L-1062"><span class="linenos" data-line="1062"></span></a> <span class="kr">end</span> </span><span id="L-1063"><a href="#L-1063"><span class="linenos" data-line="1063"></span></a> </span><span id="L-1064"><a href="#L-1064"><span class="linenos" data-line="1064"></span></a> <span class="kr">return</span> <span class="n">value</span><span class="p">,</span> <span class="n">selected</span><span class="p">;</span> </span><span id="L-1065"><a href="#L-1065"><span class="linenos" data-line="1065"></span></a><span class="kr">end</span> </span><span id="L-1066"><a href="#L-1066"><span class="linenos" data-line="1066"></span></a> </span><span id="L-1067"><a href="#L-1067"><span class="linenos" data-line="1067"></span></a><span class="c1">-- COinS metadata (see <http://ocoins.info/>) allows automated tools to parse</span> </span><span id="L-1068"><a href="#L-1068"><span class="linenos" data-line="1068"></span></a><span class="c1">-- the citation information.</span> </span><span id="L-1069"><a href="#L-1069"><span class="linenos" data-line="1069"></span></a><span class="kr">function</span> <span class="nf">COinS</span><span class="p">(</span><span class="n">data</span><span class="p">)</span> </span><span id="L-1070"><a href="#L-1070"><span class="linenos" data-line="1070"></span></a> <span class="kr">if</span> <span class="s1">'table'</span> <span class="o">~=</span> <span class="nb">type</span><span class="p">(</span><span class="n">data</span><span class="p">)</span> <span class="ow">or</span> <span class="kc">nil</span> <span class="o">==</span> <span class="nb">next</span><span class="p">(</span><span class="n">data</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1071"><a href="#L-1071"><span class="linenos" data-line="1071"></span></a> <span class="kr">return</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1072"><a href="#L-1072"><span class="linenos" data-line="1072"></span></a> <span class="kr">end</span> </span><span id="L-1073"><a href="#L-1073"><span class="linenos" data-line="1073"></span></a> </span><span id="L-1074"><a href="#L-1074"><span class="linenos" data-line="1074"></span></a> <span class="kd">local</span> <span class="n">ctx_ver</span> <span class="o">=</span> <span class="s2">"Z39.88-2004"</span><span class="p">;</span> </span><span id="L-1075"><a href="#L-1075"><span class="linenos" data-line="1075"></span></a> </span><span id="L-1076"><a href="#L-1076"><span class="linenos" data-line="1076"></span></a> <span class="c1">-- treat table strictly as an array with only set values.</span> </span><span id="L-1077"><a href="#L-1077"><span class="linenos" data-line="1077"></span></a> <span class="kd">local</span> <span class="n">OCinSoutput</span> <span class="o">=</span> <span class="nb">setmetatable</span><span class="p">(</span> <span class="p">{},</span> <span class="p">{</span> </span><span id="L-1078"><a href="#L-1078"><span class="linenos" data-line="1078"></span></a> <span class="n">__newindex</span> <span class="o">=</span> <span class="kr">function</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">key</span><span class="p">,</span> <span class="n">value</span><span class="p">)</span> </span><span id="L-1079"><a href="#L-1079"><span class="linenos" data-line="1079"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">value</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1080"><a href="#L-1080"><span class="linenos" data-line="1080"></span></a> <span class="nb">rawset</span><span class="p">(</span> <span class="n">self</span><span class="p">,</span> <span class="o">#</span><span class="n">self</span><span class="o">+</span><span class="mi">1</span><span class="p">,</span> <span class="nb">table.concat</span><span class="p">{</span> <span class="n">key</span><span class="p">,</span> <span class="s1">'='</span><span class="p">,</span> <span class="n">mw</span><span class="p">.</span><span class="n">uri</span><span class="p">.</span><span class="n">encode</span><span class="p">(</span> <span class="n">removewikilink</span><span class="p">(</span> <span class="n">value</span> <span class="p">)</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-1081"><a href="#L-1081"><span class="linenos" data-line="1081"></span></a> <span class="kr">end</span> </span><span id="L-1082"><a href="#L-1082"><span class="linenos" data-line="1082"></span></a> <span class="kr">end</span> </span><span id="L-1083"><a href="#L-1083"><span class="linenos" data-line="1083"></span></a> <span class="p">});</span> </span><span id="L-1084"><a href="#L-1084"><span class="linenos" data-line="1084"></span></a> </span><span id="L-1085"><a href="#L-1085"><span class="linenos" data-line="1085"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">data</span><span class="p">.</span><span class="n">Chapter</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1086"><a href="#L-1086"><span class="linenos" data-line="1086"></span></a> <span class="n">OCinSoutput</span><span class="p">.</span><span class="n">rft_val_fmt</span> <span class="o">=</span> <span class="s2">"info:ofi/fmt:kev:mtx:book"</span><span class="p">;</span> </span><span id="L-1087"><a href="#L-1087"><span class="linenos" data-line="1087"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.genre"</span><span class="p">]</span> <span class="o">=</span> <span class="s2">"bookitem"</span><span class="p">;</span> </span><span id="L-1088"><a href="#L-1088"><span class="linenos" data-line="1088"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.btitle"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">Chapter</span><span class="p">;</span> </span><span id="L-1089"><a href="#L-1089"><span class="linenos" data-line="1089"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.atitle"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">Title</span><span class="p">;</span> </span><span id="L-1090"><a href="#L-1090"><span class="linenos" data-line="1090"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">data</span><span class="p">.</span><span class="n">Periodical</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1091"><a href="#L-1091"><span class="linenos" data-line="1091"></span></a> <span class="n">OCinSoutput</span><span class="p">.</span><span class="n">rft_val_fmt</span> <span class="o">=</span> <span class="s2">"info:ofi/fmt:kev:mtx:journal"</span><span class="p">;</span> </span><span id="L-1092"><a href="#L-1092"><span class="linenos" data-line="1092"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.genre"</span><span class="p">]</span> <span class="o">=</span> <span class="s2">"article"</span><span class="p">;</span> </span><span id="L-1093"><a href="#L-1093"><span class="linenos" data-line="1093"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.jtitle"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">Periodical</span><span class="p">;</span> </span><span id="L-1094"><a href="#L-1094"><span class="linenos" data-line="1094"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.atitle"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">Title</span><span class="p">;</span> </span><span id="L-1095"><a href="#L-1095"><span class="linenos" data-line="1095"></span></a> <span class="kr">else</span> </span><span id="L-1096"><a href="#L-1096"><span class="linenos" data-line="1096"></span></a> <span class="n">OCinSoutput</span><span class="p">.</span><span class="n">rft_val_fmt</span> <span class="o">=</span> <span class="s2">"info:ofi/fmt:kev:mtx:book"</span><span class="p">;</span> </span><span id="L-1097"><a href="#L-1097"><span class="linenos" data-line="1097"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.genre"</span><span class="p">]</span> <span class="o">=</span> <span class="s2">"book"</span> </span><span id="L-1098"><a href="#L-1098"><span class="linenos" data-line="1098"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.btitle"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">Title</span><span class="p">;</span> </span><span id="L-1099"><a href="#L-1099"><span class="linenos" data-line="1099"></span></a> <span class="kr">end</span> </span><span id="L-1100"><a href="#L-1100"><span class="linenos" data-line="1100"></span></a> </span><span id="L-1101"><a href="#L-1101"><span class="linenos" data-line="1101"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.place"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">PublicationPlace</span><span class="p">;</span> </span><span id="L-1102"><a href="#L-1102"><span class="linenos" data-line="1102"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.date"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">Date</span><span class="p">;</span> </span><span id="L-1103"><a href="#L-1103"><span class="linenos" data-line="1103"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.series"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">Series</span><span class="p">;</span> </span><span id="L-1104"><a href="#L-1104"><span class="linenos" data-line="1104"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.volume"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">Volume</span><span class="p">;</span> </span><span id="L-1105"><a href="#L-1105"><span class="linenos" data-line="1105"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.issue"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">Issue</span><span class="p">;</span> </span><span id="L-1106"><a href="#L-1106"><span class="linenos" data-line="1106"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.pages"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">Pages</span><span class="p">;</span> </span><span id="L-1107"><a href="#L-1107"><span class="linenos" data-line="1107"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.edition"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">Edition</span><span class="p">;</span> </span><span id="L-1108"><a href="#L-1108"><span class="linenos" data-line="1108"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.pub"</span><span class="p">]</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">PublisherName</span><span class="p">;</span> </span><span id="L-1109"><a href="#L-1109"><span class="linenos" data-line="1109"></span></a> </span><span id="L-1110"><a href="#L-1110"><span class="linenos" data-line="1110"></span></a> <span class="kr">for</span> <span class="n">k</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">pairs</span><span class="p">(</span> <span class="n">data</span><span class="p">.</span><span class="n">ID_list</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-1111"><a href="#L-1111"><span class="linenos" data-line="1111"></span></a> <span class="kd">local</span> <span class="n">id</span><span class="p">,</span> <span class="n">value</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">id_handlers</span><span class="p">[</span><span class="n">k</span><span class="p">].</span><span class="n">COinS</span><span class="p">;</span> </span><span id="L-1112"><a href="#L-1112"><span class="linenos" data-line="1112"></span></a> <span class="kr">if</span> <span class="n">k</span> <span class="o">==</span> <span class="s1">'ISBN'</span> <span class="kr">then</span> <span class="n">value</span> <span class="o">=</span> <span class="n">cleanisbn</span><span class="p">(</span> <span class="n">v</span> <span class="p">);</span> <span class="kr">else</span> <span class="n">value</span> <span class="o">=</span> <span class="n">v</span><span class="p">;</span> <span class="kr">end</span> </span><span id="L-1113"><a href="#L-1113"><span class="linenos" data-line="1113"></span></a> <span class="kr">if</span> <span class="nb">string.sub</span><span class="p">(</span> <span class="n">id</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">,</span> <span class="mi">1</span><span class="p">,</span> <span class="mi">4</span> <span class="p">)</span> <span class="o">==</span> <span class="s1">'info'</span> <span class="kr">then</span> </span><span id="L-1114"><a href="#L-1114"><span class="linenos" data-line="1114"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft_id"</span><span class="p">]</span> <span class="o">=</span> <span class="nb">table.concat</span><span class="p">{</span> <span class="n">id</span><span class="p">,</span> <span class="s2">"/"</span><span class="p">,</span> <span class="n">v</span> <span class="p">};</span> </span><span id="L-1115"><a href="#L-1115"><span class="linenos" data-line="1115"></span></a> <span class="kr">else</span> </span><span id="L-1116"><a href="#L-1116"><span class="linenos" data-line="1116"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span> <span class="n">id</span> <span class="p">]</span> <span class="o">=</span> <span class="n">value</span><span class="p">;</span> </span><span id="L-1117"><a href="#L-1117"><span class="linenos" data-line="1117"></span></a> <span class="kr">end</span> </span><span id="L-1118"><a href="#L-1118"><span class="linenos" data-line="1118"></span></a> <span class="kr">end</span> </span><span id="L-1119"><a href="#L-1119"><span class="linenos" data-line="1119"></span></a> </span><span id="L-1120"><a href="#L-1120"><span class="linenos" data-line="1120"></span></a> <span class="kd">local</span> <span class="n">last</span><span class="p">,</span> <span class="n">first</span><span class="p">;</span> </span><span id="L-1121"><a href="#L-1121"><span class="linenos" data-line="1121"></span></a> <span class="kr">for</span> <span class="n">k</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span> <span class="n">data</span><span class="p">.</span><span class="n">Authors</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-1122"><a href="#L-1122"><span class="linenos" data-line="1122"></span></a> <span class="n">last</span><span class="p">,</span> <span class="n">first</span> <span class="o">=</span> <span class="n">v</span><span class="p">.</span><span class="n">last</span><span class="p">,</span> <span class="n">v</span><span class="p">.</span><span class="n">first</span><span class="p">;</span> </span><span id="L-1123"><a href="#L-1123"><span class="linenos" data-line="1123"></span></a> <span class="kr">if</span> <span class="n">k</span> <span class="o">==</span> <span class="mi">1</span> <span class="kr">then</span> </span><span id="L-1124"><a href="#L-1124"><span class="linenos" data-line="1124"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">last</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1125"><a href="#L-1125"><span class="linenos" data-line="1125"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.aulast"</span><span class="p">]</span> <span class="o">=</span> <span class="n">last</span><span class="p">;</span> </span><span id="L-1126"><a href="#L-1126"><span class="linenos" data-line="1126"></span></a> <span class="kr">end</span> </span><span id="L-1127"><a href="#L-1127"><span class="linenos" data-line="1127"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">first</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1128"><a href="#L-1128"><span class="linenos" data-line="1128"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.aufirst"</span><span class="p">]</span> <span class="o">=</span> <span class="n">first</span><span class="p">;</span> </span><span id="L-1129"><a href="#L-1129"><span class="linenos" data-line="1129"></span></a> <span class="kr">end</span> </span><span id="L-1130"><a href="#L-1130"><span class="linenos" data-line="1130"></span></a> <span class="kr">end</span> </span><span id="L-1131"><a href="#L-1131"><span class="linenos" data-line="1131"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">last</span><span class="p">)</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">first</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1132"><a href="#L-1132"><span class="linenos" data-line="1132"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.au"</span><span class="p">]</span> <span class="o">=</span> <span class="nb">table.concat</span><span class="p">{</span> <span class="n">last</span><span class="p">,</span> <span class="s2">", "</span><span class="p">,</span> <span class="n">first</span> <span class="p">};</span> </span><span id="L-1133"><a href="#L-1133"><span class="linenos" data-line="1133"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">last</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1134"><a href="#L-1134"><span class="linenos" data-line="1134"></span></a> <span class="n">OCinSoutput</span><span class="p">[</span><span class="s2">"rft.au"</span><span class="p">]</span> <span class="o">=</span> <span class="n">last</span><span class="p">;</span> </span><span id="L-1135"><a href="#L-1135"><span class="linenos" data-line="1135"></span></a> <span class="kr">end</span> </span><span id="L-1136"><a href="#L-1136"><span class="linenos" data-line="1136"></span></a> <span class="kr">end</span> </span><span id="L-1137"><a href="#L-1137"><span class="linenos" data-line="1137"></span></a> </span><span id="L-1138"><a href="#L-1138"><span class="linenos" data-line="1138"></span></a> <span class="n">OCinSoutput</span><span class="p">.</span><span class="n">rft_id</span> <span class="o">=</span> <span class="n">data</span><span class="p">.</span><span class="n">URL</span><span class="p">;</span> </span><span id="L-1139"><a href="#L-1139"><span class="linenos" data-line="1139"></span></a> <span class="n">OCinSoutput</span><span class="p">.</span><span class="n">rfr_id</span> <span class="o">=</span> <span class="nb">table.concat</span><span class="p">{</span> <span class="s2">"info:sid/"</span><span class="p">,</span> <span class="n">mw</span><span class="p">.</span><span class="n">site</span><span class="p">.</span><span class="n">server</span><span class="p">:</span><span class="n">match</span><span class="p">(</span> <span class="s2">"[^/]*$"</span> <span class="p">),</span> <span class="s2">":"</span><span class="p">,</span> <span class="n">data</span><span class="p">.</span><span class="n">RawPage</span> <span class="p">};</span> </span><span id="L-1140"><a href="#L-1140"><span class="linenos" data-line="1140"></span></a> <span class="n">OCinSoutput</span> <span class="o">=</span> <span class="nb">setmetatable</span><span class="p">(</span> <span class="n">OCinSoutput</span><span class="p">,</span> <span class="kc">nil</span> <span class="p">);</span> </span><span id="L-1141"><a href="#L-1141"><span class="linenos" data-line="1141"></span></a> </span><span id="L-1142"><a href="#L-1142"><span class="linenos" data-line="1142"></span></a> <span class="c1">-- sort with version string always first, and combine.</span> </span><span id="L-1143"><a href="#L-1143"><span class="linenos" data-line="1143"></span></a> <span class="nb">table.sort</span><span class="p">(</span> <span class="n">OCinSoutput</span> <span class="p">);</span> </span><span id="L-1144"><a href="#L-1144"><span class="linenos" data-line="1144"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">OCinSoutput</span><span class="p">,</span> <span class="mi">1</span><span class="p">,</span> <span class="s2">"ctx_ver="</span> <span class="o">..</span> <span class="n">ctx_ver</span> <span class="p">);</span> <span class="c1">-- such as "Z39.88-2004"</span> </span><span id="L-1145"><a href="#L-1145"><span class="linenos" data-line="1145"></span></a> <span class="kr">return</span> <span class="nb">table.concat</span><span class="p">(</span><span class="n">OCinSoutput</span><span class="p">,</span> <span class="s2">"&"</span><span class="p">);</span> </span><span id="L-1146"><a href="#L-1146"><span class="linenos" data-line="1146"></span></a><span class="kr">end</span> </span><span id="L-1147"><a href="#L-1147"><span class="linenos" data-line="1147"></span></a> </span><span id="L-1148"><a href="#L-1148"><span class="linenos" data-line="1148"></span></a><span class="cm">--[[</span> </span><span id="L-1149"><a href="#L-1149"><span class="linenos" data-line="1149"></span></a><span class="cm">This is the main function doing the majority of the citation</span> </span><span id="L-1150"><a href="#L-1150"><span class="linenos" data-line="1150"></span></a><span class="cm">formatting.</span> </span><span id="L-1151"><a href="#L-1151"><span class="linenos" data-line="1151"></span></a><span class="cm">]]</span> </span><span id="L-1152"><a href="#L-1152"><span class="linenos" data-line="1152"></span></a><span class="kr">function</span> <span class="nf">citation0</span><span class="p">(</span> <span class="n">config</span><span class="p">,</span> <span class="n">args</span><span class="p">)</span> </span><span id="L-1153"><a href="#L-1153"><span class="linenos" data-line="1153"></span></a> <span class="cm">--[[ </span> </span><span id="L-1154"><a href="#L-1154"><span class="linenos" data-line="1154"></span></a><span class="cm"> Load Input Parameters</span> </span><span id="L-1155"><a href="#L-1155"><span class="linenos" data-line="1155"></span></a><span class="cm"> The argment_wrapper facillitates the mapping of multiple</span> </span><span id="L-1156"><a href="#L-1156"><span class="linenos" data-line="1156"></span></a><span class="cm"> aliases to single internal variable.</span> </span><span id="L-1157"><a href="#L-1157"><span class="linenos" data-line="1157"></span></a><span class="cm"> ]]</span> </span><span id="L-1158"><a href="#L-1158"><span class="linenos" data-line="1158"></span></a> <span class="kd">local</span> <span class="n">A</span> <span class="o">=</span> <span class="n">argument_wrapper</span><span class="p">(</span> <span class="n">args</span> <span class="p">);</span> </span><span id="L-1159"><a href="#L-1159"><span class="linenos" data-line="1159"></span></a> </span><span id="L-1160"><a href="#L-1160"><span class="linenos" data-line="1160"></span></a> <span class="kd">local</span> <span class="n">i</span> </span><span id="L-1161"><a href="#L-1161"><span class="linenos" data-line="1161"></span></a> <span class="kd">local</span> <span class="n">PPrefix</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'PPrefix'</span><span class="p">]</span> </span><span id="L-1162"><a href="#L-1162"><span class="linenos" data-line="1162"></span></a> <span class="kd">local</span> <span class="n">PPPrefix</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'PPPrefix'</span><span class="p">]</span> </span><span id="L-1163"><a href="#L-1163"><span class="linenos" data-line="1163"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">A</span><span class="p">[</span><span class="s1">'NoPP'</span><span class="p">]</span> <span class="p">)</span> <span class="kr">then</span> <span class="n">PPPrefix</span> <span class="o">=</span> <span class="s2">""</span> <span class="n">PPrefix</span> <span class="o">=</span> <span class="s2">""</span> <span class="kr">end</span> </span><span id="L-1164"><a href="#L-1164"><span class="linenos" data-line="1164"></span></a> </span><span id="L-1165"><a href="#L-1165"><span class="linenos" data-line="1165"></span></a> <span class="c1">-- Pick out the relevant fields from the arguments. Different citation templates</span> </span><span id="L-1166"><a href="#L-1166"><span class="linenos" data-line="1166"></span></a> <span class="c1">-- define different field names for the same underlying things. </span> </span><span id="L-1167"><a href="#L-1167"><span class="linenos" data-line="1167"></span></a> <span class="kd">local</span> <span class="n">Authors</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Authors'</span><span class="p">];</span> </span><span id="L-1168"><a href="#L-1168"><span class="linenos" data-line="1168"></span></a> <span class="kd">local</span> <span class="n">a</span> <span class="o">=</span> <span class="n">extractnames</span><span class="p">(</span> <span class="n">args</span><span class="p">,</span> <span class="s1">'AuthorList'</span> <span class="p">);</span> </span><span id="L-1169"><a href="#L-1169"><span class="linenos" data-line="1169"></span></a> </span><span id="L-1170"><a href="#L-1170"><span class="linenos" data-line="1170"></span></a> <span class="kd">local</span> <span class="n">Coauthors</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Coauthors'</span><span class="p">];</span> </span><span id="L-1171"><a href="#L-1171"><span class="linenos" data-line="1171"></span></a> <span class="kd">local</span> <span class="n">Others</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Others'</span><span class="p">];</span> </span><span id="L-1172"><a href="#L-1172"><span class="linenos" data-line="1172"></span></a> <span class="kd">local</span> <span class="n">Editors</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Editors'</span><span class="p">];</span> </span><span id="L-1173"><a href="#L-1173"><span class="linenos" data-line="1173"></span></a> <span class="kd">local</span> <span class="n">e</span> <span class="o">=</span> <span class="n">extractnames</span><span class="p">(</span> <span class="n">args</span><span class="p">,</span> <span class="s1">'EditorList'</span> <span class="p">);</span> </span><span id="L-1174"><a href="#L-1174"><span class="linenos" data-line="1174"></span></a> </span><span id="L-1175"><a href="#L-1175"><span class="linenos" data-line="1175"></span></a> <span class="kd">local</span> <span class="n">Year</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Year'</span><span class="p">];</span> </span><span id="L-1176"><a href="#L-1176"><span class="linenos" data-line="1176"></span></a> <span class="kd">local</span> <span class="n">PublicationDate</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'PublicationDate'</span><span class="p">];</span> </span><span id="L-1177"><a href="#L-1177"><span class="linenos" data-line="1177"></span></a> <span class="kd">local</span> <span class="n">OrigYear</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'OrigYear'</span><span class="p">];</span> </span><span id="L-1178"><a href="#L-1178"><span class="linenos" data-line="1178"></span></a> <span class="kd">local</span> <span class="n">Date</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Date'</span><span class="p">];</span> </span><span id="L-1179"><a href="#L-1179"><span class="linenos" data-line="1179"></span></a> <span class="kd">local</span> <span class="n">LayDate</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'LayDate'</span><span class="p">];</span> </span><span id="L-1180"><a href="#L-1180"><span class="linenos" data-line="1180"></span></a> <span class="c1">------------------------------------------------- Get title data</span> </span><span id="L-1181"><a href="#L-1181"><span class="linenos" data-line="1181"></span></a> <span class="kd">local</span> <span class="n">Title</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Title'</span><span class="p">];</span> </span><span id="L-1182"><a href="#L-1182"><span class="linenos" data-line="1182"></span></a> <span class="kd">local</span> <span class="n">BookTitle</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'BookTitle'</span><span class="p">];</span> </span><span id="L-1183"><a href="#L-1183"><span class="linenos" data-line="1183"></span></a> <span class="kd">local</span> <span class="n">Conference</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Conference'</span><span class="p">];</span> </span><span id="L-1184"><a href="#L-1184"><span class="linenos" data-line="1184"></span></a> <span class="kd">local</span> <span class="n">TransTitle</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'TransTitle'</span><span class="p">];</span> </span><span id="L-1185"><a href="#L-1185"><span class="linenos" data-line="1185"></span></a> <span class="kd">local</span> <span class="n">TitleNote</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'TitleNote'</span><span class="p">];</span> </span><span id="L-1186"><a href="#L-1186"><span class="linenos" data-line="1186"></span></a> <span class="kd">local</span> <span class="n">TitleLink</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'TitleLink'</span><span class="p">];</span> </span><span id="L-1187"><a href="#L-1187"><span class="linenos" data-line="1187"></span></a> <span class="kd">local</span> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Chapter'</span><span class="p">];</span> </span><span id="L-1188"><a href="#L-1188"><span class="linenos" data-line="1188"></span></a> <span class="kd">local</span> <span class="n">ChapterLink</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'ChapterLink'</span><span class="p">];</span> </span><span id="L-1189"><a href="#L-1189"><span class="linenos" data-line="1189"></span></a> <span class="kd">local</span> <span class="n">TransChapter</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'TransChapter'</span><span class="p">];</span> </span><span id="L-1190"><a href="#L-1190"><span class="linenos" data-line="1190"></span></a> <span class="kd">local</span> <span class="n">TitleType</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'TitleType'</span><span class="p">];</span> </span><span id="L-1191"><a href="#L-1191"><span class="linenos" data-line="1191"></span></a> <span class="kd">local</span> <span class="n">Degree</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Degree'</span><span class="p">];</span> </span><span id="L-1192"><a href="#L-1192"><span class="linenos" data-line="1192"></span></a> <span class="kd">local</span> <span class="n">Docket</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Docket'</span><span class="p">];</span> </span><span id="L-1193"><a href="#L-1193"><span class="linenos" data-line="1193"></span></a> <span class="kd">local</span> <span class="n">ArchiveURL</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'ArchiveURL'</span><span class="p">];</span> </span><span id="L-1194"><a href="#L-1194"><span class="linenos" data-line="1194"></span></a> <span class="kd">local</span> <span class="n">URL</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'URL'</span><span class="p">]</span> </span><span id="L-1195"><a href="#L-1195"><span class="linenos" data-line="1195"></span></a> <span class="kd">local</span> <span class="n">URLorigin</span> <span class="o">=</span> <span class="n">A</span><span class="p">:</span><span class="n">ORIGIN</span><span class="p">(</span><span class="s1">'URL'</span><span class="p">);</span> </span><span id="L-1196"><a href="#L-1196"><span class="linenos" data-line="1196"></span></a> <span class="kd">local</span> <span class="n">ChapterURL</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'ChapterURL'</span><span class="p">];</span> </span><span id="L-1197"><a href="#L-1197"><span class="linenos" data-line="1197"></span></a> <span class="kd">local</span> <span class="n">ChapterURLorigin</span> <span class="o">=</span> <span class="n">A</span><span class="p">:</span><span class="n">ORIGIN</span><span class="p">(</span><span class="s1">'ChapterURL'</span><span class="p">);</span> </span><span id="L-1198"><a href="#L-1198"><span class="linenos" data-line="1198"></span></a> <span class="kd">local</span> <span class="n">ConferenceURL</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'ConferenceURL'</span><span class="p">];</span> </span><span id="L-1199"><a href="#L-1199"><span class="linenos" data-line="1199"></span></a> <span class="kd">local</span> <span class="n">ConferenceURLorigin</span> <span class="o">=</span> <span class="n">A</span><span class="p">:</span><span class="n">ORIGIN</span><span class="p">(</span><span class="s1">'ConferenceURL'</span><span class="p">);</span> </span><span id="L-1200"><a href="#L-1200"><span class="linenos" data-line="1200"></span></a> <span class="kd">local</span> <span class="n">Periodical</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Periodical'</span><span class="p">];</span> </span><span id="L-1201"><a href="#L-1201"><span class="linenos" data-line="1201"></span></a> </span><span id="L-1202"><a href="#L-1202"><span class="linenos" data-line="1202"></span></a><span class="cm">--[[</span> </span><span id="L-1203"><a href="#L-1203"><span class="linenos" data-line="1203"></span></a><span class="cm">Parameter remapping for cite encyclopedia:</span> </span><span id="L-1204"><a href="#L-1204"><span class="linenos" data-line="1204"></span></a><span class="cm">When the citation has these parameters:</span> </span><span id="L-1205"><a href="#L-1205"><span class="linenos" data-line="1205"></span></a><span class="cm"> |encyclopedia and |title then map |title to |article and |encyclopedia to |title</span> </span><span id="L-1206"><a href="#L-1206"><span class="linenos" data-line="1206"></span></a><span class="cm"> |encyclopedia and |article then map |encyclopedia to |title</span> </span><span id="L-1207"><a href="#L-1207"><span class="linenos" data-line="1207"></span></a><span class="cm"> |encyclopedia then map |encyclopedia to |title</span> </span><span id="L-1208"><a href="#L-1208"><span class="linenos" data-line="1208"></span></a> </span><span id="L-1209"><a href="#L-1209"><span class="linenos" data-line="1209"></span></a><span class="cm"> |trans_title maps to |trans_chapter when |title is re-mapped</span> </span><span id="L-1210"><a href="#L-1210"><span class="linenos" data-line="1210"></span></a> </span><span id="L-1211"><a href="#L-1211"><span class="linenos" data-line="1211"></span></a><span class="cm">All other combinations of |encyclopedia, |title, and |article are not modified</span> </span><span id="L-1212"><a href="#L-1212"><span class="linenos" data-line="1212"></span></a><span class="cm">]]</span> </span><span id="L-1213"><a href="#L-1213"><span class="linenos" data-line="1213"></span></a> <span class="kr">if</span> <span class="p">(</span> <span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span> <span class="o">==</span> <span class="s2">"encyclopaedia"</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-1214"><a href="#L-1214"><span class="linenos" data-line="1214"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Periodical</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- Periodical is set when |encyclopedia is set</span> </span><span id="L-1215"><a href="#L-1215"><span class="linenos" data-line="1215"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Title</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1216"><a href="#L-1216"><span class="linenos" data-line="1216"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Chapter</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1217"><a href="#L-1217"><span class="linenos" data-line="1217"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">Title</span><span class="p">;</span> <span class="c1">-- |encyclopedia and |title are set so map |title to |article and |encyclopedia to |title</span> </span><span id="L-1218"><a href="#L-1218"><span class="linenos" data-line="1218"></span></a> <span class="n">TransChapter</span> <span class="o">=</span> <span class="n">TransTitle</span><span class="p">;</span> </span><span id="L-1219"><a href="#L-1219"><span class="linenos" data-line="1219"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="n">Periodical</span><span class="p">;</span> </span><span id="L-1220"><a href="#L-1220"><span class="linenos" data-line="1220"></span></a> <span class="n">Periodical</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> <span class="c1">-- redundant so unset</span> </span><span id="L-1221"><a href="#L-1221"><span class="linenos" data-line="1221"></span></a> <span class="n">TransTitle</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> <span class="c1">-- redundant so unset</span> </span><span id="L-1222"><a href="#L-1222"><span class="linenos" data-line="1222"></span></a> <span class="kr">end</span> </span><span id="L-1223"><a href="#L-1223"><span class="linenos" data-line="1223"></span></a> <span class="kr">else</span> <span class="c1">-- |title not set</span> </span><span id="L-1224"><a href="#L-1224"><span class="linenos" data-line="1224"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="n">Periodical</span><span class="p">;</span> <span class="c1">-- |encyclopedia set and |article set or not set so map |encyclopedia to |title</span> </span><span id="L-1225"><a href="#L-1225"><span class="linenos" data-line="1225"></span></a> <span class="n">Periodical</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> <span class="c1">-- redundant so unset</span> </span><span id="L-1226"><a href="#L-1226"><span class="linenos" data-line="1226"></span></a> <span class="kr">end</span> </span><span id="L-1227"><a href="#L-1227"><span class="linenos" data-line="1227"></span></a> <span class="kr">end</span> </span><span id="L-1228"><a href="#L-1228"><span class="linenos" data-line="1228"></span></a> <span class="kr">end</span> </span><span id="L-1229"><a href="#L-1229"><span class="linenos" data-line="1229"></span></a> </span><span id="L-1230"><a href="#L-1230"><span class="linenos" data-line="1230"></span></a><span class="kd">local</span> <span class="n">Series</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Series'</span><span class="p">];</span> </span><span id="L-1231"><a href="#L-1231"><span class="linenos" data-line="1231"></span></a> <span class="kd">local</span> <span class="n">Volume</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Volume'</span><span class="p">];</span> </span><span id="L-1232"><a href="#L-1232"><span class="linenos" data-line="1232"></span></a> <span class="kd">local</span> <span class="n">Issue</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Issue'</span><span class="p">];</span> </span><span id="L-1233"><a href="#L-1233"><span class="linenos" data-line="1233"></span></a> <span class="kd">local</span> <span class="n">Position</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1234"><a href="#L-1234"><span class="linenos" data-line="1234"></span></a> <span class="kd">local</span> <span class="n">Page</span><span class="p">,</span> <span class="n">Pages</span><span class="p">,</span> <span class="n">At</span><span class="p">,</span> <span class="n">page_type</span><span class="p">;</span> </span><span id="L-1235"><a href="#L-1235"><span class="linenos" data-line="1235"></span></a> </span><span id="L-1236"><a href="#L-1236"><span class="linenos" data-line="1236"></span></a> <span class="n">Page</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Page'</span><span class="p">];</span> </span><span id="L-1237"><a href="#L-1237"><span class="linenos" data-line="1237"></span></a> <span class="n">Pages</span> <span class="o">=</span> <span class="n">hyphentodash</span><span class="p">(</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Pages'</span><span class="p">]</span> <span class="p">);</span> </span><span id="L-1238"><a href="#L-1238"><span class="linenos" data-line="1238"></span></a> <span class="n">At</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'At'</span><span class="p">];</span> </span><span id="L-1239"><a href="#L-1239"><span class="linenos" data-line="1239"></span></a> </span><span id="L-1240"><a href="#L-1240"><span class="linenos" data-line="1240"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Page</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1241"><a href="#L-1241"><span class="linenos" data-line="1241"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Pages</span><span class="p">)</span> <span class="ow">or</span> <span class="n">is_set</span><span class="p">(</span><span class="n">At</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1242"><a href="#L-1242"><span class="linenos" data-line="1242"></span></a> <span class="n">Page</span> <span class="o">=</span> <span class="n">Page</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span><span class="s1">'extra_pages'</span><span class="p">);</span> </span><span id="L-1243"><a href="#L-1243"><span class="linenos" data-line="1243"></span></a> <span class="n">Pages</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1244"><a href="#L-1244"><span class="linenos" data-line="1244"></span></a> <span class="n">At</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1245"><a href="#L-1245"><span class="linenos" data-line="1245"></span></a> <span class="kr">end</span> </span><span id="L-1246"><a href="#L-1246"><span class="linenos" data-line="1246"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Pages</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1247"><a href="#L-1247"><span class="linenos" data-line="1247"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">At</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1248"><a href="#L-1248"><span class="linenos" data-line="1248"></span></a> <span class="n">Pages</span> <span class="o">=</span> <span class="n">Pages</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span><span class="s1">'extra_pages'</span><span class="p">);</span> </span><span id="L-1249"><a href="#L-1249"><span class="linenos" data-line="1249"></span></a> <span class="n">At</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1250"><a href="#L-1250"><span class="linenos" data-line="1250"></span></a> <span class="kr">end</span> </span><span id="L-1251"><a href="#L-1251"><span class="linenos" data-line="1251"></span></a> <span class="kr">end</span> </span><span id="L-1252"><a href="#L-1252"><span class="linenos" data-line="1252"></span></a> </span><span id="L-1253"><a href="#L-1253"><span class="linenos" data-line="1253"></span></a> <span class="kd">local</span> <span class="n">Edition</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Edition'</span><span class="p">];</span> </span><span id="L-1254"><a href="#L-1254"><span class="linenos" data-line="1254"></span></a> <span class="kd">local</span> <span class="n">PublicationPlace</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'PublicationPlace'</span><span class="p">]</span> </span><span id="L-1255"><a href="#L-1255"><span class="linenos" data-line="1255"></span></a> <span class="kd">local</span> <span class="n">Place</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Place'</span><span class="p">];</span> </span><span id="L-1256"><a href="#L-1256"><span class="linenos" data-line="1256"></span></a> </span><span id="L-1257"><a href="#L-1257"><span class="linenos" data-line="1257"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">PublicationPlace</span><span class="p">)</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Place</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1258"><a href="#L-1258"><span class="linenos" data-line="1258"></span></a> <span class="n">PublicationPlace</span> <span class="o">=</span> <span class="n">Place</span><span class="p">;</span> </span><span id="L-1259"><a href="#L-1259"><span class="linenos" data-line="1259"></span></a> <span class="kr">end</span> </span><span id="L-1260"><a href="#L-1260"><span class="linenos" data-line="1260"></span></a> </span><span id="L-1261"><a href="#L-1261"><span class="linenos" data-line="1261"></span></a> <span class="kr">if</span> <span class="n">PublicationPlace</span> <span class="o">==</span> <span class="n">Place</span> <span class="kr">then</span> <span class="n">Place</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> <span class="kr">end</span> </span><span id="L-1262"><a href="#L-1262"><span class="linenos" data-line="1262"></span></a> </span><span id="L-1263"><a href="#L-1263"><span class="linenos" data-line="1263"></span></a> <span class="kd">local</span> <span class="n">PublisherName</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'PublisherName'</span><span class="p">];</span> </span><span id="L-1264"><a href="#L-1264"><span class="linenos" data-line="1264"></span></a> <span class="kd">local</span> <span class="n">RegistrationRequired</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'RegistrationRequired'</span><span class="p">];</span> </span><span id="L-1265"><a href="#L-1265"><span class="linenos" data-line="1265"></span></a> <span class="kd">local</span> <span class="n">SubscriptionRequired</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'SubscriptionRequired'</span><span class="p">];</span> </span><span id="L-1266"><a href="#L-1266"><span class="linenos" data-line="1266"></span></a> <span class="kd">local</span> <span class="n">Via</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Via'</span><span class="p">];</span> </span><span id="L-1267"><a href="#L-1267"><span class="linenos" data-line="1267"></span></a> <span class="kd">local</span> <span class="n">AccessDate</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'AccessDate'</span><span class="p">];</span> </span><span id="L-1268"><a href="#L-1268"><span class="linenos" data-line="1268"></span></a> <span class="kd">local</span> <span class="n">ArchiveDate</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'ArchiveDate'</span><span class="p">];</span> </span><span id="L-1269"><a href="#L-1269"><span class="linenos" data-line="1269"></span></a> <span class="kd">local</span> <span class="n">Agency</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Agency'</span><span class="p">];</span> </span><span id="L-1270"><a href="#L-1270"><span class="linenos" data-line="1270"></span></a> <span class="kd">local</span> <span class="n">DeadURL</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'DeadURL'</span><span class="p">]</span> </span><span id="L-1271"><a href="#L-1271"><span class="linenos" data-line="1271"></span></a> <span class="kd">local</span> <span class="n">Language</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Language'</span><span class="p">];</span> </span><span id="L-1272"><a href="#L-1272"><span class="linenos" data-line="1272"></span></a> <span class="kd">local</span> <span class="n">Format</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Format'</span><span class="p">];</span> </span><span id="L-1273"><a href="#L-1273"><span class="linenos" data-line="1273"></span></a> <span class="kd">local</span> <span class="n">Ref</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Ref'</span><span class="p">];</span> </span><span id="L-1274"><a href="#L-1274"><span class="linenos" data-line="1274"></span></a> </span><span id="L-1275"><a href="#L-1275"><span class="linenos" data-line="1275"></span></a> <span class="kd">local</span> <span class="n">DoiBroken</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'DoiBroken'</span><span class="p">];</span> </span><span id="L-1276"><a href="#L-1276"><span class="linenos" data-line="1276"></span></a> </span><span id="L-1277"><a href="#L-1277"><span class="linenos" data-line="1277"></span></a><span class="c1">-- Special case for cite techreport.</span> </span><span id="L-1278"><a href="#L-1278"><span class="linenos" data-line="1278"></span></a> <span class="kd">local</span> <span class="n">ID</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'ID'</span><span class="p">];</span> </span><span id="L-1279"><a href="#L-1279"><span class="linenos" data-line="1279"></span></a> <span class="kr">if</span> <span class="p">(</span><span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span> <span class="o">==</span> <span class="s2">"techreport"</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- special case for cite techreport</span> </span><span id="L-1280"><a href="#L-1280"><span class="linenos" data-line="1280"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Issue</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- cite techreport uses 'number', which other citations aliase to 'issue'</span> </span><span id="L-1281"><a href="#L-1281"><span class="linenos" data-line="1281"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ID</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- can we use ID for the "number"?</span> </span><span id="L-1282"><a href="#L-1282"><span class="linenos" data-line="1282"></span></a> <span class="n">ID</span> <span class="o">=</span> <span class="n">Issue</span><span class="p">;</span> <span class="c1">-- yes, use it</span> </span><span id="L-1283"><a href="#L-1283"><span class="linenos" data-line="1283"></span></a> <span class="n">Issue</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> <span class="c1">-- unset Issue so that "number" isn't duplicated in the rendered citation or COinS metadata</span> </span><span id="L-1284"><a href="#L-1284"><span class="linenos" data-line="1284"></span></a> <span class="kr">else</span> <span class="c1">-- can't use ID so emit error message</span> </span><span id="L-1285"><a href="#L-1285"><span class="linenos" data-line="1285"></span></a> <span class="n">ID</span> <span class="o">=</span> <span class="n">ID</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span><span class="s1">'redundant_parameters'</span><span class="p">,</span> <span class="s1">'<code>&#124;id=</code> and <code>&#124;number=</code>'</span><span class="p">);</span> </span><span id="L-1286"><a href="#L-1286"><span class="linenos" data-line="1286"></span></a> <span class="kr">end</span> </span><span id="L-1287"><a href="#L-1287"><span class="linenos" data-line="1287"></span></a> <span class="kr">end</span> </span><span id="L-1288"><a href="#L-1288"><span class="linenos" data-line="1288"></span></a> <span class="kr">end</span> </span><span id="L-1289"><a href="#L-1289"><span class="linenos" data-line="1289"></span></a> </span><span id="L-1290"><a href="#L-1290"><span class="linenos" data-line="1290"></span></a> <span class="kd">local</span> <span class="n">ASINTLD</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'ASINTLD'</span><span class="p">];</span> </span><span id="L-1291"><a href="#L-1291"><span class="linenos" data-line="1291"></span></a> <span class="kd">local</span> <span class="n">IgnoreISBN</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'IgnoreISBN'</span><span class="p">];</span> </span><span id="L-1292"><a href="#L-1292"><span class="linenos" data-line="1292"></span></a> <span class="kd">local</span> <span class="n">Embargo</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Embargo'</span><span class="p">];</span> </span><span id="L-1293"><a href="#L-1293"><span class="linenos" data-line="1293"></span></a> </span><span id="L-1294"><a href="#L-1294"><span class="linenos" data-line="1294"></span></a> <span class="kd">local</span> <span class="n">ID_list</span> <span class="o">=</span> <span class="n">extractids</span><span class="p">(</span> <span class="n">args</span> <span class="p">);</span> </span><span id="L-1295"><a href="#L-1295"><span class="linenos" data-line="1295"></span></a> </span><span id="L-1296"><a href="#L-1296"><span class="linenos" data-line="1296"></span></a> <span class="kd">local</span> <span class="n">Quote</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Quote'</span><span class="p">];</span> </span><span id="L-1297"><a href="#L-1297"><span class="linenos" data-line="1297"></span></a> <span class="kd">local</span> <span class="n">PostScript</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'PostScript'</span><span class="p">];</span> </span><span id="L-1298"><a href="#L-1298"><span class="linenos" data-line="1298"></span></a> <span class="kd">local</span> <span class="n">LayURL</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'LayURL'</span><span class="p">];</span> </span><span id="L-1299"><a href="#L-1299"><span class="linenos" data-line="1299"></span></a> <span class="kd">local</span> <span class="n">LaySource</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'LaySource'</span><span class="p">];</span> </span><span id="L-1300"><a href="#L-1300"><span class="linenos" data-line="1300"></span></a> <span class="kd">local</span> <span class="n">Transcript</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Transcript'</span><span class="p">];</span> </span><span id="L-1301"><a href="#L-1301"><span class="linenos" data-line="1301"></span></a> <span class="kd">local</span> <span class="n">TranscriptURL</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'TranscriptURL'</span><span class="p">]</span> </span><span id="L-1302"><a href="#L-1302"><span class="linenos" data-line="1302"></span></a> <span class="kd">local</span> <span class="n">TranscriptURLorigin</span> <span class="o">=</span> <span class="n">A</span><span class="p">:</span><span class="n">ORIGIN</span><span class="p">(</span><span class="s1">'TranscriptURL'</span><span class="p">);</span> </span><span id="L-1303"><a href="#L-1303"><span class="linenos" data-line="1303"></span></a> <span class="kd">local</span> <span class="n">sepc</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Separator'</span><span class="p">];</span> </span><span id="L-1304"><a href="#L-1304"><span class="linenos" data-line="1304"></span></a> <span class="kd">local</span> <span class="n">LastAuthorAmp</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'LastAuthorAmp'</span><span class="p">];</span> </span><span id="L-1305"><a href="#L-1305"><span class="linenos" data-line="1305"></span></a> <span class="kd">local</span> <span class="n">no_tracking_cats</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'NoTracking'</span><span class="p">];</span> </span><span id="L-1306"><a href="#L-1306"><span class="linenos" data-line="1306"></span></a> </span><span id="L-1307"><a href="#L-1307"><span class="linenos" data-line="1307"></span></a> <span class="kd">local</span> <span class="n">use_lowercase</span> <span class="o">=</span> <span class="p">(</span> <span class="n">sepc</span> <span class="o">~=</span> <span class="s1">'.'</span> <span class="p">);</span> </span><span id="L-1308"><a href="#L-1308"><span class="linenos" data-line="1308"></span></a> <span class="kd">local</span> <span class="n">this_page</span> <span class="o">=</span> <span class="n">mw</span><span class="p">.</span><span class="n">title</span><span class="p">.</span><span class="n">getCurrentTitle</span><span class="p">();</span> <span class="c1">--Also used for COinS and for language</span> </span><span id="L-1309"><a href="#L-1309"><span class="linenos" data-line="1309"></span></a> </span><span id="L-1310"><a href="#L-1310"><span class="linenos" data-line="1310"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">no_tracking_cats</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1311"><a href="#L-1311"><span class="linenos" data-line="1311"></span></a> <span class="kr">for</span> <span class="n">k</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">pairs</span><span class="p">(</span> <span class="n">cfg</span><span class="p">.</span><span class="n">uncategorized_namespaces</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-1312"><a href="#L-1312"><span class="linenos" data-line="1312"></span></a> <span class="kr">if</span> <span class="n">this_page</span><span class="p">.</span><span class="n">nsText</span> <span class="o">==</span> <span class="n">v</span> <span class="kr">then</span> </span><span id="L-1313"><a href="#L-1313"><span class="linenos" data-line="1313"></span></a> <span class="n">no_tracking_cats</span> <span class="o">=</span> <span class="s2">"true"</span><span class="p">;</span> </span><span id="L-1314"><a href="#L-1314"><span class="linenos" data-line="1314"></span></a> <span class="kr">break</span><span class="p">;</span> </span><span id="L-1315"><a href="#L-1315"><span class="linenos" data-line="1315"></span></a> <span class="kr">end</span> </span><span id="L-1316"><a href="#L-1316"><span class="linenos" data-line="1316"></span></a> <span class="kr">end</span> </span><span id="L-1317"><a href="#L-1317"><span class="linenos" data-line="1317"></span></a> <span class="kr">end</span> </span><span id="L-1318"><a href="#L-1318"><span class="linenos" data-line="1318"></span></a> </span><span id="L-1319"><a href="#L-1319"><span class="linenos" data-line="1319"></span></a> <span class="kd">local</span> <span class="n">anchor_year</span><span class="p">;</span> <span class="c1">-- used in the CITEREF identifier</span> </span><span id="L-1320"><a href="#L-1320"><span class="linenos" data-line="1320"></span></a> <span class="kd">local</span> <span class="n">COinS_date</span><span class="p">;</span> <span class="c1">-- used in the COinS metadata</span> </span><span id="L-1321"><a href="#L-1321"><span class="linenos" data-line="1321"></span></a> </span><span id="L-1322"><a href="#L-1322"><span class="linenos" data-line="1322"></span></a><span class="c1">-- legacy: promote concatenation of |day=, |month=, and |year= to Date if Date not set; or, promote PublicationDate to Date if neither Date nor Year are set.</span> </span><span id="L-1323"><a href="#L-1323"><span class="linenos" data-line="1323"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Date</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1324"><a href="#L-1324"><span class="linenos" data-line="1324"></span></a> <span class="n">Date</span> <span class="o">=</span> <span class="n">Year</span><span class="p">;</span> <span class="c1">-- promote Year to Date</span> </span><span id="L-1325"><a href="#L-1325"><span class="linenos" data-line="1325"></span></a> <span class="n">Year</span> <span class="o">=</span> <span class="kc">nil</span><span class="p">;</span> <span class="c1">-- make nil so Year as empty string isn't used for CITEREF</span> </span><span id="L-1326"><a href="#L-1326"><span class="linenos" data-line="1326"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Date</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1327"><a href="#L-1327"><span class="linenos" data-line="1327"></span></a> <span class="kd">local</span> <span class="n">Month</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Month'</span><span class="p">];</span> </span><span id="L-1328"><a href="#L-1328"><span class="linenos" data-line="1328"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Month</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1329"><a href="#L-1329"><span class="linenos" data-line="1329"></span></a> <span class="n">Date</span> <span class="o">=</span> <span class="n">Month</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Date</span><span class="p">;</span> </span><span id="L-1330"><a href="#L-1330"><span class="linenos" data-line="1330"></span></a> <span class="kd">local</span> <span class="n">Day</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Day'</span><span class="p">]</span> </span><span id="L-1331"><a href="#L-1331"><span class="linenos" data-line="1331"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Day</span><span class="p">)</span> <span class="kr">then</span> <span class="n">Date</span> <span class="o">=</span> <span class="n">Day</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Date</span> <span class="kr">end</span> </span><span id="L-1332"><a href="#L-1332"><span class="linenos" data-line="1332"></span></a> <span class="kr">end</span> </span><span id="L-1333"><a href="#L-1333"><span class="linenos" data-line="1333"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">PublicationDate</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- use PublicationDate when |date= and |year= are not set</span> </span><span id="L-1334"><a href="#L-1334"><span class="linenos" data-line="1334"></span></a> <span class="n">Date</span> <span class="o">=</span> <span class="n">PublicationDate</span><span class="p">;</span> <span class="c1">-- promonte PublicationDate to Date</span> </span><span id="L-1335"><a href="#L-1335"><span class="linenos" data-line="1335"></span></a> <span class="n">PublicationDate</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> <span class="c1">-- unset, no longer needed</span> </span><span id="L-1336"><a href="#L-1336"><span class="linenos" data-line="1336"></span></a> <span class="kr">end</span> </span><span id="L-1337"><a href="#L-1337"><span class="linenos" data-line="1337"></span></a> <span class="kr">end</span> </span><span id="L-1338"><a href="#L-1338"><span class="linenos" data-line="1338"></span></a> </span><span id="L-1339"><a href="#L-1339"><span class="linenos" data-line="1339"></span></a> <span class="kr">if</span> <span class="n">PublicationDate</span> <span class="o">==</span> <span class="n">Date</span> <span class="kr">then</span> <span class="n">PublicationDate</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> <span class="kr">end</span> <span class="c1">-- if PublicationDate is same as Date, don't display in rendered citation</span> </span><span id="L-1340"><a href="#L-1340"><span class="linenos" data-line="1340"></span></a> </span><span id="L-1341"><a href="#L-1341"><span class="linenos" data-line="1341"></span></a><span class="c1">-- Go test all of the date-holding parameters for valid MOS:DATE format and make sure that dates are real dates.</span> </span><span id="L-1342"><a href="#L-1342"><span class="linenos" data-line="1342"></span></a><span class="c1">-- TODO: 2013-10-27: AirDate is nil when dates() is called because it hasn't been set yet. Move the call to dates() or set AirDate earlier.</span> </span><span id="L-1343"><a href="#L-1343"><span class="linenos" data-line="1343"></span></a> <span class="n">anchor_year</span><span class="p">,</span> <span class="n">COinS_date</span> <span class="o">=</span> <span class="n">dates</span><span class="p">({[</span><span class="s1">'accessdate'</span><span class="p">]</span><span class="o">=</span><span class="n">AccessDate</span><span class="p">,</span> <span class="p">[</span><span class="s1">'airdate'</span><span class="p">]</span><span class="o">=</span><span class="n">AirDate</span><span class="p">,</span> <span class="p">[</span><span class="s1">'archivedate'</span><span class="p">]</span><span class="o">=</span><span class="n">ArchiveDate</span><span class="p">,</span> <span class="p">[</span><span class="s1">'date'</span><span class="p">]</span><span class="o">=</span><span class="n">Date</span><span class="p">,</span> <span class="p">[</span><span class="s1">'doi_brokendate'</span><span class="p">]</span><span class="o">=</span><span class="n">DoiBroken</span><span class="p">,</span> </span><span id="L-1344"><a href="#L-1344"><span class="linenos" data-line="1344"></span></a> <span class="p">[</span><span class="s1">'embargo'</span><span class="p">]</span><span class="o">=</span><span class="n">Embargo</span><span class="p">,</span> <span class="p">[</span><span class="s1">'laydate'</span><span class="p">]</span><span class="o">=</span><span class="n">LayDate</span><span class="p">,</span> <span class="p">[</span><span class="s1">'publicationdate'</span><span class="p">]</span><span class="o">=</span><span class="n">PublicationDate</span><span class="p">,</span> <span class="p">[</span><span class="s1">'year'</span><span class="p">]</span><span class="o">=</span><span class="n">Year</span><span class="p">});</span> </span><span id="L-1345"><a href="#L-1345"><span class="linenos" data-line="1345"></span></a> </span><span id="L-1346"><a href="#L-1346"><span class="linenos" data-line="1346"></span></a><span class="c1">-- At this point fields may be nil if they weren't specified in the template use. We can use that fact.</span> </span><span id="L-1347"><a href="#L-1347"><span class="linenos" data-line="1347"></span></a> </span><span id="L-1348"><a href="#L-1348"><span class="linenos" data-line="1348"></span></a> <span class="c1">--Account for the oddity that is {{cite journal}} with |pmc= set and |url= not set</span> </span><span id="L-1349"><a href="#L-1349"><span class="linenos" data-line="1349"></span></a> <span class="kr">if</span> <span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span> <span class="o">==</span> <span class="s2">"journal"</span> <span class="ow">and</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">URL</span><span class="p">)</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ID_list</span><span class="p">[</span><span class="s1">'PMC'</span><span class="p">])</span> <span class="kr">then</span> </span><span id="L-1350"><a href="#L-1350"><span class="linenos" data-line="1350"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_embargoed</span><span class="p">(</span><span class="n">Embargo</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1351"><a href="#L-1351"><span class="linenos" data-line="1351"></span></a> <span class="n">URL</span><span class="o">=</span><span class="n">cfg</span><span class="p">.</span><span class="n">id_handlers</span><span class="p">[</span><span class="s1">'PMC'</span><span class="p">].</span><span class="n">prefix</span> <span class="o">..</span> <span class="n">ID_list</span><span class="p">[</span><span class="s1">'PMC'</span><span class="p">];</span> <span class="c1">-- set url to be the same as the PMC external link if not embargoed</span> </span><span id="L-1352"><a href="#L-1352"><span class="linenos" data-line="1352"></span></a> <span class="n">URLorigin</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">id_handlers</span><span class="p">[</span><span class="s1">'PMC'</span><span class="p">].</span><span class="n">parameters</span><span class="p">[</span><span class="mi">1</span><span class="p">];</span> <span class="c1">-- set URLorigin to parameter name for use in error message if citation is missing a |title=</span> </span><span id="L-1353"><a href="#L-1353"><span class="linenos" data-line="1353"></span></a> <span class="kr">end</span> </span><span id="L-1354"><a href="#L-1354"><span class="linenos" data-line="1354"></span></a> <span class="kr">end</span> </span><span id="L-1355"><a href="#L-1355"><span class="linenos" data-line="1355"></span></a> </span><span id="L-1356"><a href="#L-1356"><span class="linenos" data-line="1356"></span></a> <span class="c1">-- Account for the oddity that is {{cite conference}}, before generation of COinS data.</span> </span><span id="L-1357"><a href="#L-1357"><span class="linenos" data-line="1357"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">BookTitle</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1358"><a href="#L-1358"><span class="linenos" data-line="1358"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">Title</span><span class="p">;</span> </span><span id="L-1359"><a href="#L-1359"><span class="linenos" data-line="1359"></span></a> <span class="n">ChapterLink</span> <span class="o">=</span> <span class="n">TitleLink</span><span class="p">;</span> </span><span id="L-1360"><a href="#L-1360"><span class="linenos" data-line="1360"></span></a> <span class="n">TransChapter</span> <span class="o">=</span> <span class="n">TransTitle</span><span class="p">;</span> </span><span id="L-1361"><a href="#L-1361"><span class="linenos" data-line="1361"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="n">BookTitle</span><span class="p">;</span> </span><span id="L-1362"><a href="#L-1362"><span class="linenos" data-line="1362"></span></a> <span class="n">TitleLink</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1363"><a href="#L-1363"><span class="linenos" data-line="1363"></span></a> <span class="n">TransTitle</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1364"><a href="#L-1364"><span class="linenos" data-line="1364"></span></a> <span class="kr">end</span> </span><span id="L-1365"><a href="#L-1365"><span class="linenos" data-line="1365"></span></a> <span class="c1">-- Account for the oddity that is {{cite episode}}, before generation of COinS data.</span> </span><span id="L-1366"><a href="#L-1366"><span class="linenos" data-line="1366"></span></a> <span class="kr">if</span> <span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span> <span class="o">==</span> <span class="s2">"episode"</span> <span class="kr">then</span> </span><span id="L-1367"><a href="#L-1367"><span class="linenos" data-line="1367"></span></a> <span class="kd">local</span> <span class="n">AirDate</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'AirDate'</span><span class="p">];</span> </span><span id="L-1368"><a href="#L-1368"><span class="linenos" data-line="1368"></span></a> <span class="kd">local</span> <span class="n">SeriesLink</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'SeriesLink'</span><span class="p">];</span> </span><span id="L-1369"><a href="#L-1369"><span class="linenos" data-line="1369"></span></a> <span class="kd">local</span> <span class="n">Season</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Season'</span><span class="p">];</span> </span><span id="L-1370"><a href="#L-1370"><span class="linenos" data-line="1370"></span></a> <span class="kd">local</span> <span class="n">SeriesNumber</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'SeriesNumber'</span><span class="p">];</span> </span><span id="L-1371"><a href="#L-1371"><span class="linenos" data-line="1371"></span></a> <span class="kd">local</span> <span class="n">Network</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Network'</span><span class="p">];</span> </span><span id="L-1372"><a href="#L-1372"><span class="linenos" data-line="1372"></span></a> <span class="kd">local</span> <span class="n">Station</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Station'</span><span class="p">];</span> </span><span id="L-1373"><a href="#L-1373"><span class="linenos" data-line="1373"></span></a> <span class="kd">local</span> <span class="n">s</span><span class="p">,</span> <span class="n">n</span> <span class="o">=</span> <span class="p">{},</span> <span class="p">{};</span> </span><span id="L-1374"><a href="#L-1374"><span class="linenos" data-line="1374"></span></a> <span class="kd">local</span> <span class="n">Sep</span> <span class="o">=</span> <span class="p">(</span><span class="n">first_set</span><span class="p">(</span><span class="n">A</span><span class="p">[</span><span class="s2">"SeriesSeparator"</span><span class="p">],</span> <span class="n">A</span><span class="p">[</span><span class="s2">"Separator"</span><span class="p">])</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">)</span> <span class="o">..</span> <span class="s2">" "</span><span class="p">;</span> </span><span id="L-1375"><a href="#L-1375"><span class="linenos" data-line="1375"></span></a> </span><span id="L-1376"><a href="#L-1376"><span class="linenos" data-line="1376"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Issue</span><span class="p">)</span> <span class="kr">then</span> <span class="nb">table.insert</span><span class="p">(</span><span class="n">s</span><span class="p">,</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s2">"episode"</span><span class="p">]</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Issue</span><span class="p">);</span> <span class="n">Issue</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> <span class="kr">end</span> </span><span id="L-1377"><a href="#L-1377"><span class="linenos" data-line="1377"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Season</span><span class="p">)</span> <span class="kr">then</span> <span class="nb">table.insert</span><span class="p">(</span><span class="n">s</span><span class="p">,</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s2">"season"</span><span class="p">]</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Season</span><span class="p">);</span> <span class="kr">end</span> </span><span id="L-1378"><a href="#L-1378"><span class="linenos" data-line="1378"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">SeriesNumber</span><span class="p">)</span> <span class="kr">then</span> <span class="nb">table.insert</span><span class="p">(</span><span class="n">s</span><span class="p">,</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s2">"series"</span><span class="p">]</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">SeriesNumber</span><span class="p">);</span> <span class="kr">end</span> </span><span id="L-1379"><a href="#L-1379"><span class="linenos" data-line="1379"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Network</span><span class="p">)</span> <span class="kr">then</span> <span class="nb">table.insert</span><span class="p">(</span><span class="n">n</span><span class="p">,</span> <span class="n">Network</span><span class="p">);</span> <span class="kr">end</span> </span><span id="L-1380"><a href="#L-1380"><span class="linenos" data-line="1380"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Station</span><span class="p">)</span> <span class="kr">then</span> <span class="nb">table.insert</span><span class="p">(</span><span class="n">n</span><span class="p">,</span> <span class="n">Station</span><span class="p">);</span> <span class="kr">end</span> </span><span id="L-1381"><a href="#L-1381"><span class="linenos" data-line="1381"></span></a> </span><span id="L-1382"><a href="#L-1382"><span class="linenos" data-line="1382"></span></a> <span class="n">Date</span> <span class="o">=</span> <span class="n">Date</span> <span class="ow">or</span> <span class="n">AirDate</span><span class="p">;</span> </span><span id="L-1383"><a href="#L-1383"><span class="linenos" data-line="1383"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">Title</span><span class="p">;</span> </span><span id="L-1384"><a href="#L-1384"><span class="linenos" data-line="1384"></span></a> <span class="n">ChapterLink</span> <span class="o">=</span> <span class="n">TitleLink</span><span class="p">;</span> </span><span id="L-1385"><a href="#L-1385"><span class="linenos" data-line="1385"></span></a> <span class="n">TransChapter</span> <span class="o">=</span> <span class="n">TransTitle</span><span class="p">;</span> </span><span id="L-1386"><a href="#L-1386"><span class="linenos" data-line="1386"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="n">Series</span><span class="p">;</span> </span><span id="L-1387"><a href="#L-1387"><span class="linenos" data-line="1387"></span></a> <span class="n">TitleLink</span> <span class="o">=</span> <span class="n">SeriesLink</span><span class="p">;</span> </span><span id="L-1388"><a href="#L-1388"><span class="linenos" data-line="1388"></span></a> <span class="n">TransTitle</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1389"><a href="#L-1389"><span class="linenos" data-line="1389"></span></a> </span><span id="L-1390"><a href="#L-1390"><span class="linenos" data-line="1390"></span></a> <span class="n">Series</span> <span class="o">=</span> <span class="nb">table.concat</span><span class="p">(</span><span class="n">s</span><span class="p">,</span> <span class="n">Sep</span><span class="p">);</span> </span><span id="L-1391"><a href="#L-1391"><span class="linenos" data-line="1391"></span></a> <span class="n">ID</span> <span class="o">=</span> <span class="nb">table.concat</span><span class="p">(</span><span class="n">n</span><span class="p">,</span> <span class="n">Sep</span><span class="p">);</span> </span><span id="L-1392"><a href="#L-1392"><span class="linenos" data-line="1392"></span></a> <span class="kr">end</span> </span><span id="L-1393"><a href="#L-1393"><span class="linenos" data-line="1393"></span></a> </span><span id="L-1394"><a href="#L-1394"><span class="linenos" data-line="1394"></span></a> <span class="c1">-- COinS metadata (see <http://ocoins.info/>) for</span> </span><span id="L-1395"><a href="#L-1395"><span class="linenos" data-line="1395"></span></a> <span class="c1">-- automated parsing of citation information.</span> </span><span id="L-1396"><a href="#L-1396"><span class="linenos" data-line="1396"></span></a> <span class="kd">local</span> <span class="n">OCinSoutput</span> <span class="o">=</span> <span class="n">COinS</span><span class="p">{</span> </span><span id="L-1397"><a href="#L-1397"><span class="linenos" data-line="1397"></span></a> <span class="p">[</span><span class="s1">'Periodical'</span><span class="p">]</span> <span class="o">=</span> <span class="n">Periodical</span><span class="p">,</span> </span><span id="L-1398"><a href="#L-1398"><span class="linenos" data-line="1398"></span></a> <span class="p">[</span><span class="s1">'Chapter'</span><span class="p">]</span> <span class="o">=</span> <span class="n">Chapter</span><span class="p">,</span> </span><span id="L-1399"><a href="#L-1399"><span class="linenos" data-line="1399"></span></a> <span class="p">[</span><span class="s1">'Title'</span><span class="p">]</span> <span class="o">=</span> <span class="n">Title</span><span class="p">,</span> </span><span id="L-1400"><a href="#L-1400"><span class="linenos" data-line="1400"></span></a> <span class="p">[</span><span class="s1">'PublicationPlace'</span><span class="p">]</span> <span class="o">=</span> <span class="n">PublicationPlace</span><span class="p">,</span> </span><span id="L-1401"><a href="#L-1401"><span class="linenos" data-line="1401"></span></a> <span class="p">[</span><span class="s1">'Date'</span><span class="p">]</span> <span class="o">=</span> <span class="n">first_set</span><span class="p">(</span><span class="n">COinS_date</span><span class="p">,</span> <span class="n">Date</span><span class="p">),</span> <span class="c1">-- COinS_date has correctly formatted date if Date is valid; any reason to keep Date here? Should we be including invalid dates in metadata?</span> </span><span id="L-1402"><a href="#L-1402"><span class="linenos" data-line="1402"></span></a> <span class="p">[</span><span class="s1">'Series'</span><span class="p">]</span> <span class="o">=</span> <span class="n">Series</span><span class="p">,</span> </span><span id="L-1403"><a href="#L-1403"><span class="linenos" data-line="1403"></span></a> <span class="p">[</span><span class="s1">'Volume'</span><span class="p">]</span> <span class="o">=</span> <span class="n">Volume</span><span class="p">,</span> </span><span id="L-1404"><a href="#L-1404"><span class="linenos" data-line="1404"></span></a> <span class="p">[</span><span class="s1">'Issue'</span><span class="p">]</span> <span class="o">=</span> <span class="n">Issue</span><span class="p">,</span> </span><span id="L-1405"><a href="#L-1405"><span class="linenos" data-line="1405"></span></a> <span class="p">[</span><span class="s1">'Pages'</span><span class="p">]</span> <span class="o">=</span> <span class="n">first_set</span><span class="p">(</span><span class="n">Page</span><span class="p">,</span> <span class="n">Pages</span><span class="p">,</span> <span class="n">At</span><span class="p">),</span> </span><span id="L-1406"><a href="#L-1406"><span class="linenos" data-line="1406"></span></a> <span class="p">[</span><span class="s1">'Edition'</span><span class="p">]</span> <span class="o">=</span> <span class="n">Edition</span><span class="p">,</span> </span><span id="L-1407"><a href="#L-1407"><span class="linenos" data-line="1407"></span></a> <span class="p">[</span><span class="s1">'PublisherName'</span><span class="p">]</span> <span class="o">=</span> <span class="n">PublisherName</span><span class="p">,</span> </span><span id="L-1408"><a href="#L-1408"><span class="linenos" data-line="1408"></span></a> <span class="p">[</span><span class="s1">'URL'</span><span class="p">]</span> <span class="o">=</span> <span class="n">first_set</span><span class="p">(</span> <span class="n">URL</span><span class="p">,</span> <span class="n">ChapterURL</span> <span class="p">),</span> </span><span id="L-1409"><a href="#L-1409"><span class="linenos" data-line="1409"></span></a> <span class="p">[</span><span class="s1">'Authors'</span><span class="p">]</span> <span class="o">=</span> <span class="n">a</span><span class="p">,</span> </span><span id="L-1410"><a href="#L-1410"><span class="linenos" data-line="1410"></span></a> <span class="p">[</span><span class="s1">'ID_list'</span><span class="p">]</span> <span class="o">=</span> <span class="n">ID_list</span><span class="p">,</span> </span><span id="L-1411"><a href="#L-1411"><span class="linenos" data-line="1411"></span></a> <span class="p">[</span><span class="s1">'RawPage'</span><span class="p">]</span> <span class="o">=</span> <span class="n">this_page</span><span class="p">.</span><span class="n">prefixedText</span><span class="p">,</span> </span><span id="L-1412"><a href="#L-1412"><span class="linenos" data-line="1412"></span></a> <span class="p">};</span> </span><span id="L-1413"><a href="#L-1413"><span class="linenos" data-line="1413"></span></a> </span><span id="L-1414"><a href="#L-1414"><span class="linenos" data-line="1414"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Periodical</span><span class="p">)</span> <span class="ow">and</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Chapter</span><span class="p">)</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Title</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1415"><a href="#L-1415"><span class="linenos" data-line="1415"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">Title</span><span class="p">;</span> </span><span id="L-1416"><a href="#L-1416"><span class="linenos" data-line="1416"></span></a> <span class="n">ChapterLink</span> <span class="o">=</span> <span class="n">TitleLink</span><span class="p">;</span> </span><span id="L-1417"><a href="#L-1417"><span class="linenos" data-line="1417"></span></a> <span class="n">TransChapter</span> <span class="o">=</span> <span class="n">TransTitle</span><span class="p">;</span> </span><span id="L-1418"><a href="#L-1418"><span class="linenos" data-line="1418"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1419"><a href="#L-1419"><span class="linenos" data-line="1419"></span></a> <span class="n">TitleLink</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1420"><a href="#L-1420"><span class="linenos" data-line="1420"></span></a> <span class="n">TransTitle</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1421"><a href="#L-1421"><span class="linenos" data-line="1421"></span></a> <span class="kr">end</span> </span><span id="L-1422"><a href="#L-1422"><span class="linenos" data-line="1422"></span></a> </span><span id="L-1423"><a href="#L-1423"><span class="linenos" data-line="1423"></span></a> <span class="c1">-- Now perform various field substitutions.</span> </span><span id="L-1424"><a href="#L-1424"><span class="linenos" data-line="1424"></span></a> <span class="c1">-- We also add leading spaces and surrounding markup and punctuation to the</span> </span><span id="L-1425"><a href="#L-1425"><span class="linenos" data-line="1425"></span></a> <span class="c1">-- various parts of the citation, but only when they are non-nil.</span> </span><span id="L-1426"><a href="#L-1426"><span class="linenos" data-line="1426"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Authors</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1427"><a href="#L-1427"><span class="linenos" data-line="1427"></span></a> <span class="kd">local</span> <span class="n">Maximum</span> <span class="o">=</span> <span class="nb">tonumber</span><span class="p">(</span> <span class="n">A</span><span class="p">[</span><span class="s1">'DisplayAuthors'</span><span class="p">]</span> <span class="p">);</span> </span><span id="L-1428"><a href="#L-1428"><span class="linenos" data-line="1428"></span></a> </span><span id="L-1429"><a href="#L-1429"><span class="linenos" data-line="1429"></span></a> <span class="c1">-- Preserve old-style implicit et al.</span> </span><span id="L-1430"><a href="#L-1430"><span class="linenos" data-line="1430"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Maximum</span><span class="p">)</span> <span class="ow">and</span> <span class="o">#</span><span class="n">a</span> <span class="o">==</span> <span class="mi">9</span> <span class="kr">then</span> </span><span id="L-1431"><a href="#L-1431"><span class="linenos" data-line="1431"></span></a> <span class="n">Maximum</span> <span class="o">=</span> <span class="mi">8</span><span class="p">;</span> </span><span id="L-1432"><a href="#L-1432"><span class="linenos" data-line="1432"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span><span class="p">,</span> <span class="p">{</span> <span class="n">seterror</span><span class="p">(</span><span class="s1">'implict_etal_author'</span><span class="p">,</span> <span class="p">{},</span> <span class="kc">true</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-1433"><a href="#L-1433"><span class="linenos" data-line="1433"></span></a> <span class="kr">elseif</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Maximum</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1434"><a href="#L-1434"><span class="linenos" data-line="1434"></span></a> <span class="n">Maximum</span> <span class="o">=</span> <span class="o">#</span><span class="n">a</span> <span class="o">+</span> <span class="mi">1</span><span class="p">;</span> </span><span id="L-1435"><a href="#L-1435"><span class="linenos" data-line="1435"></span></a> <span class="kr">end</span> </span><span id="L-1436"><a href="#L-1436"><span class="linenos" data-line="1436"></span></a> </span><span id="L-1437"><a href="#L-1437"><span class="linenos" data-line="1437"></span></a> <span class="kd">local</span> <span class="n">control</span> <span class="o">=</span> <span class="p">{</span> </span><span id="L-1438"><a href="#L-1438"><span class="linenos" data-line="1438"></span></a> <span class="n">sep</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s2">"AuthorSeparator"</span><span class="p">]</span> <span class="o">..</span> <span class="s2">" "</span><span class="p">,</span> </span><span id="L-1439"><a href="#L-1439"><span class="linenos" data-line="1439"></span></a> <span class="n">namesep</span> <span class="o">=</span> <span class="p">(</span><span class="n">first_set</span><span class="p">(</span><span class="n">A</span><span class="p">[</span><span class="s2">"AuthorNameSeparator"</span><span class="p">],</span> <span class="n">A</span><span class="p">[</span><span class="s2">"NameSeparator"</span><span class="p">])</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">)</span> <span class="o">..</span> <span class="s2">" "</span><span class="p">,</span> </span><span id="L-1440"><a href="#L-1440"><span class="linenos" data-line="1440"></span></a> <span class="n">format</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s2">"AuthorFormat"</span><span class="p">],</span> </span><span id="L-1441"><a href="#L-1441"><span class="linenos" data-line="1441"></span></a> <span class="n">maximum</span> <span class="o">=</span> <span class="n">Maximum</span><span class="p">,</span> </span><span id="L-1442"><a href="#L-1442"><span class="linenos" data-line="1442"></span></a> <span class="n">lastauthoramp</span> <span class="o">=</span> <span class="n">LastAuthorAmp</span> </span><span id="L-1443"><a href="#L-1443"><span class="linenos" data-line="1443"></span></a> <span class="p">};</span> </span><span id="L-1444"><a href="#L-1444"><span class="linenos" data-line="1444"></span></a> </span><span id="L-1445"><a href="#L-1445"><span class="linenos" data-line="1445"></span></a> <span class="c1">-- If the coauthor field is also used, prevent ampersand and et al. formatting.</span> </span><span id="L-1446"><a href="#L-1446"><span class="linenos" data-line="1446"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Coauthors</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1447"><a href="#L-1447"><span class="linenos" data-line="1447"></span></a> <span class="n">control</span><span class="p">.</span><span class="n">lastauthoramp</span> <span class="o">=</span> <span class="kc">nil</span><span class="p">;</span> </span><span id="L-1448"><a href="#L-1448"><span class="linenos" data-line="1448"></span></a> <span class="n">control</span><span class="p">.</span><span class="n">maximum</span> <span class="o">=</span> <span class="o">#</span><span class="n">a</span> <span class="o">+</span> <span class="mi">1</span><span class="p">;</span> </span><span id="L-1449"><a href="#L-1449"><span class="linenos" data-line="1449"></span></a> <span class="kr">end</span> </span><span id="L-1450"><a href="#L-1450"><span class="linenos" data-line="1450"></span></a> </span><span id="L-1451"><a href="#L-1451"><span class="linenos" data-line="1451"></span></a> <span class="n">Authors</span> <span class="o">=</span> <span class="n">listpeople</span><span class="p">(</span><span class="n">control</span><span class="p">,</span> <span class="n">a</span><span class="p">)</span> </span><span id="L-1452"><a href="#L-1452"><span class="linenos" data-line="1452"></span></a> <span class="kr">end</span> </span><span id="L-1453"><a href="#L-1453"><span class="linenos" data-line="1453"></span></a> </span><span id="L-1454"><a href="#L-1454"><span class="linenos" data-line="1454"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Authors</span><span class="p">)</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Coauthors</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- coauthors aren't displayed if one of authors=, authorn=, or lastn= isn't specified</span> </span><span id="L-1455"><a href="#L-1455"><span class="linenos" data-line="1455"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span><span class="p">,</span> <span class="p">{</span> <span class="n">seterror</span><span class="p">(</span><span class="s1">'coauthors_missing_author'</span><span class="p">,</span> <span class="p">{},</span> <span class="kc">true</span><span class="p">)</span> <span class="p">}</span> <span class="p">);</span> <span class="c1">-- emit error message</span> </span><span id="L-1456"><a href="#L-1456"><span class="linenos" data-line="1456"></span></a> <span class="kr">end</span> </span><span id="L-1457"><a href="#L-1457"><span class="linenos" data-line="1457"></span></a> </span><span id="L-1458"><a href="#L-1458"><span class="linenos" data-line="1458"></span></a> <span class="kd">local</span> <span class="n">EditorCount</span> </span><span id="L-1459"><a href="#L-1459"><span class="linenos" data-line="1459"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Editors</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1460"><a href="#L-1460"><span class="linenos" data-line="1460"></span></a> <span class="kd">local</span> <span class="n">Maximum</span> <span class="o">=</span> <span class="nb">tonumber</span><span class="p">(</span> <span class="n">A</span><span class="p">[</span><span class="s1">'DisplayEditors'</span><span class="p">]</span> <span class="p">);</span> </span><span id="L-1461"><a href="#L-1461"><span class="linenos" data-line="1461"></span></a> <span class="c1">-- Preserve old-style implicit et al.</span> </span><span id="L-1462"><a href="#L-1462"><span class="linenos" data-line="1462"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Maximum</span><span class="p">)</span> <span class="ow">and</span> <span class="o">#</span><span class="n">e</span> <span class="o">==</span> <span class="mi">4</span> <span class="kr">then</span> </span><span id="L-1463"><a href="#L-1463"><span class="linenos" data-line="1463"></span></a> <span class="n">Maximum</span> <span class="o">=</span> <span class="mi">3</span><span class="p">;</span> </span><span id="L-1464"><a href="#L-1464"><span class="linenos" data-line="1464"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span><span class="p">,</span> <span class="p">{</span> <span class="n">seterror</span><span class="p">(</span><span class="s1">'implict_etal_editor'</span><span class="p">,</span> <span class="p">{},</span> <span class="kc">true</span><span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-1465"><a href="#L-1465"><span class="linenos" data-line="1465"></span></a> <span class="kr">elseif</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Maximum</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1466"><a href="#L-1466"><span class="linenos" data-line="1466"></span></a> <span class="n">Maximum</span> <span class="o">=</span> <span class="o">#</span><span class="n">e</span> <span class="o">+</span> <span class="mi">1</span><span class="p">;</span> </span><span id="L-1467"><a href="#L-1467"><span class="linenos" data-line="1467"></span></a> <span class="kr">end</span> </span><span id="L-1468"><a href="#L-1468"><span class="linenos" data-line="1468"></span></a> </span><span id="L-1469"><a href="#L-1469"><span class="linenos" data-line="1469"></span></a> <span class="kd">local</span> <span class="n">control</span> <span class="o">=</span> <span class="p">{</span> </span><span id="L-1470"><a href="#L-1470"><span class="linenos" data-line="1470"></span></a> <span class="n">sep</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s2">"EditorSeparator"</span><span class="p">]</span> <span class="o">..</span> <span class="s2">" "</span><span class="p">,</span> </span><span id="L-1471"><a href="#L-1471"><span class="linenos" data-line="1471"></span></a> <span class="n">namesep</span> <span class="o">=</span> <span class="p">(</span><span class="n">first_set</span><span class="p">(</span><span class="n">A</span><span class="p">[</span><span class="s2">"EditorNameSeparator"</span><span class="p">],</span> <span class="n">A</span><span class="p">[</span><span class="s2">"NameSeparator"</span><span class="p">])</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">)</span> <span class="o">..</span> <span class="s2">" "</span><span class="p">,</span> </span><span id="L-1472"><a href="#L-1472"><span class="linenos" data-line="1472"></span></a> <span class="n">format</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'EditorFormat'</span><span class="p">],</span> </span><span id="L-1473"><a href="#L-1473"><span class="linenos" data-line="1473"></span></a> <span class="n">maximum</span> <span class="o">=</span> <span class="n">Maximum</span><span class="p">,</span> </span><span id="L-1474"><a href="#L-1474"><span class="linenos" data-line="1474"></span></a> <span class="n">lastauthoramp</span> <span class="o">=</span> <span class="n">LastAuthorAmp</span> </span><span id="L-1475"><a href="#L-1475"><span class="linenos" data-line="1475"></span></a> <span class="p">};</span> </span><span id="L-1476"><a href="#L-1476"><span class="linenos" data-line="1476"></span></a> </span><span id="L-1477"><a href="#L-1477"><span class="linenos" data-line="1477"></span></a> <span class="n">Editors</span><span class="p">,</span> <span class="n">EditorCount</span> <span class="o">=</span> <span class="n">listpeople</span><span class="p">(</span><span class="n">control</span><span class="p">,</span> <span class="n">e</span><span class="p">);</span> </span><span id="L-1478"><a href="#L-1478"><span class="linenos" data-line="1478"></span></a> <span class="kr">else</span> </span><span id="L-1479"><a href="#L-1479"><span class="linenos" data-line="1479"></span></a> <span class="n">EditorCount</span> <span class="o">=</span> <span class="mi">1</span><span class="p">;</span> </span><span id="L-1480"><a href="#L-1480"><span class="linenos" data-line="1480"></span></a> <span class="kr">end</span> </span><span id="L-1481"><a href="#L-1481"><span class="linenos" data-line="1481"></span></a> </span><span id="L-1482"><a href="#L-1482"><span class="linenos" data-line="1482"></span></a> <span class="kd">local</span> <span class="n">Cartography</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1483"><a href="#L-1483"><span class="linenos" data-line="1483"></span></a> <span class="kd">local</span> <span class="n">Scale</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1484"><a href="#L-1484"><span class="linenos" data-line="1484"></span></a> <span class="kr">if</span> <span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span> <span class="o">==</span> <span class="s2">"map"</span> <span class="kr">then</span> </span><span id="L-1485"><a href="#L-1485"><span class="linenos" data-line="1485"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">Authors</span> <span class="p">)</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">PublisherName</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-1486"><a href="#L-1486"><span class="linenos" data-line="1486"></span></a> <span class="n">Authors</span> <span class="o">=</span> <span class="n">PublisherName</span><span class="p">;</span> </span><span id="L-1487"><a href="#L-1487"><span class="linenos" data-line="1487"></span></a> <span class="n">PublisherName</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1488"><a href="#L-1488"><span class="linenos" data-line="1488"></span></a> <span class="kr">end</span> </span><span id="L-1489"><a href="#L-1489"><span class="linenos" data-line="1489"></span></a> <span class="n">Cartography</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Cartography'</span><span class="p">];</span> </span><span id="L-1490"><a href="#L-1490"><span class="linenos" data-line="1490"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">Cartography</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-1491"><a href="#L-1491"><span class="linenos" data-line="1491"></span></a> <span class="n">Cartography</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'cartography'</span><span class="p">,</span> <span class="n">Cartography</span><span class="p">,</span> <span class="n">use_lowercase</span> <span class="p">);</span> </span><span id="L-1492"><a href="#L-1492"><span class="linenos" data-line="1492"></span></a> <span class="kr">end</span> </span><span id="L-1493"><a href="#L-1493"><span class="linenos" data-line="1493"></span></a> <span class="n">Scale</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Scale'</span><span class="p">];</span> </span><span id="L-1494"><a href="#L-1494"><span class="linenos" data-line="1494"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">Scale</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-1495"><a href="#L-1495"><span class="linenos" data-line="1495"></span></a> <span class="n">Scale</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Scale</span><span class="p">;</span> </span><span id="L-1496"><a href="#L-1496"><span class="linenos" data-line="1496"></span></a> <span class="kr">end</span> </span><span id="L-1497"><a href="#L-1497"><span class="linenos" data-line="1497"></span></a> <span class="kr">end</span> </span><span id="L-1498"><a href="#L-1498"><span class="linenos" data-line="1498"></span></a> </span><span id="L-1499"><a href="#L-1499"><span class="linenos" data-line="1499"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">URL</span><span class="p">)</span> <span class="ow">and</span> </span><span id="L-1500"><a href="#L-1500"><span class="linenos" data-line="1500"></span></a> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ChapterURL</span><span class="p">)</span> <span class="ow">and</span> </span><span id="L-1501"><a href="#L-1501"><span class="linenos" data-line="1501"></span></a> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ArchiveURL</span><span class="p">)</span> <span class="ow">and</span> </span><span id="L-1502"><a href="#L-1502"><span class="linenos" data-line="1502"></span></a> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ConferenceURL</span><span class="p">)</span> <span class="ow">and</span> </span><span id="L-1503"><a href="#L-1503"><span class="linenos" data-line="1503"></span></a> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TranscriptURL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1504"><a href="#L-1504"><span class="linenos" data-line="1504"></span></a> </span><span id="L-1505"><a href="#L-1505"><span class="linenos" data-line="1505"></span></a> <span class="c1">-- Test if cite web or cite podcast |url= is missing or empty </span> </span><span id="L-1506"><a href="#L-1506"><span class="linenos" data-line="1506"></span></a> <span class="kr">if</span> <span class="n">inArray</span><span class="p">(</span><span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span><span class="p">,</span> <span class="p">{</span><span class="s2">"web"</span><span class="p">,</span><span class="s2">"podcast"</span><span class="p">})</span> <span class="kr">then</span> </span><span id="L-1507"><a href="#L-1507"><span class="linenos" data-line="1507"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span><span class="p">,</span> <span class="p">{</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'cite_web_url'</span><span class="p">,</span> <span class="p">{},</span> <span class="kc">true</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-1508"><a href="#L-1508"><span class="linenos" data-line="1508"></span></a> <span class="kr">end</span> </span><span id="L-1509"><a href="#L-1509"><span class="linenos" data-line="1509"></span></a> </span><span id="L-1510"><a href="#L-1510"><span class="linenos" data-line="1510"></span></a> <span class="c1">-- Test if accessdate is given without giving a URL</span> </span><span id="L-1511"><a href="#L-1511"><span class="linenos" data-line="1511"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">AccessDate</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1512"><a href="#L-1512"><span class="linenos" data-line="1512"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span><span class="p">,</span> <span class="p">{</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'accessdate_missing_url'</span><span class="p">,</span> <span class="p">{},</span> <span class="kc">true</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-1513"><a href="#L-1513"><span class="linenos" data-line="1513"></span></a> <span class="n">AccessDate</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1514"><a href="#L-1514"><span class="linenos" data-line="1514"></span></a> <span class="kr">end</span> </span><span id="L-1515"><a href="#L-1515"><span class="linenos" data-line="1515"></span></a> </span><span id="L-1516"><a href="#L-1516"><span class="linenos" data-line="1516"></span></a> <span class="c1">-- Test if format is given without giving a URL</span> </span><span id="L-1517"><a href="#L-1517"><span class="linenos" data-line="1517"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Format</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1518"><a href="#L-1518"><span class="linenos" data-line="1518"></span></a> <span class="n">Format</span> <span class="o">=</span> <span class="n">Format</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'format_missing_url'</span> <span class="p">);</span> </span><span id="L-1519"><a href="#L-1519"><span class="linenos" data-line="1519"></span></a> <span class="kr">end</span> </span><span id="L-1520"><a href="#L-1520"><span class="linenos" data-line="1520"></span></a> <span class="kr">end</span> </span><span id="L-1521"><a href="#L-1521"><span class="linenos" data-line="1521"></span></a> </span><span id="L-1522"><a href="#L-1522"><span class="linenos" data-line="1522"></span></a> <span class="c1">-- Test if citation has no title</span> </span><span id="L-1523"><a href="#L-1523"><span class="linenos" data-line="1523"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Chapter</span><span class="p">)</span> <span class="ow">and</span> </span><span id="L-1524"><a href="#L-1524"><span class="linenos" data-line="1524"></span></a> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Title</span><span class="p">)</span> <span class="ow">and</span> </span><span id="L-1525"><a href="#L-1525"><span class="linenos" data-line="1525"></span></a> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Periodical</span><span class="p">)</span> <span class="ow">and</span> </span><span id="L-1526"><a href="#L-1526"><span class="linenos" data-line="1526"></span></a> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Conference</span><span class="p">)</span> <span class="ow">and</span> </span><span id="L-1527"><a href="#L-1527"><span class="linenos" data-line="1527"></span></a> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TransTitle</span><span class="p">)</span> <span class="ow">and</span> </span><span id="L-1528"><a href="#L-1528"><span class="linenos" data-line="1528"></span></a> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TransChapter</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1529"><a href="#L-1529"><span class="linenos" data-line="1529"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span><span class="p">,</span> <span class="p">{</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'citation_missing_title'</span><span class="p">,</span> <span class="p">{},</span> <span class="kc">true</span> <span class="p">)</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-1530"><a href="#L-1530"><span class="linenos" data-line="1530"></span></a> <span class="kr">end</span> </span><span id="L-1531"><a href="#L-1531"><span class="linenos" data-line="1531"></span></a> </span><span id="L-1532"><a href="#L-1532"><span class="linenos" data-line="1532"></span></a> <span class="n">Format</span> <span class="o">=</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Format</span><span class="p">)</span> <span class="ow">and</span> <span class="s2">" ("</span> <span class="o">..</span> <span class="n">Format</span> <span class="o">..</span> <span class="s2">")"</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1533"><a href="#L-1533"><span class="linenos" data-line="1533"></span></a> </span><span id="L-1534"><a href="#L-1534"><span class="linenos" data-line="1534"></span></a> <span class="kd">local</span> <span class="n">OriginalURL</span> <span class="o">=</span> <span class="n">URL</span> </span><span id="L-1535"><a href="#L-1535"><span class="linenos" data-line="1535"></span></a> <span class="n">DeadURL</span> <span class="o">=</span> <span class="n">DeadURL</span><span class="p">:</span><span class="n">lower</span><span class="p">();</span> </span><span id="L-1536"><a href="#L-1536"><span class="linenos" data-line="1536"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">ArchiveURL</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-1537"><a href="#L-1537"><span class="linenos" data-line="1537"></span></a> <span class="kr">if</span> <span class="p">(</span> <span class="n">DeadURL</span> <span class="o">~=</span> <span class="s2">"no"</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-1538"><a href="#L-1538"><span class="linenos" data-line="1538"></span></a> <span class="n">URL</span> <span class="o">=</span> <span class="n">ArchiveURL</span> </span><span id="L-1539"><a href="#L-1539"><span class="linenos" data-line="1539"></span></a> <span class="n">URLorigin</span> <span class="o">=</span> <span class="n">A</span><span class="p">:</span><span class="n">ORIGIN</span><span class="p">(</span><span class="s1">'ArchiveURL'</span><span class="p">)</span> </span><span id="L-1540"><a href="#L-1540"><span class="linenos" data-line="1540"></span></a> <span class="kr">end</span> </span><span id="L-1541"><a href="#L-1541"><span class="linenos" data-line="1541"></span></a> <span class="kr">end</span> </span><span id="L-1542"><a href="#L-1542"><span class="linenos" data-line="1542"></span></a> </span><span id="L-1543"><a href="#L-1543"><span class="linenos" data-line="1543"></span></a> <span class="c1">-- Format chapter / article title</span> </span><span id="L-1544"><a href="#L-1544"><span class="linenos" data-line="1544"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Chapter</span><span class="p">)</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ChapterLink</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1545"><a href="#L-1545"><span class="linenos" data-line="1545"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="s2">"[["</span> <span class="o">..</span> <span class="n">ChapterLink</span> <span class="o">..</span> <span class="s2">"|"</span> <span class="o">..</span> <span class="n">Chapter</span> <span class="o">..</span> <span class="s2">"]]"</span><span class="p">;</span> </span><span id="L-1546"><a href="#L-1546"><span class="linenos" data-line="1546"></span></a> <span class="kr">end</span> </span><span id="L-1547"><a href="#L-1547"><span class="linenos" data-line="1547"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Periodical</span><span class="p">)</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Title</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1548"><a href="#L-1548"><span class="linenos" data-line="1548"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'italic-title'</span><span class="p">,</span> <span class="n">Chapter</span> <span class="p">);</span> </span><span id="L-1549"><a href="#L-1549"><span class="linenos" data-line="1549"></span></a> <span class="n">TransChapter</span> <span class="o">=</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'trans-italic-title'</span><span class="p">,</span> <span class="n">TransChapter</span> <span class="p">);</span> </span><span id="L-1550"><a href="#L-1550"><span class="linenos" data-line="1550"></span></a> <span class="kr">else</span> </span><span id="L-1551"><a href="#L-1551"><span class="linenos" data-line="1551"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">kern_quotes</span> <span class="p">(</span><span class="n">Chapter</span><span class="p">);</span> <span class="c1">-- if necessary, separate chapter title's leading and trailing quote marks from Module provided quote marks</span> </span><span id="L-1552"><a href="#L-1552"><span class="linenos" data-line="1552"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'quoted-title'</span><span class="p">,</span> <span class="n">Chapter</span> <span class="p">);</span> </span><span id="L-1553"><a href="#L-1553"><span class="linenos" data-line="1553"></span></a> <span class="n">TransChapter</span> <span class="o">=</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'trans-quoted-title'</span><span class="p">,</span> <span class="n">TransChapter</span> <span class="p">);</span> </span><span id="L-1554"><a href="#L-1554"><span class="linenos" data-line="1554"></span></a> <span class="kr">end</span> </span><span id="L-1555"><a href="#L-1555"><span class="linenos" data-line="1555"></span></a> </span><span id="L-1556"><a href="#L-1556"><span class="linenos" data-line="1556"></span></a> <span class="kd">local</span> <span class="n">TransError</span> <span class="o">=</span> <span class="s2">""</span> </span><span id="L-1557"><a href="#L-1557"><span class="linenos" data-line="1557"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TransChapter</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1558"><a href="#L-1558"><span class="linenos" data-line="1558"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Chapter</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1559"><a href="#L-1559"><span class="linenos" data-line="1559"></span></a> <span class="n">TransError</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'trans_missing_chapter'</span> <span class="p">);</span> </span><span id="L-1560"><a href="#L-1560"><span class="linenos" data-line="1560"></span></a> <span class="kr">else</span> </span><span id="L-1561"><a href="#L-1561"><span class="linenos" data-line="1561"></span></a> <span class="n">TransChapter</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">TransChapter</span><span class="p">;</span> </span><span id="L-1562"><a href="#L-1562"><span class="linenos" data-line="1562"></span></a> <span class="kr">end</span> </span><span id="L-1563"><a href="#L-1563"><span class="linenos" data-line="1563"></span></a> <span class="kr">end</span> </span><span id="L-1564"><a href="#L-1564"><span class="linenos" data-line="1564"></span></a> </span><span id="L-1565"><a href="#L-1565"><span class="linenos" data-line="1565"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">Chapter</span> <span class="o">..</span> <span class="n">TransChapter</span><span class="p">;</span> </span><span id="L-1566"><a href="#L-1566"><span class="linenos" data-line="1566"></span></a> </span><span id="L-1567"><a href="#L-1567"><span class="linenos" data-line="1567"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Chapter</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1568"><a href="#L-1568"><span class="linenos" data-line="1568"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ChapterLink</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1569"><a href="#L-1569"><span class="linenos" data-line="1569"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ChapterURL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1570"><a href="#L-1570"><span class="linenos" data-line="1570"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">ChapterURL</span><span class="p">,</span> <span class="n">Chapter</span> <span class="p">)</span> <span class="o">..</span> <span class="n">TransError</span><span class="p">;</span> </span><span id="L-1571"><a href="#L-1571"><span class="linenos" data-line="1571"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">URL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1572"><a href="#L-1572"><span class="linenos" data-line="1572"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">Chapter</span> <span class="o">..</span> <span class="n">Format</span><span class="p">;</span> </span><span id="L-1573"><a href="#L-1573"><span class="linenos" data-line="1573"></span></a> <span class="n">Format</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1574"><a href="#L-1574"><span class="linenos" data-line="1574"></span></a> <span class="kr">end</span> </span><span id="L-1575"><a href="#L-1575"><span class="linenos" data-line="1575"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">URL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1576"><a href="#L-1576"><span class="linenos" data-line="1576"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">URL</span><span class="p">,</span> <span class="n">Chapter</span> <span class="p">)</span> <span class="o">..</span> <span class="n">TransError</span> <span class="o">..</span> <span class="n">Format</span><span class="p">;</span> </span><span id="L-1577"><a href="#L-1577"><span class="linenos" data-line="1577"></span></a> <span class="n">URL</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1578"><a href="#L-1578"><span class="linenos" data-line="1578"></span></a> <span class="n">Format</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1579"><a href="#L-1579"><span class="linenos" data-line="1579"></span></a> <span class="kr">else</span> </span><span id="L-1580"><a href="#L-1580"><span class="linenos" data-line="1580"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">Chapter</span> <span class="o">..</span> <span class="n">TransError</span><span class="p">;</span> </span><span id="L-1581"><a href="#L-1581"><span class="linenos" data-line="1581"></span></a> <span class="kr">end</span> </span><span id="L-1582"><a href="#L-1582"><span class="linenos" data-line="1582"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ChapterURL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1583"><a href="#L-1583"><span class="linenos" data-line="1583"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">Chapter</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">ChapterURL</span><span class="p">,</span> <span class="kc">nil</span><span class="p">,</span> <span class="n">ChapterURLorigin</span> <span class="p">)</span> <span class="o">..</span> </span><span id="L-1584"><a href="#L-1584"><span class="linenos" data-line="1584"></span></a> <span class="n">TransError</span><span class="p">;</span> </span><span id="L-1585"><a href="#L-1585"><span class="linenos" data-line="1585"></span></a> <span class="kr">else</span> </span><span id="L-1586"><a href="#L-1586"><span class="linenos" data-line="1586"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">Chapter</span> <span class="o">..</span> <span class="n">TransError</span><span class="p">;</span> </span><span id="L-1587"><a href="#L-1587"><span class="linenos" data-line="1587"></span></a> <span class="kr">end</span> </span><span id="L-1588"><a href="#L-1588"><span class="linenos" data-line="1588"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="n">Chapter</span> <span class="o">..</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="c1">-- with end-space</span> </span><span id="L-1589"><a href="#L-1589"><span class="linenos" data-line="1589"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ChapterURL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1590"><a href="#L-1590"><span class="linenos" data-line="1590"></span></a> <span class="n">Chapter</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">ChapterURL</span><span class="p">,</span> <span class="kc">nil</span><span class="p">,</span> <span class="n">ChapterURLorigin</span> <span class="p">)</span> <span class="o">..</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span><span class="p">;</span> </span><span id="L-1591"><a href="#L-1591"><span class="linenos" data-line="1591"></span></a> <span class="kr">end</span> </span><span id="L-1592"><a href="#L-1592"><span class="linenos" data-line="1592"></span></a> </span><span id="L-1593"><a href="#L-1593"><span class="linenos" data-line="1593"></span></a> <span class="c1">-- Format main title.</span> </span><span id="L-1594"><a href="#L-1594"><span class="linenos" data-line="1594"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TitleLink</span><span class="p">)</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Title</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1595"><a href="#L-1595"><span class="linenos" data-line="1595"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="s2">"[["</span> <span class="o">..</span> <span class="n">TitleLink</span> <span class="o">..</span> <span class="s2">"|"</span> <span class="o">..</span> <span class="n">Title</span> <span class="o">..</span> <span class="s2">"]]"</span> </span><span id="L-1596"><a href="#L-1596"><span class="linenos" data-line="1596"></span></a> <span class="kr">end</span> </span><span id="L-1597"><a href="#L-1597"><span class="linenos" data-line="1597"></span></a> </span><span id="L-1598"><a href="#L-1598"><span class="linenos" data-line="1598"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Periodical</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1599"><a href="#L-1599"><span class="linenos" data-line="1599"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="n">kern_quotes</span> <span class="p">(</span><span class="n">Title</span><span class="p">);</span> <span class="c1">-- if necessary, separate title's leading and trailing quote marks from Module provided quote marks</span> </span><span id="L-1600"><a href="#L-1600"><span class="linenos" data-line="1600"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'quoted-title'</span><span class="p">,</span> <span class="n">Title</span> <span class="p">);</span> </span><span id="L-1601"><a href="#L-1601"><span class="linenos" data-line="1601"></span></a> <span class="n">TransTitle</span> <span class="o">=</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'trans-quoted-title'</span><span class="p">,</span> <span class="n">TransTitle</span> <span class="p">);</span> </span><span id="L-1602"><a href="#L-1602"><span class="linenos" data-line="1602"></span></a> <span class="kr">elseif</span> <span class="n">inArray</span><span class="p">(</span><span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span><span class="p">,</span> <span class="p">{</span><span class="s2">"web"</span><span class="p">,</span><span class="s2">"news"</span><span class="p">,</span><span class="s2">"pressrelease"</span><span class="p">,</span><span class="s2">"conference"</span><span class="p">,</span><span class="s2">"podcast"</span><span class="p">})</span> <span class="ow">and</span> </span><span id="L-1603"><a href="#L-1603"><span class="linenos" data-line="1603"></span></a> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Chapter</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1604"><a href="#L-1604"><span class="linenos" data-line="1604"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="n">kern_quotes</span> <span class="p">(</span><span class="n">Title</span><span class="p">);</span> <span class="c1">-- if necessary, separate title's leading and trailing quote marks from Module provided quote marks</span> </span><span id="L-1605"><a href="#L-1605"><span class="linenos" data-line="1605"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'quoted-title'</span><span class="p">,</span> <span class="n">Title</span> <span class="p">);</span> </span><span id="L-1606"><a href="#L-1606"><span class="linenos" data-line="1606"></span></a> <span class="n">TransTitle</span> <span class="o">=</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'trans-quoted-title'</span><span class="p">,</span> <span class="n">TransTitle</span> <span class="p">);</span> </span><span id="L-1607"><a href="#L-1607"><span class="linenos" data-line="1607"></span></a> <span class="kr">else</span> </span><span id="L-1608"><a href="#L-1608"><span class="linenos" data-line="1608"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'italic-title'</span><span class="p">,</span> <span class="n">Title</span> <span class="p">);</span> </span><span id="L-1609"><a href="#L-1609"><span class="linenos" data-line="1609"></span></a> <span class="n">TransTitle</span> <span class="o">=</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'trans-italic-title'</span><span class="p">,</span> <span class="n">TransTitle</span> <span class="p">);</span> </span><span id="L-1610"><a href="#L-1610"><span class="linenos" data-line="1610"></span></a> <span class="kr">end</span> </span><span id="L-1611"><a href="#L-1611"><span class="linenos" data-line="1611"></span></a> </span><span id="L-1612"><a href="#L-1612"><span class="linenos" data-line="1612"></span></a> <span class="n">TransError</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1613"><a href="#L-1613"><span class="linenos" data-line="1613"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TransTitle</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1614"><a href="#L-1614"><span class="linenos" data-line="1614"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Title</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1615"><a href="#L-1615"><span class="linenos" data-line="1615"></span></a> <span class="n">TransError</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'trans_missing_title'</span> <span class="p">);</span> </span><span id="L-1616"><a href="#L-1616"><span class="linenos" data-line="1616"></span></a> <span class="kr">else</span> </span><span id="L-1617"><a href="#L-1617"><span class="linenos" data-line="1617"></span></a> <span class="n">TransTitle</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">TransTitle</span><span class="p">;</span> </span><span id="L-1618"><a href="#L-1618"><span class="linenos" data-line="1618"></span></a> <span class="kr">end</span> </span><span id="L-1619"><a href="#L-1619"><span class="linenos" data-line="1619"></span></a> <span class="kr">end</span> </span><span id="L-1620"><a href="#L-1620"><span class="linenos" data-line="1620"></span></a> </span><span id="L-1621"><a href="#L-1621"><span class="linenos" data-line="1621"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="n">Title</span> <span class="o">..</span> <span class="n">TransTitle</span><span class="p">;</span> </span><span id="L-1622"><a href="#L-1622"><span class="linenos" data-line="1622"></span></a> </span><span id="L-1623"><a href="#L-1623"><span class="linenos" data-line="1623"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Title</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1624"><a href="#L-1624"><span class="linenos" data-line="1624"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TitleLink</span><span class="p">)</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">URL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1625"><a href="#L-1625"><span class="linenos" data-line="1625"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">URL</span><span class="p">,</span> <span class="n">Title</span> <span class="p">)</span> <span class="o">..</span> <span class="n">TransError</span> <span class="o">..</span> <span class="n">Format</span> </span><span id="L-1626"><a href="#L-1626"><span class="linenos" data-line="1626"></span></a> <span class="n">URL</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1627"><a href="#L-1627"><span class="linenos" data-line="1627"></span></a> <span class="n">Format</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1628"><a href="#L-1628"><span class="linenos" data-line="1628"></span></a> <span class="kr">else</span> </span><span id="L-1629"><a href="#L-1629"><span class="linenos" data-line="1629"></span></a> <span class="n">Title</span> <span class="o">=</span> <span class="n">Title</span> <span class="o">..</span> <span class="n">TransError</span><span class="p">;</span> </span><span id="L-1630"><a href="#L-1630"><span class="linenos" data-line="1630"></span></a> <span class="kr">end</span> </span><span id="L-1631"><a href="#L-1631"><span class="linenos" data-line="1631"></span></a> <span class="kr">end</span> </span><span id="L-1632"><a href="#L-1632"><span class="linenos" data-line="1632"></span></a> </span><span id="L-1633"><a href="#L-1633"><span class="linenos" data-line="1633"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Place</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1634"><a href="#L-1634"><span class="linenos" data-line="1634"></span></a> <span class="n">Place</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'written'</span><span class="p">,</span> <span class="n">Place</span><span class="p">,</span> <span class="n">use_lowercase</span> <span class="p">)</span> <span class="o">..</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span><span class="p">;</span> </span><span id="L-1635"><a href="#L-1635"><span class="linenos" data-line="1635"></span></a> <span class="kr">end</span> </span><span id="L-1636"><a href="#L-1636"><span class="linenos" data-line="1636"></span></a> </span><span id="L-1637"><a href="#L-1637"><span class="linenos" data-line="1637"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Conference</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1638"><a href="#L-1638"><span class="linenos" data-line="1638"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ConferenceURL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1639"><a href="#L-1639"><span class="linenos" data-line="1639"></span></a> <span class="n">Conference</span> <span class="o">=</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">ConferenceURL</span><span class="p">,</span> <span class="n">Conference</span> <span class="p">);</span> </span><span id="L-1640"><a href="#L-1640"><span class="linenos" data-line="1640"></span></a> <span class="kr">end</span> </span><span id="L-1641"><a href="#L-1641"><span class="linenos" data-line="1641"></span></a> <span class="n">Conference</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Conference</span> </span><span id="L-1642"><a href="#L-1642"><span class="linenos" data-line="1642"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ConferenceURL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1643"><a href="#L-1643"><span class="linenos" data-line="1643"></span></a> <span class="n">Conference</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">ConferenceURL</span><span class="p">,</span> <span class="kc">nil</span><span class="p">,</span> <span class="n">ConferenceURLorigin</span> <span class="p">);</span> </span><span id="L-1644"><a href="#L-1644"><span class="linenos" data-line="1644"></span></a> <span class="kr">end</span> </span><span id="L-1645"><a href="#L-1645"><span class="linenos" data-line="1645"></span></a> </span><span id="L-1646"><a href="#L-1646"><span class="linenos" data-line="1646"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Position</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1647"><a href="#L-1647"><span class="linenos" data-line="1647"></span></a> <span class="kd">local</span> <span class="n">Minutes</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Minutes'</span><span class="p">];</span> </span><span id="L-1648"><a href="#L-1648"><span class="linenos" data-line="1648"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Minutes</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1649"><a href="#L-1649"><span class="linenos" data-line="1649"></span></a> <span class="n">Position</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Minutes</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'minutes'</span><span class="p">];</span> </span><span id="L-1650"><a href="#L-1650"><span class="linenos" data-line="1650"></span></a> <span class="kr">else</span> </span><span id="L-1651"><a href="#L-1651"><span class="linenos" data-line="1651"></span></a> <span class="kd">local</span> <span class="n">Time</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Time'</span><span class="p">];</span> </span><span id="L-1652"><a href="#L-1652"><span class="linenos" data-line="1652"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Time</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1653"><a href="#L-1653"><span class="linenos" data-line="1653"></span></a> <span class="kd">local</span> <span class="n">TimeCaption</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'TimeCaption'</span><span class="p">]</span> </span><span id="L-1654"><a href="#L-1654"><span class="linenos" data-line="1654"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TimeCaption</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1655"><a href="#L-1655"><span class="linenos" data-line="1655"></span></a> <span class="n">TimeCaption</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'event'</span><span class="p">];</span> </span><span id="L-1656"><a href="#L-1656"><span class="linenos" data-line="1656"></span></a> <span class="kr">if</span> <span class="n">sepc</span> <span class="o">~=</span> <span class="s1">'.'</span> <span class="kr">then</span> </span><span id="L-1657"><a href="#L-1657"><span class="linenos" data-line="1657"></span></a> <span class="n">TimeCaption</span> <span class="o">=</span> <span class="n">TimeCaption</span><span class="p">:</span><span class="n">lower</span><span class="p">();</span> </span><span id="L-1658"><a href="#L-1658"><span class="linenos" data-line="1658"></span></a> <span class="kr">end</span> </span><span id="L-1659"><a href="#L-1659"><span class="linenos" data-line="1659"></span></a> <span class="kr">end</span> </span><span id="L-1660"><a href="#L-1660"><span class="linenos" data-line="1660"></span></a> <span class="n">Position</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">TimeCaption</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Time</span><span class="p">;</span> </span><span id="L-1661"><a href="#L-1661"><span class="linenos" data-line="1661"></span></a> <span class="kr">end</span> </span><span id="L-1662"><a href="#L-1662"><span class="linenos" data-line="1662"></span></a> <span class="kr">end</span> </span><span id="L-1663"><a href="#L-1663"><span class="linenos" data-line="1663"></span></a> <span class="kr">else</span> </span><span id="L-1664"><a href="#L-1664"><span class="linenos" data-line="1664"></span></a> <span class="n">Position</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Position</span><span class="p">;</span> </span><span id="L-1665"><a href="#L-1665"><span class="linenos" data-line="1665"></span></a> <span class="n">At</span> <span class="o">=</span> <span class="s1">''</span><span class="p">;</span> </span><span id="L-1666"><a href="#L-1666"><span class="linenos" data-line="1666"></span></a> <span class="kr">end</span> </span><span id="L-1667"><a href="#L-1667"><span class="linenos" data-line="1667"></span></a> </span><span id="L-1668"><a href="#L-1668"><span class="linenos" data-line="1668"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Page</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1669"><a href="#L-1669"><span class="linenos" data-line="1669"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Pages</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1670"><a href="#L-1670"><span class="linenos" data-line="1670"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Periodical</span><span class="p">)</span> <span class="ow">and</span> </span><span id="L-1671"><a href="#L-1671"><span class="linenos" data-line="1671"></span></a> <span class="ow">not</span> <span class="n">inArray</span><span class="p">(</span><span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span><span class="p">,</span> <span class="p">{</span><span class="s2">"encyclopaedia"</span><span class="p">,</span><span class="s2">"web"</span><span class="p">,</span><span class="s2">"book"</span><span class="p">,</span><span class="s2">"news"</span><span class="p">,</span><span class="s2">"podcast"</span><span class="p">})</span> <span class="kr">then</span> </span><span id="L-1672"><a href="#L-1672"><span class="linenos" data-line="1672"></span></a> <span class="n">Pages</span> <span class="o">=</span> <span class="s2">": "</span> <span class="o">..</span> <span class="n">Pages</span><span class="p">;</span> </span><span id="L-1673"><a href="#L-1673"><span class="linenos" data-line="1673"></span></a> <span class="kr">elseif</span> <span class="nb">tonumber</span><span class="p">(</span><span class="n">Pages</span><span class="p">)</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-1674"><a href="#L-1674"><span class="linenos" data-line="1674"></span></a> <span class="n">Pages</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span><span class="s2">" "</span> <span class="o">..</span> <span class="n">PPrefix</span> <span class="o">..</span> <span class="n">Pages</span><span class="p">;</span> </span><span id="L-1675"><a href="#L-1675"><span class="linenos" data-line="1675"></span></a> <span class="kr">else</span> </span><span id="L-1676"><a href="#L-1676"><span class="linenos" data-line="1676"></span></a> <span class="n">Pages</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span><span class="s2">" "</span> <span class="o">..</span> <span class="n">PPPrefix</span> <span class="o">..</span> <span class="n">Pages</span><span class="p">;</span> </span><span id="L-1677"><a href="#L-1677"><span class="linenos" data-line="1677"></span></a> <span class="kr">end</span> </span><span id="L-1678"><a href="#L-1678"><span class="linenos" data-line="1678"></span></a> <span class="kr">end</span> </span><span id="L-1679"><a href="#L-1679"><span class="linenos" data-line="1679"></span></a> <span class="kr">else</span> </span><span id="L-1680"><a href="#L-1680"><span class="linenos" data-line="1680"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Periodical</span><span class="p">)</span> <span class="ow">and</span> </span><span id="L-1681"><a href="#L-1681"><span class="linenos" data-line="1681"></span></a> <span class="ow">not</span> <span class="n">inArray</span><span class="p">(</span><span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span><span class="p">,</span> <span class="p">{</span><span class="s2">"encyclopaedia"</span><span class="p">,</span><span class="s2">"web"</span><span class="p">,</span><span class="s2">"book"</span><span class="p">,</span><span class="s2">"news"</span><span class="p">,</span><span class="s2">"podcast"</span><span class="p">})</span> <span class="kr">then</span> </span><span id="L-1682"><a href="#L-1682"><span class="linenos" data-line="1682"></span></a> <span class="n">Page</span> <span class="o">=</span> <span class="s2">": "</span> <span class="o">..</span> <span class="n">Page</span><span class="p">;</span> </span><span id="L-1683"><a href="#L-1683"><span class="linenos" data-line="1683"></span></a> <span class="kr">else</span> </span><span id="L-1684"><a href="#L-1684"><span class="linenos" data-line="1684"></span></a> <span class="n">Page</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span><span class="s2">" "</span> <span class="o">..</span> <span class="n">PPrefix</span> <span class="o">..</span> <span class="n">Page</span><span class="p">;</span> </span><span id="L-1685"><a href="#L-1685"><span class="linenos" data-line="1685"></span></a> <span class="kr">end</span> </span><span id="L-1686"><a href="#L-1686"><span class="linenos" data-line="1686"></span></a> <span class="kr">end</span> </span><span id="L-1687"><a href="#L-1687"><span class="linenos" data-line="1687"></span></a> </span><span id="L-1688"><a href="#L-1688"><span class="linenos" data-line="1688"></span></a> <span class="n">At</span> <span class="o">=</span> <span class="n">is_set</span><span class="p">(</span><span class="n">At</span><span class="p">)</span> <span class="ow">and</span> <span class="p">(</span><span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">At</span><span class="p">)</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1689"><a href="#L-1689"><span class="linenos" data-line="1689"></span></a> <span class="n">Position</span> <span class="o">=</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Position</span><span class="p">)</span> <span class="ow">and</span> <span class="p">(</span><span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Position</span><span class="p">)</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1690"><a href="#L-1690"><span class="linenos" data-line="1690"></span></a> <span class="kr">if</span> <span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span> <span class="o">==</span> <span class="s1">'map'</span> <span class="kr">then</span> </span><span id="L-1691"><a href="#L-1691"><span class="linenos" data-line="1691"></span></a> <span class="kd">local</span> <span class="n">Section</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Section'</span><span class="p">];</span> </span><span id="L-1692"><a href="#L-1692"><span class="linenos" data-line="1692"></span></a> <span class="kd">local</span> <span class="n">Inset</span> <span class="o">=</span> <span class="n">A</span><span class="p">[</span><span class="s1">'Inset'</span><span class="p">];</span> </span><span id="L-1693"><a href="#L-1693"><span class="linenos" data-line="1693"></span></a> <span class="kr">if</span> <span class="n">first_set</span><span class="p">(</span> <span class="n">Pages</span><span class="p">,</span> <span class="n">Page</span><span class="p">,</span> <span class="n">At</span> <span class="p">)</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="ow">or</span> <span class="n">sepc</span> <span class="o">~=</span> <span class="s1">'.'</span> <span class="kr">then</span> </span><span id="L-1694"><a href="#L-1694"><span class="linenos" data-line="1694"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">Section</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-1695"><a href="#L-1695"><span class="linenos" data-line="1695"></span></a> <span class="n">Section</span> <span class="o">=</span> <span class="s2">", "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'section'</span><span class="p">,</span> <span class="n">Section</span><span class="p">,</span> <span class="kc">true</span> <span class="p">);</span> </span><span id="L-1696"><a href="#L-1696"><span class="linenos" data-line="1696"></span></a> <span class="kr">end</span> </span><span id="L-1697"><a href="#L-1697"><span class="linenos" data-line="1697"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">Inset</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-1698"><a href="#L-1698"><span class="linenos" data-line="1698"></span></a> <span class="n">Inset</span> <span class="o">=</span> <span class="s2">", "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'inset'</span><span class="p">,</span> <span class="n">Inset</span><span class="p">,</span> <span class="kc">true</span> <span class="p">);</span> </span><span id="L-1699"><a href="#L-1699"><span class="linenos" data-line="1699"></span></a> <span class="kr">end</span> </span><span id="L-1700"><a href="#L-1700"><span class="linenos" data-line="1700"></span></a> <span class="kr">else</span> </span><span id="L-1701"><a href="#L-1701"><span class="linenos" data-line="1701"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">Section</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-1702"><a href="#L-1702"><span class="linenos" data-line="1702"></span></a> <span class="n">Section</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'section'</span><span class="p">,</span> <span class="n">Section</span><span class="p">,</span> <span class="n">use_lowercase</span> <span class="p">);</span> </span><span id="L-1703"><a href="#L-1703"><span class="linenos" data-line="1703"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">Inset</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-1704"><a href="#L-1704"><span class="linenos" data-line="1704"></span></a> <span class="n">Inset</span> <span class="o">=</span> <span class="s2">", "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'inset'</span><span class="p">,</span> <span class="n">Inset</span><span class="p">,</span> <span class="kc">true</span> <span class="p">);</span> </span><span id="L-1705"><a href="#L-1705"><span class="linenos" data-line="1705"></span></a> <span class="kr">end</span> </span><span id="L-1706"><a href="#L-1706"><span class="linenos" data-line="1706"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span> <span class="n">Inset</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-1707"><a href="#L-1707"><span class="linenos" data-line="1707"></span></a> <span class="n">Inset</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'inset'</span><span class="p">,</span> <span class="n">Inset</span><span class="p">,</span> <span class="n">use_lowercase</span> <span class="p">);</span> </span><span id="L-1708"><a href="#L-1708"><span class="linenos" data-line="1708"></span></a> <span class="kr">end</span> </span><span id="L-1709"><a href="#L-1709"><span class="linenos" data-line="1709"></span></a> <span class="kr">end</span> </span><span id="L-1710"><a href="#L-1710"><span class="linenos" data-line="1710"></span></a> <span class="n">At</span> <span class="o">=</span> <span class="n">At</span> <span class="o">..</span> <span class="n">Section</span> <span class="o">..</span> <span class="n">Inset</span><span class="p">;</span> </span><span id="L-1711"><a href="#L-1711"><span class="linenos" data-line="1711"></span></a> <span class="kr">end</span> </span><span id="L-1712"><a href="#L-1712"><span class="linenos" data-line="1712"></span></a> </span><span id="L-1713"><a href="#L-1713"><span class="linenos" data-line="1713"></span></a> <span class="cm">--[[Look in the list of iso639-1 language codes to see if the value provided in the language parameter matches one of them. If a match is found, </span> </span><span id="L-1714"><a href="#L-1714"><span class="linenos" data-line="1714"></span></a><span class="cm"> use that value; if not, then use the value that was provided with the language parameter.</span> </span><span id="L-1715"><a href="#L-1715"><span class="linenos" data-line="1715"></span></a><span class="cm"> </span> </span><span id="L-1716"><a href="#L-1716"><span class="linenos" data-line="1716"></span></a><span class="cm"> Categories are assigned in a manner similar to the {{xx icon}} templates - categorizes only mainspace citations and only when the language code is not 'en' (English).</span> </span><span id="L-1717"><a href="#L-1717"><span class="linenos" data-line="1717"></span></a><span class="cm"> ]]</span> </span><span id="L-1718"><a href="#L-1718"><span class="linenos" data-line="1718"></span></a> <span class="kr">if</span> <span class="n">is_set</span> <span class="p">(</span><span class="n">Language</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1719"><a href="#L-1719"><span class="linenos" data-line="1719"></span></a><span class="c1">-- local name = mw.language.fetchLanguageName( Language:lower(), "en" ); -- experiment: this seems to return correct ISO 639-1 language names</span> </span><span id="L-1720"><a href="#L-1720"><span class="linenos" data-line="1720"></span></a> <span class="kd">local</span> <span class="n">name</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">iso639_1</span><span class="p">[</span><span class="n">Language</span><span class="p">:</span><span class="n">lower</span><span class="p">()];</span> <span class="c1">-- get the language name if Language parameter has a valid iso 639-1 code</span> </span><span id="L-1721"><a href="#L-1721"><span class="linenos" data-line="1721"></span></a> <span class="kr">if</span> <span class="kc">nil</span> <span class="o">==</span> <span class="n">name</span> <span class="kr">then</span> </span><span id="L-1722"><a href="#L-1722"><span class="linenos" data-line="1722"></span></a> <span class="n">Language</span><span class="o">=</span><span class="s2">" "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'language'</span><span class="p">,</span> <span class="n">Language</span> <span class="p">);</span> <span class="c1">-- no match, use parameter's value</span> </span><span id="L-1723"><a href="#L-1723"><span class="linenos" data-line="1723"></span></a> <span class="kr">else</span> </span><span id="L-1724"><a href="#L-1724"><span class="linenos" data-line="1724"></span></a> <span class="kr">if</span> <span class="mi">0</span> <span class="o">==</span> <span class="n">this_page</span><span class="p">.</span><span class="n">namespace</span> <span class="ow">and</span> <span class="s1">'en'</span> <span class="o">~=</span> <span class="n">Language</span><span class="p">:</span><span class="n">lower</span><span class="p">()</span> <span class="kr">then</span> <span class="c1">--found a match; is this page main / article space and English not the language?</span> </span><span id="L-1725"><a href="#L-1725"><span class="linenos" data-line="1725"></span></a> <span class="n">Language</span><span class="o">=</span><span class="s2">" "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'language'</span><span class="p">,</span> <span class="n">name</span> <span class="o">..</span> <span class="s1">'[[Category:Articles with '</span> <span class="o">..</span> <span class="n">name</span> <span class="o">..</span> <span class="s1">'-language external links]]'</span> <span class="p">);</span> <span class="c1">-- in main space and not English: categorize</span> </span><span id="L-1726"><a href="#L-1726"><span class="linenos" data-line="1726"></span></a> <span class="kr">else</span> </span><span id="L-1727"><a href="#L-1727"><span class="linenos" data-line="1727"></span></a> <span class="n">Language</span><span class="o">=</span><span class="s2">" "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'language'</span><span class="p">,</span> <span class="n">name</span> <span class="p">);</span> <span class="c1">--not in mainspace or language is English so don't categorize</span> </span><span id="L-1728"><a href="#L-1728"><span class="linenos" data-line="1728"></span></a> <span class="kr">end</span> </span><span id="L-1729"><a href="#L-1729"><span class="linenos" data-line="1729"></span></a> <span class="kr">end</span> </span><span id="L-1730"><a href="#L-1730"><span class="linenos" data-line="1730"></span></a> <span class="kr">else</span> </span><span id="L-1731"><a href="#L-1731"><span class="linenos" data-line="1731"></span></a> <span class="n">Language</span><span class="o">=</span><span class="s2">""</span><span class="p">;</span> <span class="c1">-- language not specified so make sure this is an empty string;</span> </span><span id="L-1732"><a href="#L-1732"><span class="linenos" data-line="1732"></span></a> <span class="kr">end</span> </span><span id="L-1733"><a href="#L-1733"><span class="linenos" data-line="1733"></span></a> </span><span id="L-1734"><a href="#L-1734"><span class="linenos" data-line="1734"></span></a> <span class="n">Others</span> <span class="o">=</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Others</span><span class="p">)</span> <span class="ow">and</span> <span class="p">(</span><span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Others</span><span class="p">)</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1735"><a href="#L-1735"><span class="linenos" data-line="1735"></span></a> </span><span id="L-1736"><a href="#L-1736"><span class="linenos" data-line="1736"></span></a><span class="c1">-- handle type parameter for those CS1 citations that have default values</span> </span><span id="L-1737"><a href="#L-1737"><span class="linenos" data-line="1737"></span></a> </span><span id="L-1738"><a href="#L-1738"><span class="linenos" data-line="1738"></span></a> <span class="kr">if</span> <span class="n">inArray</span><span class="p">(</span><span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span><span class="p">,</span> <span class="p">{</span><span class="s2">"podcast"</span><span class="p">,</span><span class="s2">"pressrelease"</span><span class="p">,</span><span class="s2">"techreport"</span><span class="p">,</span><span class="s2">"thesis"</span><span class="p">})</span> <span class="kr">then</span> </span><span id="L-1739"><a href="#L-1739"><span class="linenos" data-line="1739"></span></a> <span class="n">TitleType</span> <span class="o">=</span> <span class="n">set_titletype</span> <span class="p">(</span><span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span><span class="p">,</span> <span class="n">TitleType</span><span class="p">);</span> </span><span id="L-1740"><a href="#L-1740"><span class="linenos" data-line="1740"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Degree</span><span class="p">)</span> <span class="ow">and</span> <span class="s2">"Thesis"</span> <span class="o">==</span> <span class="n">TitleType</span> <span class="kr">then</span> <span class="c1">-- special case for cite thesis</span> </span><span id="L-1741"><a href="#L-1741"><span class="linenos" data-line="1741"></span></a> <span class="n">TitleType</span> <span class="o">=</span> <span class="n">Degree</span> <span class="o">..</span> <span class="s2">" thesis"</span><span class="p">;</span> </span><span id="L-1742"><a href="#L-1742"><span class="linenos" data-line="1742"></span></a> <span class="kr">end</span> </span><span id="L-1743"><a href="#L-1743"><span class="linenos" data-line="1743"></span></a> <span class="kr">end</span> </span><span id="L-1744"><a href="#L-1744"><span class="linenos" data-line="1744"></span></a> </span><span id="L-1745"><a href="#L-1745"><span class="linenos" data-line="1745"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TitleType</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- if type parameter is specified</span> </span><span id="L-1746"><a href="#L-1746"><span class="linenos" data-line="1746"></span></a> <span class="n">TitleType</span> <span class="o">=</span> <span class="s2">" ("</span> <span class="o">..</span> <span class="n">TitleType</span> <span class="o">..</span> <span class="s2">")"</span><span class="p">;</span> <span class="c1">-- display it in parentheses</span> </span><span id="L-1747"><a href="#L-1747"><span class="linenos" data-line="1747"></span></a> <span class="kr">end</span> </span><span id="L-1748"><a href="#L-1748"><span class="linenos" data-line="1748"></span></a> </span><span id="L-1749"><a href="#L-1749"><span class="linenos" data-line="1749"></span></a> <span class="n">TitleNote</span> <span class="o">=</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TitleNote</span><span class="p">)</span> <span class="ow">and</span> <span class="p">(</span><span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">TitleNote</span><span class="p">)</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1750"><a href="#L-1750"><span class="linenos" data-line="1750"></span></a> <span class="n">Edition</span> <span class="o">=</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Edition</span><span class="p">)</span> <span class="ow">and</span> <span class="p">(</span><span class="s2">" "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'edition'</span><span class="p">,</span> <span class="n">Edition</span> <span class="p">))</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1751"><a href="#L-1751"><span class="linenos" data-line="1751"></span></a> <span class="n">Issue</span> <span class="o">=</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Issue</span><span class="p">)</span> <span class="ow">and</span> <span class="p">(</span><span class="s2">" ("</span> <span class="o">..</span> <span class="n">Issue</span> <span class="o">..</span> <span class="s2">")"</span><span class="p">)</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1752"><a href="#L-1752"><span class="linenos" data-line="1752"></span></a> <span class="n">Series</span> <span class="o">=</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Series</span><span class="p">)</span> <span class="ow">and</span> <span class="p">(</span><span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Series</span><span class="p">)</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1753"><a href="#L-1753"><span class="linenos" data-line="1753"></span></a> <span class="n">OrigYear</span> <span class="o">=</span> <span class="n">is_set</span><span class="p">(</span><span class="n">OrigYear</span><span class="p">)</span> <span class="ow">and</span> <span class="p">(</span><span class="s2">" ["</span> <span class="o">..</span> <span class="n">OrigYear</span> <span class="o">..</span> <span class="s2">"]"</span><span class="p">)</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1754"><a href="#L-1754"><span class="linenos" data-line="1754"></span></a> <span class="n">Agency</span> <span class="o">=</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Agency</span><span class="p">)</span> <span class="ow">and</span> <span class="p">(</span><span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Agency</span><span class="p">)</span> <span class="ow">or</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1755"><a href="#L-1755"><span class="linenos" data-line="1755"></span></a> </span><span id="L-1756"><a href="#L-1756"><span class="linenos" data-line="1756"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Volume</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1757"><a href="#L-1757"><span class="linenos" data-line="1757"></span></a> <span class="kr">if</span> <span class="p">(</span> <span class="n">mw</span><span class="p">.</span><span class="n">ustring</span><span class="p">.</span><span class="n">len</span><span class="p">(</span><span class="n">Volume</span><span class="p">)</span> <span class="o">></span> <span class="mi">4</span> <span class="p">)</span> </span><span id="L-1758"><a href="#L-1758"><span class="linenos" data-line="1758"></span></a> <span class="kr">then</span> <span class="n">Volume</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span><span class="s2">" "</span> <span class="o">..</span> <span class="n">Volume</span><span class="p">;</span> </span><span id="L-1759"><a href="#L-1759"><span class="linenos" data-line="1759"></span></a> <span class="kr">else</span> <span class="n">Volume</span> <span class="o">=</span> <span class="s2">" <b>"</span> <span class="o">..</span> <span class="n">hyphentodash</span><span class="p">(</span><span class="n">Volume</span><span class="p">)</span> <span class="o">..</span> <span class="s2">"</b>"</span><span class="p">;</span> </span><span id="L-1760"><a href="#L-1760"><span class="linenos" data-line="1760"></span></a> <span class="kr">end</span> </span><span id="L-1761"><a href="#L-1761"><span class="linenos" data-line="1761"></span></a> <span class="kr">end</span> </span><span id="L-1762"><a href="#L-1762"><span class="linenos" data-line="1762"></span></a> </span><span id="L-1763"><a href="#L-1763"><span class="linenos" data-line="1763"></span></a> <span class="c1">------------------------------------ totally unrelated data</span> </span><span id="L-1764"><a href="#L-1764"><span class="linenos" data-line="1764"></span></a> <span class="cm">--[[ Loosely mimic {{subscription required}} template; Via parameter identifies a delivery source that is not the publisher; these sources often, but not always, exist</span> </span><span id="L-1765"><a href="#L-1765"><span class="linenos" data-line="1765"></span></a><span class="cm"> behind a registration or paywall. So here, we've chosen to decouple via from subscription (via has never been part of the registration required template).</span> </span><span id="L-1766"><a href="#L-1766"><span class="linenos" data-line="1766"></span></a><span class="cm"> </span> </span><span id="L-1767"><a href="#L-1767"><span class="linenos" data-line="1767"></span></a><span class="cm"> Subscription implies paywall; Registration does not. If both are used in a citation, the subscription required link note is displayed. There are no error messages for this condition.</span> </span><span id="L-1768"><a href="#L-1768"><span class="linenos" data-line="1768"></span></a><span class="cm"> ]]</span> </span><span id="L-1769"><a href="#L-1769"><span class="linenos" data-line="1769"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Via</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1770"><a href="#L-1770"><span class="linenos" data-line="1770"></span></a> <span class="n">Via</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'via'</span><span class="p">,</span> <span class="n">Via</span> <span class="p">);</span> </span><span id="L-1771"><a href="#L-1771"><span class="linenos" data-line="1771"></span></a> <span class="kr">end</span> </span><span id="L-1772"><a href="#L-1772"><span class="linenos" data-line="1772"></span></a> </span><span id="L-1773"><a href="#L-1773"><span class="linenos" data-line="1773"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">SubscriptionRequired</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1774"><a href="#L-1774"><span class="linenos" data-line="1774"></span></a> <span class="n">SubscriptionRequired</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'subscription'</span><span class="p">];</span> <span class="c1">--here when 'via' parameter not used but 'subscription' is</span> </span><span id="L-1775"><a href="#L-1775"><span class="linenos" data-line="1775"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">RegistrationRequired</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1776"><a href="#L-1776"><span class="linenos" data-line="1776"></span></a> <span class="n">SubscriptionRequired</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'registration'</span><span class="p">];</span> <span class="c1">--here when 'via' and 'subscription' parameters not used but 'registration' is</span> </span><span id="L-1777"><a href="#L-1777"><span class="linenos" data-line="1777"></span></a> <span class="kr">end</span> </span><span id="L-1778"><a href="#L-1778"><span class="linenos" data-line="1778"></span></a> </span><span id="L-1779"><a href="#L-1779"><span class="linenos" data-line="1779"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">AccessDate</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1780"><a href="#L-1780"><span class="linenos" data-line="1780"></span></a> <span class="kd">local</span> <span class="n">retrv_text</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'retrieved'</span><span class="p">]</span> </span><span id="L-1781"><a href="#L-1781"><span class="linenos" data-line="1781"></span></a> <span class="kr">if</span> <span class="p">(</span><span class="n">sepc</span> <span class="o">~=</span> <span class="s2">"."</span><span class="p">)</span> <span class="kr">then</span> <span class="n">retrv_text</span> <span class="o">=</span> <span class="n">retrv_text</span><span class="p">:</span><span class="n">lower</span><span class="p">()</span> <span class="kr">end</span> </span><span id="L-1782"><a href="#L-1782"><span class="linenos" data-line="1782"></span></a> <span class="n">AccessDate</span> <span class="o">=</span> <span class="s1">'<span class="reference-accessdate">'</span> <span class="o">..</span> <span class="n">sepc</span> </span><span id="L-1783"><a href="#L-1783"><span class="linenos" data-line="1783"></span></a> <span class="o">..</span> <span class="n">substitute</span><span class="p">(</span> <span class="n">retrv_text</span><span class="p">,</span> <span class="p">{</span><span class="n">AccessDate</span><span class="p">}</span> <span class="p">)</span> <span class="o">..</span> <span class="s1">'</span>'</span> </span><span id="L-1784"><a href="#L-1784"><span class="linenos" data-line="1784"></span></a> <span class="kr">end</span> </span><span id="L-1785"><a href="#L-1785"><span class="linenos" data-line="1785"></span></a> </span><span id="L-1786"><a href="#L-1786"><span class="linenos" data-line="1786"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ID</span><span class="p">)</span> <span class="kr">then</span> <span class="n">ID</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span><span class="s2">" "</span><span class="o">..</span> <span class="n">ID</span><span class="p">;</span> <span class="kr">end</span> </span><span id="L-1787"><a href="#L-1787"><span class="linenos" data-line="1787"></span></a> <span class="kr">if</span> <span class="s2">"thesis"</span> <span class="o">==</span> <span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Docket</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1788"><a href="#L-1788"><span class="linenos" data-line="1788"></span></a> <span class="n">ID</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span><span class="s2">" Docket "</span><span class="o">..</span> <span class="n">Docket</span> <span class="o">..</span> <span class="n">ID</span><span class="p">;</span> </span><span id="L-1789"><a href="#L-1789"><span class="linenos" data-line="1789"></span></a> <span class="kr">end</span> </span><span id="L-1790"><a href="#L-1790"><span class="linenos" data-line="1790"></span></a> </span><span id="L-1791"><a href="#L-1791"><span class="linenos" data-line="1791"></span></a> </span><span id="L-1792"><a href="#L-1792"><span class="linenos" data-line="1792"></span></a> <span class="n">ID_list</span> <span class="o">=</span> <span class="n">buildidlist</span><span class="p">(</span> <span class="n">ID_list</span><span class="p">,</span> <span class="p">{</span><span class="n">DoiBroken</span> <span class="o">=</span> <span class="n">DoiBroken</span><span class="p">,</span> <span class="n">ASINTLD</span> <span class="o">=</span> <span class="n">ASINTLD</span><span class="p">,</span> <span class="n">IgnoreISBN</span> <span class="o">=</span> <span class="n">IgnoreISBN</span><span class="p">,</span> <span class="n">Embargo</span><span class="o">=</span><span class="n">Embargo</span><span class="p">}</span> <span class="p">);</span> </span><span id="L-1793"><a href="#L-1793"><span class="linenos" data-line="1793"></span></a> </span><span id="L-1794"><a href="#L-1794"><span class="linenos" data-line="1794"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">URL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1795"><a href="#L-1795"><span class="linenos" data-line="1795"></span></a> <span class="n">URL</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">URL</span><span class="p">,</span> <span class="kc">nil</span><span class="p">,</span> <span class="n">URLorigin</span> <span class="p">);</span> </span><span id="L-1796"><a href="#L-1796"><span class="linenos" data-line="1796"></span></a> <span class="kr">end</span> </span><span id="L-1797"><a href="#L-1797"><span class="linenos" data-line="1797"></span></a> </span><span id="L-1798"><a href="#L-1798"><span class="linenos" data-line="1798"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Quote</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1799"><a href="#L-1799"><span class="linenos" data-line="1799"></span></a> <span class="kr">if</span> <span class="n">Quote</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="s1">'"'</span> <span class="ow">and</span> <span class="n">Quote</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="o">-</span><span class="mi">1</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="s1">'"'</span> <span class="kr">then</span> </span><span id="L-1800"><a href="#L-1800"><span class="linenos" data-line="1800"></span></a> <span class="n">Quote</span> <span class="o">=</span> <span class="n">Quote</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="o">-</span><span class="mi">2</span><span class="p">);</span> </span><span id="L-1801"><a href="#L-1801"><span class="linenos" data-line="1801"></span></a> <span class="kr">end</span> </span><span id="L-1802"><a href="#L-1802"><span class="linenos" data-line="1802"></span></a> <span class="n">Quote</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span><span class="s2">" "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'quoted-text'</span><span class="p">,</span> <span class="n">Quote</span> <span class="p">);</span> </span><span id="L-1803"><a href="#L-1803"><span class="linenos" data-line="1803"></span></a> <span class="n">PostScript</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1804"><a href="#L-1804"><span class="linenos" data-line="1804"></span></a> <span class="kr">elseif</span> <span class="n">PostScript</span><span class="p">:</span><span class="n">lower</span><span class="p">()</span> <span class="o">==</span> <span class="s2">"none"</span> <span class="kr">then</span> </span><span id="L-1805"><a href="#L-1805"><span class="linenos" data-line="1805"></span></a> <span class="n">PostScript</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1806"><a href="#L-1806"><span class="linenos" data-line="1806"></span></a> <span class="kr">end</span> </span><span id="L-1807"><a href="#L-1807"><span class="linenos" data-line="1807"></span></a> </span><span id="L-1808"><a href="#L-1808"><span class="linenos" data-line="1808"></span></a> <span class="kd">local</span> <span class="n">Archived</span> </span><span id="L-1809"><a href="#L-1809"><span class="linenos" data-line="1809"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ArchiveURL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1810"><a href="#L-1810"><span class="linenos" data-line="1810"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">ArchiveDate</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1811"><a href="#L-1811"><span class="linenos" data-line="1811"></span></a> <span class="n">ArchiveDate</span> <span class="o">=</span> <span class="n">seterror</span><span class="p">(</span><span class="s1">'archive_missing_date'</span><span class="p">);</span> </span><span id="L-1812"><a href="#L-1812"><span class="linenos" data-line="1812"></span></a> <span class="kr">end</span> </span><span id="L-1813"><a href="#L-1813"><span class="linenos" data-line="1813"></span></a> <span class="kr">if</span> <span class="s2">"no"</span> <span class="o">==</span> <span class="n">DeadURL</span> <span class="kr">then</span> </span><span id="L-1814"><a href="#L-1814"><span class="linenos" data-line="1814"></span></a> <span class="kd">local</span> <span class="n">arch_text</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'archived'</span><span class="p">];</span> </span><span id="L-1815"><a href="#L-1815"><span class="linenos" data-line="1815"></span></a> <span class="kr">if</span> <span class="n">sepc</span> <span class="o">~=</span> <span class="s2">"."</span> <span class="kr">then</span> <span class="n">arch_text</span> <span class="o">=</span> <span class="n">arch_text</span><span class="p">:</span><span class="n">lower</span><span class="p">()</span> <span class="kr">end</span> </span><span id="L-1816"><a href="#L-1816"><span class="linenos" data-line="1816"></span></a> <span class="n">Archived</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">substitute</span><span class="p">(</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'archived-not-dead'</span><span class="p">],</span> </span><span id="L-1817"><a href="#L-1817"><span class="linenos" data-line="1817"></span></a> <span class="p">{</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">ArchiveURL</span><span class="p">,</span> <span class="n">arch_text</span> <span class="p">),</span> <span class="n">ArchiveDate</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-1818"><a href="#L-1818"><span class="linenos" data-line="1818"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">is_set</span><span class="p">(</span><span class="n">OriginalURL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1819"><a href="#L-1819"><span class="linenos" data-line="1819"></span></a> <span class="n">Archived</span> <span class="o">=</span> <span class="n">Archived</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">seterror</span><span class="p">(</span><span class="s1">'archive_missing_url'</span><span class="p">);</span> </span><span id="L-1820"><a href="#L-1820"><span class="linenos" data-line="1820"></span></a> <span class="kr">end</span> </span><span id="L-1821"><a href="#L-1821"><span class="linenos" data-line="1821"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">OriginalURL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1822"><a href="#L-1822"><span class="linenos" data-line="1822"></span></a> <span class="kd">local</span> <span class="n">arch_text</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'archived-dead'</span><span class="p">];</span> </span><span id="L-1823"><a href="#L-1823"><span class="linenos" data-line="1823"></span></a> <span class="kr">if</span> <span class="n">sepc</span> <span class="o">~=</span> <span class="s2">"."</span> <span class="kr">then</span> <span class="n">arch_text</span> <span class="o">=</span> <span class="n">arch_text</span><span class="p">:</span><span class="n">lower</span><span class="p">()</span> <span class="kr">end</span> </span><span id="L-1824"><a href="#L-1824"><span class="linenos" data-line="1824"></span></a> <span class="n">Archived</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">substitute</span><span class="p">(</span> <span class="n">arch_text</span><span class="p">,</span> </span><span id="L-1825"><a href="#L-1825"><span class="linenos" data-line="1825"></span></a> <span class="p">{</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">OriginalURL</span><span class="p">,</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'original'</span><span class="p">]</span> <span class="p">),</span> <span class="n">ArchiveDate</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-1826"><a href="#L-1826"><span class="linenos" data-line="1826"></span></a> <span class="kr">else</span> </span><span id="L-1827"><a href="#L-1827"><span class="linenos" data-line="1827"></span></a> <span class="kd">local</span> <span class="n">arch_text</span> <span class="o">=</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'archived-missing'</span><span class="p">];</span> </span><span id="L-1828"><a href="#L-1828"><span class="linenos" data-line="1828"></span></a> <span class="kr">if</span> <span class="n">sepc</span> <span class="o">~=</span> <span class="s2">"."</span> <span class="kr">then</span> <span class="n">arch_text</span> <span class="o">=</span> <span class="n">arch_text</span><span class="p">:</span><span class="n">lower</span><span class="p">()</span> <span class="kr">end</span> </span><span id="L-1829"><a href="#L-1829"><span class="linenos" data-line="1829"></span></a> <span class="n">Archived</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">substitute</span><span class="p">(</span> <span class="n">arch_text</span><span class="p">,</span> </span><span id="L-1830"><a href="#L-1830"><span class="linenos" data-line="1830"></span></a> <span class="p">{</span> <span class="n">seterror</span><span class="p">(</span><span class="s1">'archive_missing_url'</span><span class="p">),</span> <span class="n">ArchiveDate</span> <span class="p">}</span> <span class="p">);</span> </span><span id="L-1831"><a href="#L-1831"><span class="linenos" data-line="1831"></span></a> <span class="kr">end</span> </span><span id="L-1832"><a href="#L-1832"><span class="linenos" data-line="1832"></span></a> <span class="kr">else</span> </span><span id="L-1833"><a href="#L-1833"><span class="linenos" data-line="1833"></span></a> <span class="n">Archived</span> <span class="o">=</span> <span class="s2">""</span> </span><span id="L-1834"><a href="#L-1834"><span class="linenos" data-line="1834"></span></a> <span class="kr">end</span> </span><span id="L-1835"><a href="#L-1835"><span class="linenos" data-line="1835"></span></a> </span><span id="L-1836"><a href="#L-1836"><span class="linenos" data-line="1836"></span></a> <span class="kd">local</span> <span class="n">Lay</span> </span><span id="L-1837"><a href="#L-1837"><span class="linenos" data-line="1837"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">LayURL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1838"><a href="#L-1838"><span class="linenos" data-line="1838"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">LayDate</span><span class="p">)</span> <span class="kr">then</span> <span class="n">LayDate</span> <span class="o">=</span> <span class="s2">" ("</span> <span class="o">..</span> <span class="n">LayDate</span> <span class="o">..</span> <span class="s2">")"</span> <span class="kr">end</span> </span><span id="L-1839"><a href="#L-1839"><span class="linenos" data-line="1839"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">LaySource</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1840"><a href="#L-1840"><span class="linenos" data-line="1840"></span></a> <span class="n">LaySource</span> <span class="o">=</span> <span class="s2">" &ndash; ''"</span> <span class="o">..</span> <span class="n">safeforitalics</span><span class="p">(</span><span class="n">LaySource</span><span class="p">)</span> <span class="o">..</span> <span class="s2">"''"</span><span class="p">;</span> </span><span id="L-1841"><a href="#L-1841"><span class="linenos" data-line="1841"></span></a> <span class="kr">else</span> </span><span id="L-1842"><a href="#L-1842"><span class="linenos" data-line="1842"></span></a> <span class="n">LaySource</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1843"><a href="#L-1843"><span class="linenos" data-line="1843"></span></a> <span class="kr">end</span> </span><span id="L-1844"><a href="#L-1844"><span class="linenos" data-line="1844"></span></a> <span class="kr">if</span> <span class="n">sepc</span> <span class="o">==</span> <span class="s1">'.'</span> <span class="kr">then</span> </span><span id="L-1845"><a href="#L-1845"><span class="linenos" data-line="1845"></span></a> <span class="n">Lay</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">LayURL</span><span class="p">,</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'lay summary'</span><span class="p">]</span> <span class="p">)</span> <span class="o">..</span> <span class="n">LaySource</span> <span class="o">..</span> <span class="n">LayDate</span> </span><span id="L-1846"><a href="#L-1846"><span class="linenos" data-line="1846"></span></a> <span class="kr">else</span> </span><span id="L-1847"><a href="#L-1847"><span class="linenos" data-line="1847"></span></a> <span class="n">Lay</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">LayURL</span><span class="p">,</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'lay summary'</span><span class="p">]:</span><span class="n">lower</span><span class="p">()</span> <span class="p">)</span> <span class="o">..</span> <span class="n">LaySource</span> <span class="o">..</span> <span class="n">LayDate</span> </span><span id="L-1848"><a href="#L-1848"><span class="linenos" data-line="1848"></span></a> <span class="kr">end</span> </span><span id="L-1849"><a href="#L-1849"><span class="linenos" data-line="1849"></span></a> <span class="kr">else</span> </span><span id="L-1850"><a href="#L-1850"><span class="linenos" data-line="1850"></span></a> <span class="n">Lay</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1851"><a href="#L-1851"><span class="linenos" data-line="1851"></span></a> <span class="kr">end</span> </span><span id="L-1852"><a href="#L-1852"><span class="linenos" data-line="1852"></span></a> </span><span id="L-1853"><a href="#L-1853"><span class="linenos" data-line="1853"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Transcript</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1854"><a href="#L-1854"><span class="linenos" data-line="1854"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TranscriptURL</span><span class="p">)</span> <span class="kr">then</span> <span class="n">Transcript</span> <span class="o">=</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">TranscriptURL</span><span class="p">,</span> <span class="n">Transcript</span> <span class="p">);</span> <span class="kr">end</span> </span><span id="L-1855"><a href="#L-1855"><span class="linenos" data-line="1855"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TranscriptURL</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1856"><a href="#L-1856"><span class="linenos" data-line="1856"></span></a> <span class="n">Transcript</span> <span class="o">=</span> <span class="n">externallink</span><span class="p">(</span> <span class="n">TranscriptURL</span><span class="p">,</span> <span class="kc">nil</span><span class="p">,</span> <span class="n">TranscriptURLorigin</span> <span class="p">);</span> </span><span id="L-1857"><a href="#L-1857"><span class="linenos" data-line="1857"></span></a> <span class="kr">end</span> </span><span id="L-1858"><a href="#L-1858"><span class="linenos" data-line="1858"></span></a> </span><span id="L-1859"><a href="#L-1859"><span class="linenos" data-line="1859"></span></a> <span class="kd">local</span> <span class="n">Publisher</span><span class="p">;</span> </span><span id="L-1860"><a href="#L-1860"><span class="linenos" data-line="1860"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Periodical</span><span class="p">)</span> <span class="ow">and</span> </span><span id="L-1861"><a href="#L-1861"><span class="linenos" data-line="1861"></span></a> <span class="ow">not</span> <span class="n">inArray</span><span class="p">(</span><span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span><span class="p">,</span> <span class="p">{</span><span class="s2">"encyclopaedia"</span><span class="p">,</span><span class="s2">"web"</span><span class="p">,</span><span class="s2">"pressrelease"</span><span class="p">,</span><span class="s2">"podcast"</span><span class="p">})</span> <span class="kr">then</span> </span><span id="L-1862"><a href="#L-1862"><span class="linenos" data-line="1862"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">PublisherName</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1863"><a href="#L-1863"><span class="linenos" data-line="1863"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">PublicationPlace</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1864"><a href="#L-1864"><span class="linenos" data-line="1864"></span></a> <span class="n">Publisher</span> <span class="o">=</span> <span class="n">PublicationPlace</span> <span class="o">..</span> <span class="s2">": "</span> <span class="o">..</span> <span class="n">PublisherName</span><span class="p">;</span> </span><span id="L-1865"><a href="#L-1865"><span class="linenos" data-line="1865"></span></a> <span class="kr">else</span> </span><span id="L-1866"><a href="#L-1866"><span class="linenos" data-line="1866"></span></a> <span class="n">Publisher</span> <span class="o">=</span> <span class="n">PublisherName</span><span class="p">;</span> </span><span id="L-1867"><a href="#L-1867"><span class="linenos" data-line="1867"></span></a> <span class="kr">end</span> </span><span id="L-1868"><a href="#L-1868"><span class="linenos" data-line="1868"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">PublicationPlace</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1869"><a href="#L-1869"><span class="linenos" data-line="1869"></span></a> <span class="n">Publisher</span><span class="o">=</span> <span class="n">PublicationPlace</span><span class="p">;</span> </span><span id="L-1870"><a href="#L-1870"><span class="linenos" data-line="1870"></span></a> <span class="kr">else</span> </span><span id="L-1871"><a href="#L-1871"><span class="linenos" data-line="1871"></span></a> <span class="n">Publisher</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1872"><a href="#L-1872"><span class="linenos" data-line="1872"></span></a> <span class="kr">end</span> </span><span id="L-1873"><a href="#L-1873"><span class="linenos" data-line="1873"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">PublicationDate</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1874"><a href="#L-1874"><span class="linenos" data-line="1874"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Publisher</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1875"><a href="#L-1875"><span class="linenos" data-line="1875"></span></a> <span class="n">Publisher</span> <span class="o">=</span> <span class="n">Publisher</span> <span class="o">..</span> <span class="s2">", "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'published'</span><span class="p">,</span> <span class="n">PublicationDate</span> <span class="p">);</span> </span><span id="L-1876"><a href="#L-1876"><span class="linenos" data-line="1876"></span></a> <span class="kr">else</span> </span><span id="L-1877"><a href="#L-1877"><span class="linenos" data-line="1877"></span></a> <span class="n">Publisher</span> <span class="o">=</span> <span class="n">PublicationDate</span><span class="p">;</span> </span><span id="L-1878"><a href="#L-1878"><span class="linenos" data-line="1878"></span></a> <span class="kr">end</span> </span><span id="L-1879"><a href="#L-1879"><span class="linenos" data-line="1879"></span></a> <span class="kr">end</span> </span><span id="L-1880"><a href="#L-1880"><span class="linenos" data-line="1880"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Publisher</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1881"><a href="#L-1881"><span class="linenos" data-line="1881"></span></a> <span class="n">Publisher</span> <span class="o">=</span> <span class="s2">" ("</span> <span class="o">..</span> <span class="n">Publisher</span> <span class="o">..</span> <span class="s2">")"</span><span class="p">;</span> </span><span id="L-1882"><a href="#L-1882"><span class="linenos" data-line="1882"></span></a> <span class="kr">end</span> </span><span id="L-1883"><a href="#L-1883"><span class="linenos" data-line="1883"></span></a> <span class="kr">else</span> </span><span id="L-1884"><a href="#L-1884"><span class="linenos" data-line="1884"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">PublicationDate</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1885"><a href="#L-1885"><span class="linenos" data-line="1885"></span></a> <span class="n">PublicationDate</span> <span class="o">=</span> <span class="s2">" ("</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'published'</span><span class="p">,</span> <span class="n">PublicationDate</span> <span class="p">)</span> <span class="o">..</span> <span class="s2">")"</span><span class="p">;</span> </span><span id="L-1886"><a href="#L-1886"><span class="linenos" data-line="1886"></span></a> <span class="kr">end</span> </span><span id="L-1887"><a href="#L-1887"><span class="linenos" data-line="1887"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">PublisherName</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1888"><a href="#L-1888"><span class="linenos" data-line="1888"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">PublicationPlace</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1889"><a href="#L-1889"><span class="linenos" data-line="1889"></span></a> <span class="n">Publisher</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">PublicationPlace</span> <span class="o">..</span> <span class="s2">": "</span> <span class="o">..</span> <span class="n">PublisherName</span> <span class="o">..</span> <span class="n">PublicationDate</span><span class="p">;</span> </span><span id="L-1890"><a href="#L-1890"><span class="linenos" data-line="1890"></span></a> <span class="kr">else</span> </span><span id="L-1891"><a href="#L-1891"><span class="linenos" data-line="1891"></span></a> <span class="n">Publisher</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">PublisherName</span> <span class="o">..</span> <span class="n">PublicationDate</span><span class="p">;</span> </span><span id="L-1892"><a href="#L-1892"><span class="linenos" data-line="1892"></span></a> <span class="kr">end</span> </span><span id="L-1893"><a href="#L-1893"><span class="linenos" data-line="1893"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">PublicationPlace</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1894"><a href="#L-1894"><span class="linenos" data-line="1894"></span></a> <span class="n">Publisher</span><span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">PublicationPlace</span> <span class="o">..</span> <span class="n">PublicationDate</span><span class="p">;</span> </span><span id="L-1895"><a href="#L-1895"><span class="linenos" data-line="1895"></span></a> <span class="kr">else</span> </span><span id="L-1896"><a href="#L-1896"><span class="linenos" data-line="1896"></span></a> <span class="n">Publisher</span> <span class="o">=</span> <span class="n">PublicationDate</span><span class="p">;</span> </span><span id="L-1897"><a href="#L-1897"><span class="linenos" data-line="1897"></span></a> <span class="kr">end</span> </span><span id="L-1898"><a href="#L-1898"><span class="linenos" data-line="1898"></span></a> <span class="kr">end</span> </span><span id="L-1899"><a href="#L-1899"><span class="linenos" data-line="1899"></span></a> </span><span id="L-1900"><a href="#L-1900"><span class="linenos" data-line="1900"></span></a> <span class="c1">-- Several of the above rely upon detecting this as nil, so do it last.</span> </span><span id="L-1901"><a href="#L-1901"><span class="linenos" data-line="1901"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Periodical</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1902"><a href="#L-1902"><span class="linenos" data-line="1902"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Title</span><span class="p">)</span> <span class="ow">or</span> <span class="n">is_set</span><span class="p">(</span><span class="n">TitleNote</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1903"><a href="#L-1903"><span class="linenos" data-line="1903"></span></a> <span class="n">Periodical</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'italic-title'</span><span class="p">,</span> <span class="n">Periodical</span> <span class="p">)</span> </span><span id="L-1904"><a href="#L-1904"><span class="linenos" data-line="1904"></span></a> <span class="kr">else</span> </span><span id="L-1905"><a href="#L-1905"><span class="linenos" data-line="1905"></span></a> <span class="n">Periodical</span> <span class="o">=</span> <span class="n">wrap</span><span class="p">(</span> <span class="s1">'italic-title'</span><span class="p">,</span> <span class="n">Periodical</span> <span class="p">)</span> </span><span id="L-1906"><a href="#L-1906"><span class="linenos" data-line="1906"></span></a> <span class="kr">end</span> </span><span id="L-1907"><a href="#L-1907"><span class="linenos" data-line="1907"></span></a> <span class="kr">end</span> </span><span id="L-1908"><a href="#L-1908"><span class="linenos" data-line="1908"></span></a> </span><span id="L-1909"><a href="#L-1909"><span class="linenos" data-line="1909"></span></a><span class="cm">--[[</span> </span><span id="L-1910"><a href="#L-1910"><span class="linenos" data-line="1910"></span></a><span class="cm">Handle the oddity that is cite speech. This code overrides whatever may be the value assigned to TitleNote (through |department=) and forces it to be " (Speech)" so that</span> </span><span id="L-1911"><a href="#L-1911"><span class="linenos" data-line="1911"></span></a><span class="cm">the annotation directly follows the |title= parameter value in the citation rather than the |event= parameter value (if provided).</span> </span><span id="L-1912"><a href="#L-1912"><span class="linenos" data-line="1912"></span></a><span class="cm">]]</span> </span><span id="L-1913"><a href="#L-1913"><span class="linenos" data-line="1913"></span></a> <span class="kr">if</span> <span class="s2">"speech"</span> <span class="o">==</span> <span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span> <span class="kr">then</span> <span class="c1">-- cite speech only</span> </span><span id="L-1914"><a href="#L-1914"><span class="linenos" data-line="1914"></span></a> <span class="n">TitleNote</span> <span class="o">=</span> <span class="s2">" (Speech)"</span><span class="p">;</span> <span class="c1">-- annotate the citation</span> </span><span id="L-1915"><a href="#L-1915"><span class="linenos" data-line="1915"></span></a> <span class="kr">if</span> <span class="n">is_set</span> <span class="p">(</span><span class="n">Periodical</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- if Periodical, perhaps because of an included |website= or |journal= parameter </span> </span><span id="L-1916"><a href="#L-1916"><span class="linenos" data-line="1916"></span></a> <span class="kr">if</span> <span class="n">is_set</span> <span class="p">(</span><span class="n">Conference</span><span class="p">)</span> <span class="kr">then</span> <span class="c1">-- and if |event= is set</span> </span><span id="L-1917"><a href="#L-1917"><span class="linenos" data-line="1917"></span></a> <span class="n">Conference</span> <span class="o">=</span> <span class="n">Conference</span> <span class="o">..</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span><span class="p">;</span> <span class="c1">-- then add appropriate punctuation to the end of the Conference variable before rendering</span> </span><span id="L-1918"><a href="#L-1918"><span class="linenos" data-line="1918"></span></a> <span class="kr">end</span> </span><span id="L-1919"><a href="#L-1919"><span class="linenos" data-line="1919"></span></a> <span class="kr">end</span> </span><span id="L-1920"><a href="#L-1920"><span class="linenos" data-line="1920"></span></a> <span class="kr">end</span> </span><span id="L-1921"><a href="#L-1921"><span class="linenos" data-line="1921"></span></a> </span><span id="L-1922"><a href="#L-1922"><span class="linenos" data-line="1922"></span></a> <span class="c1">-- Piece all bits together at last. Here, all should be non-nil.</span> </span><span id="L-1923"><a href="#L-1923"><span class="linenos" data-line="1923"></span></a> <span class="c1">-- We build things this way because it is more efficient in LUA</span> </span><span id="L-1924"><a href="#L-1924"><span class="linenos" data-line="1924"></span></a> <span class="c1">-- not to keep reassigning to the same string variable over and over.</span> </span><span id="L-1925"><a href="#L-1925"><span class="linenos" data-line="1925"></span></a> </span><span id="L-1926"><a href="#L-1926"><span class="linenos" data-line="1926"></span></a> <span class="kd">local</span> <span class="n">tcommon</span> </span><span id="L-1927"><a href="#L-1927"><span class="linenos" data-line="1927"></span></a> <span class="kr">if</span> <span class="n">inArray</span><span class="p">(</span><span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span><span class="p">,</span> <span class="p">{</span><span class="s2">"journal"</span><span class="p">,</span><span class="s2">"citation"</span><span class="p">})</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Periodical</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1928"><a href="#L-1928"><span class="linenos" data-line="1928"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Others</span><span class="p">)</span> <span class="kr">then</span> <span class="n">Others</span> <span class="o">=</span> <span class="n">Others</span> <span class="o">..</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="kr">end</span> </span><span id="L-1929"><a href="#L-1929"><span class="linenos" data-line="1929"></span></a> <span class="n">tcommon</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span><span class="n">Others</span><span class="p">,</span> <span class="n">Title</span><span class="p">,</span> <span class="n">TitleNote</span><span class="p">,</span> <span class="n">Conference</span><span class="p">,</span> <span class="n">Periodical</span><span class="p">,</span> <span class="n">Format</span><span class="p">,</span> <span class="n">TitleType</span><span class="p">,</span> <span class="n">Scale</span><span class="p">,</span> <span class="n">Series</span><span class="p">,</span> </span><span id="L-1930"><a href="#L-1930"><span class="linenos" data-line="1930"></span></a> <span class="n">Language</span><span class="p">,</span> <span class="n">Cartography</span><span class="p">,</span> <span class="n">Edition</span><span class="p">,</span> <span class="n">Publisher</span><span class="p">,</span> <span class="n">Agency</span><span class="p">,</span> <span class="n">Volume</span><span class="p">,</span> <span class="n">Issue</span><span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-1931"><a href="#L-1931"><span class="linenos" data-line="1931"></span></a> <span class="kr">else</span> </span><span id="L-1932"><a href="#L-1932"><span class="linenos" data-line="1932"></span></a> <span class="n">tcommon</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span><span class="n">Title</span><span class="p">,</span> <span class="n">TitleNote</span><span class="p">,</span> <span class="n">Conference</span><span class="p">,</span> <span class="n">Periodical</span><span class="p">,</span> <span class="n">Format</span><span class="p">,</span> <span class="n">TitleType</span><span class="p">,</span> <span class="n">Scale</span><span class="p">,</span> <span class="n">Series</span><span class="p">,</span> <span class="n">Language</span><span class="p">,</span> </span><span id="L-1933"><a href="#L-1933"><span class="linenos" data-line="1933"></span></a> <span class="n">Volume</span><span class="p">,</span> <span class="n">Issue</span><span class="p">,</span> <span class="n">Others</span><span class="p">,</span> <span class="n">Cartography</span><span class="p">,</span> <span class="n">Edition</span><span class="p">,</span> <span class="n">Publisher</span><span class="p">,</span> <span class="n">Agency</span><span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-1934"><a href="#L-1934"><span class="linenos" data-line="1934"></span></a> <span class="kr">end</span> </span><span id="L-1935"><a href="#L-1935"><span class="linenos" data-line="1935"></span></a> </span><span id="L-1936"><a href="#L-1936"><span class="linenos" data-line="1936"></span></a> <span class="kr">if</span> <span class="o">#</span><span class="n">ID_list</span> <span class="o">></span> <span class="mi">0</span> <span class="kr">then</span> </span><span id="L-1937"><a href="#L-1937"><span class="linenos" data-line="1937"></span></a> <span class="n">ID_list</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span><span class="p">,</span> <span class="nb">table.concat</span><span class="p">(</span> <span class="n">ID_list</span><span class="p">,</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> <span class="p">),</span> <span class="n">ID</span> <span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-1938"><a href="#L-1938"><span class="linenos" data-line="1938"></span></a> <span class="kr">else</span> </span><span id="L-1939"><a href="#L-1939"><span class="linenos" data-line="1939"></span></a> <span class="n">ID_list</span> <span class="o">=</span> <span class="n">ID</span><span class="p">;</span> </span><span id="L-1940"><a href="#L-1940"><span class="linenos" data-line="1940"></span></a> <span class="kr">end</span> </span><span id="L-1941"><a href="#L-1941"><span class="linenos" data-line="1941"></span></a> </span><span id="L-1942"><a href="#L-1942"><span class="linenos" data-line="1942"></span></a> <span class="kd">local</span> <span class="n">idcommon</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span> <span class="n">ID_list</span><span class="p">,</span> <span class="n">URL</span><span class="p">,</span> <span class="n">Archived</span><span class="p">,</span> <span class="n">AccessDate</span><span class="p">,</span> <span class="n">Via</span><span class="p">,</span> <span class="n">SubscriptionRequired</span><span class="p">,</span> <span class="n">Lay</span><span class="p">,</span> <span class="n">Quote</span> <span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-1943"><a href="#L-1943"><span class="linenos" data-line="1943"></span></a> <span class="kd">local</span> <span class="n">text</span><span class="p">;</span> </span><span id="L-1944"><a href="#L-1944"><span class="linenos" data-line="1944"></span></a> <span class="kd">local</span> <span class="n">pgtext</span> <span class="o">=</span> <span class="n">Position</span> <span class="o">..</span> <span class="n">Page</span> <span class="o">..</span> <span class="n">Pages</span> <span class="o">..</span> <span class="n">At</span><span class="p">;</span> </span><span id="L-1945"><a href="#L-1945"><span class="linenos" data-line="1945"></span></a> </span><span id="L-1946"><a href="#L-1946"><span class="linenos" data-line="1946"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Authors</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1947"><a href="#L-1947"><span class="linenos" data-line="1947"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Coauthors</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1948"><a href="#L-1948"><span class="linenos" data-line="1948"></span></a> <span class="n">Authors</span> <span class="o">=</span> <span class="n">Authors</span> <span class="o">..</span> <span class="n">A</span><span class="p">[</span><span class="s1">'AuthorSeparator'</span><span class="p">]</span> <span class="o">..</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Coauthors</span> </span><span id="L-1949"><a href="#L-1949"><span class="linenos" data-line="1949"></span></a> <span class="kr">end</span> </span><span id="L-1950"><a href="#L-1950"><span class="linenos" data-line="1950"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Date</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1951"><a href="#L-1951"><span class="linenos" data-line="1951"></span></a> <span class="n">Date</span> <span class="o">=</span> <span class="s2">" ("</span><span class="o">..</span><span class="n">Date</span><span class="o">..</span><span class="s2">")"</span> <span class="o">..</span> <span class="n">OrigYear</span> <span class="o">..</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> </span><span id="L-1952"><a href="#L-1952"><span class="linenos" data-line="1952"></span></a> <span class="kr">elseif</span> <span class="nb">string.sub</span><span class="p">(</span><span class="n">Authors</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="n">sepc</span> <span class="kr">then</span> </span><span id="L-1953"><a href="#L-1953"><span class="linenos" data-line="1953"></span></a> <span class="n">Authors</span> <span class="o">=</span> <span class="n">Authors</span> <span class="o">..</span> <span class="s2">" "</span> </span><span id="L-1954"><a href="#L-1954"><span class="linenos" data-line="1954"></span></a> <span class="kr">else</span> </span><span id="L-1955"><a href="#L-1955"><span class="linenos" data-line="1955"></span></a> <span class="n">Authors</span> <span class="o">=</span> <span class="n">Authors</span> <span class="o">..</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> </span><span id="L-1956"><a href="#L-1956"><span class="linenos" data-line="1956"></span></a> <span class="kr">end</span> </span><span id="L-1957"><a href="#L-1957"><span class="linenos" data-line="1957"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Editors</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1958"><a href="#L-1958"><span class="linenos" data-line="1958"></span></a> <span class="kd">local</span> <span class="n">in_text</span> <span class="o">=</span> <span class="s2">" "</span><span class="p">;</span> </span><span id="L-1959"><a href="#L-1959"><span class="linenos" data-line="1959"></span></a> <span class="kd">local</span> <span class="n">post_text</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-1960"><a href="#L-1960"><span class="linenos" data-line="1960"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Chapter</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1961"><a href="#L-1961"><span class="linenos" data-line="1961"></span></a> <span class="n">in_text</span> <span class="o">=</span> <span class="n">in_text</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'in'</span><span class="p">]</span> <span class="o">..</span> <span class="s2">" "</span> </span><span id="L-1962"><a href="#L-1962"><span class="linenos" data-line="1962"></span></a> <span class="kr">else</span> </span><span id="L-1963"><a href="#L-1963"><span class="linenos" data-line="1963"></span></a> <span class="kr">if</span> <span class="n">EditorCount</span> <span class="o"><=</span> <span class="mi">1</span> <span class="kr">then</span> </span><span id="L-1964"><a href="#L-1964"><span class="linenos" data-line="1964"></span></a> <span class="n">post_text</span> <span class="o">=</span> <span class="s2">", "</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'editor'</span><span class="p">];</span> </span><span id="L-1965"><a href="#L-1965"><span class="linenos" data-line="1965"></span></a> <span class="kr">else</span> </span><span id="L-1966"><a href="#L-1966"><span class="linenos" data-line="1966"></span></a> <span class="n">post_text</span> <span class="o">=</span> <span class="s2">", "</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'editors'</span><span class="p">];</span> </span><span id="L-1967"><a href="#L-1967"><span class="linenos" data-line="1967"></span></a> <span class="kr">end</span> </span><span id="L-1968"><a href="#L-1968"><span class="linenos" data-line="1968"></span></a> <span class="kr">end</span> </span><span id="L-1969"><a href="#L-1969"><span class="linenos" data-line="1969"></span></a> <span class="kr">if</span> <span class="p">(</span><span class="n">sepc</span> <span class="o">~=</span> <span class="s1">'.'</span><span class="p">)</span> <span class="kr">then</span> <span class="n">in_text</span> <span class="o">=</span> <span class="n">in_text</span><span class="p">:</span><span class="n">lower</span><span class="p">()</span> <span class="kr">end</span> </span><span id="L-1970"><a href="#L-1970"><span class="linenos" data-line="1970"></span></a> <span class="n">Editors</span> <span class="o">=</span> <span class="n">in_text</span> <span class="o">..</span> <span class="n">Editors</span> <span class="o">..</span> <span class="n">post_text</span><span class="p">;</span> </span><span id="L-1971"><a href="#L-1971"><span class="linenos" data-line="1971"></span></a> <span class="kr">if</span> <span class="p">(</span><span class="nb">string.sub</span><span class="p">(</span><span class="n">Editors</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> <span class="o">==</span> <span class="n">sepc</span><span class="p">)</span> </span><span id="L-1972"><a href="#L-1972"><span class="linenos" data-line="1972"></span></a> <span class="kr">then</span> <span class="n">Editors</span> <span class="o">=</span> <span class="n">Editors</span> <span class="o">..</span> <span class="s2">" "</span> </span><span id="L-1973"><a href="#L-1973"><span class="linenos" data-line="1973"></span></a> <span class="kr">else</span> <span class="n">Editors</span> <span class="o">=</span> <span class="n">Editors</span> <span class="o">..</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> </span><span id="L-1974"><a href="#L-1974"><span class="linenos" data-line="1974"></span></a> <span class="kr">end</span> </span><span id="L-1975"><a href="#L-1975"><span class="linenos" data-line="1975"></span></a> <span class="kr">end</span> </span><span id="L-1976"><a href="#L-1976"><span class="linenos" data-line="1976"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span><span class="n">Authors</span><span class="p">,</span> <span class="n">Date</span><span class="p">,</span> <span class="n">Chapter</span><span class="p">,</span> <span class="n">Place</span><span class="p">,</span> <span class="n">Editors</span><span class="p">,</span> <span class="n">tcommon</span> <span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-1977"><a href="#L-1977"><span class="linenos" data-line="1977"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span><span class="n">text</span><span class="p">,</span> <span class="n">pgtext</span><span class="p">,</span> <span class="n">idcommon</span><span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-1978"><a href="#L-1978"><span class="linenos" data-line="1978"></span></a> <span class="kr">elseif</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Editors</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1979"><a href="#L-1979"><span class="linenos" data-line="1979"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Date</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1980"><a href="#L-1980"><span class="linenos" data-line="1980"></span></a> <span class="kr">if</span> <span class="n">EditorCount</span> <span class="o"><=</span> <span class="mi">1</span> <span class="kr">then</span> </span><span id="L-1981"><a href="#L-1981"><span class="linenos" data-line="1981"></span></a> <span class="n">Editors</span> <span class="o">=</span> <span class="n">Editors</span> <span class="o">..</span> <span class="s2">", "</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'editor'</span><span class="p">];</span> </span><span id="L-1982"><a href="#L-1982"><span class="linenos" data-line="1982"></span></a> <span class="kr">else</span> </span><span id="L-1983"><a href="#L-1983"><span class="linenos" data-line="1983"></span></a> <span class="n">Editors</span> <span class="o">=</span> <span class="n">Editors</span> <span class="o">..</span> <span class="s2">", "</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'editors'</span><span class="p">];</span> </span><span id="L-1984"><a href="#L-1984"><span class="linenos" data-line="1984"></span></a> <span class="kr">end</span> </span><span id="L-1985"><a href="#L-1985"><span class="linenos" data-line="1985"></span></a> <span class="n">Date</span> <span class="o">=</span> <span class="s2">" ("</span> <span class="o">..</span> <span class="n">Date</span> <span class="o">..</span><span class="s2">")"</span> <span class="o">..</span> <span class="n">OrigYear</span> <span class="o">..</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> </span><span id="L-1986"><a href="#L-1986"><span class="linenos" data-line="1986"></span></a> <span class="kr">else</span> </span><span id="L-1987"><a href="#L-1987"><span class="linenos" data-line="1987"></span></a> <span class="kr">if</span> <span class="n">EditorCount</span> <span class="o"><=</span> <span class="mi">1</span> <span class="kr">then</span> </span><span id="L-1988"><a href="#L-1988"><span class="linenos" data-line="1988"></span></a> <span class="n">Editors</span> <span class="o">=</span> <span class="n">Editors</span> <span class="o">..</span> <span class="s2">" ("</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'editor'</span><span class="p">]</span> <span class="o">..</span> <span class="s2">")"</span> <span class="o">..</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> </span><span id="L-1989"><a href="#L-1989"><span class="linenos" data-line="1989"></span></a> <span class="kr">else</span> </span><span id="L-1990"><a href="#L-1990"><span class="linenos" data-line="1990"></span></a> <span class="n">Editors</span> <span class="o">=</span> <span class="n">Editors</span> <span class="o">..</span> <span class="s2">" ("</span> <span class="o">..</span> <span class="n">cfg</span><span class="p">.</span><span class="n">messages</span><span class="p">[</span><span class="s1">'editors'</span><span class="p">]</span> <span class="o">..</span> <span class="s2">")"</span> <span class="o">..</span> <span class="n">sepc</span> <span class="o">..</span> <span class="s2">" "</span> </span><span id="L-1991"><a href="#L-1991"><span class="linenos" data-line="1991"></span></a> <span class="kr">end</span> </span><span id="L-1992"><a href="#L-1992"><span class="linenos" data-line="1992"></span></a> <span class="kr">end</span> </span><span id="L-1993"><a href="#L-1993"><span class="linenos" data-line="1993"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span><span class="n">Editors</span><span class="p">,</span> <span class="n">Date</span><span class="p">,</span> <span class="n">Chapter</span><span class="p">,</span> <span class="n">Place</span><span class="p">,</span> <span class="n">tcommon</span><span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-1994"><a href="#L-1994"><span class="linenos" data-line="1994"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span><span class="n">text</span><span class="p">,</span> <span class="n">pgtext</span><span class="p">,</span> <span class="n">idcommon</span><span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-1995"><a href="#L-1995"><span class="linenos" data-line="1995"></span></a> <span class="kr">else</span> </span><span id="L-1996"><a href="#L-1996"><span class="linenos" data-line="1996"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Date</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-1997"><a href="#L-1997"><span class="linenos" data-line="1997"></span></a> <span class="kr">if</span> <span class="p">(</span> <span class="nb">string.sub</span><span class="p">(</span><span class="n">tcommon</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">,</span><span class="o">-</span><span class="mi">1</span><span class="p">)</span> <span class="o">~=</span> <span class="n">sepc</span> <span class="p">)</span> </span><span id="L-1998"><a href="#L-1998"><span class="linenos" data-line="1998"></span></a> <span class="kr">then</span> <span class="n">Date</span> <span class="o">=</span> <span class="n">sepc</span> <span class="o">..</span><span class="s2">" "</span> <span class="o">..</span> <span class="n">Date</span> <span class="o">..</span> <span class="n">OrigYear</span> </span><span id="L-1999"><a href="#L-1999"><span class="linenos" data-line="1999"></span></a> <span class="kr">else</span> <span class="n">Date</span> <span class="o">=</span> <span class="s2">" "</span> <span class="o">..</span> <span class="n">Date</span> <span class="o">..</span> <span class="n">OrigYear</span> </span><span id="L-2000"><a href="#L-2000"><span class="linenos" data-line="2000"></span></a> <span class="kr">end</span> </span><span id="L-2001"><a href="#L-2001"><span class="linenos" data-line="2001"></span></a> <span class="kr">end</span> </span><span id="L-2002"><a href="#L-2002"><span class="linenos" data-line="2002"></span></a> <span class="kr">if</span> <span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span><span class="o">==</span><span class="s2">"journal"</span> <span class="ow">and</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Periodical</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-2003"><a href="#L-2003"><span class="linenos" data-line="2003"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span><span class="n">Chapter</span><span class="p">,</span> <span class="n">Place</span><span class="p">,</span> <span class="n">tcommon</span><span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-2004"><a href="#L-2004"><span class="linenos" data-line="2004"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span><span class="n">text</span><span class="p">,</span> <span class="n">pgtext</span><span class="p">,</span> <span class="n">Date</span><span class="p">,</span> <span class="n">idcommon</span><span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-2005"><a href="#L-2005"><span class="linenos" data-line="2005"></span></a> <span class="kr">else</span> </span><span id="L-2006"><a href="#L-2006"><span class="linenos" data-line="2006"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span><span class="n">Chapter</span><span class="p">,</span> <span class="n">Place</span><span class="p">,</span> <span class="n">tcommon</span><span class="p">,</span> <span class="n">Date</span><span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-2007"><a href="#L-2007"><span class="linenos" data-line="2007"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span><span class="n">text</span><span class="p">,</span> <span class="n">pgtext</span><span class="p">,</span> <span class="n">idcommon</span><span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-2008"><a href="#L-2008"><span class="linenos" data-line="2008"></span></a> <span class="kr">end</span> </span><span id="L-2009"><a href="#L-2009"><span class="linenos" data-line="2009"></span></a> <span class="kr">end</span> </span><span id="L-2010"><a href="#L-2010"><span class="linenos" data-line="2010"></span></a> </span><span id="L-2011"><a href="#L-2011"><span class="linenos" data-line="2011"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">PostScript</span><span class="p">)</span> <span class="ow">and</span> <span class="n">PostScript</span> <span class="o">~=</span> <span class="n">sepc</span> <span class="kr">then</span> </span><span id="L-2012"><a href="#L-2012"><span class="linenos" data-line="2012"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span><span class="n">text</span><span class="p">,</span> <span class="n">sepc</span><span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> <span class="c1">--Deals with italics, spaces, etc.</span> </span><span id="L-2013"><a href="#L-2013"><span class="linenos" data-line="2013"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">text</span><span class="p">:</span><span class="n">sub</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="o">-</span><span class="mi">2</span><span class="p">);</span> <span class="c1">--Remove final seperator </span> </span><span id="L-2014"><a href="#L-2014"><span class="linenos" data-line="2014"></span></a> <span class="kr">end</span> </span><span id="L-2015"><a href="#L-2015"><span class="linenos" data-line="2015"></span></a> </span><span id="L-2016"><a href="#L-2016"><span class="linenos" data-line="2016"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">safejoin</span><span class="p">(</span> <span class="p">{</span><span class="n">text</span><span class="p">,</span> <span class="n">PostScript</span><span class="p">},</span> <span class="n">sepc</span> <span class="p">);</span> </span><span id="L-2017"><a href="#L-2017"><span class="linenos" data-line="2017"></span></a> </span><span id="L-2018"><a href="#L-2018"><span class="linenos" data-line="2018"></span></a> <span class="c1">-- Now enclose the whole thing in a <span/> element</span> </span><span id="L-2019"><a href="#L-2019"><span class="linenos" data-line="2019"></span></a> <span class="kd">local</span> <span class="n">options</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-2020"><a href="#L-2020"><span class="linenos" data-line="2020"></span></a> </span><span id="L-2021"><a href="#L-2021"><span class="linenos" data-line="2021"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span><span class="p">)</span> <span class="ow">and</span> <span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span> <span class="o">~=</span> <span class="s2">"citation"</span> <span class="kr">then</span> </span><span id="L-2022"><a href="#L-2022"><span class="linenos" data-line="2022"></span></a> <span class="n">options</span><span class="p">.</span><span class="n">class</span> <span class="o">=</span> <span class="s2">"citation "</span> <span class="o">..</span> <span class="n">config</span><span class="p">.</span><span class="n">CitationClass</span><span class="p">;</span> </span><span id="L-2023"><a href="#L-2023"><span class="linenos" data-line="2023"></span></a> <span class="kr">else</span> </span><span id="L-2024"><a href="#L-2024"><span class="linenos" data-line="2024"></span></a> <span class="n">options</span><span class="p">.</span><span class="n">class</span> <span class="o">=</span> <span class="s2">"citation"</span><span class="p">;</span> </span><span id="L-2025"><a href="#L-2025"><span class="linenos" data-line="2025"></span></a> <span class="kr">end</span> </span><span id="L-2026"><a href="#L-2026"><span class="linenos" data-line="2026"></span></a> </span><span id="L-2027"><a href="#L-2027"><span class="linenos" data-line="2027"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">Ref</span><span class="p">)</span> <span class="ow">and</span> <span class="n">Ref</span><span class="p">:</span><span class="n">lower</span><span class="p">()</span> <span class="o">~=</span> <span class="s2">"none"</span> <span class="kr">then</span> </span><span id="L-2028"><a href="#L-2028"><span class="linenos" data-line="2028"></span></a> <span class="kd">local</span> <span class="n">id</span> <span class="o">=</span> <span class="n">Ref</span> </span><span id="L-2029"><a href="#L-2029"><span class="linenos" data-line="2029"></span></a> <span class="kr">if</span> <span class="p">(</span> <span class="s2">"harv"</span> <span class="o">==</span> <span class="n">Ref</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-2030"><a href="#L-2030"><span class="linenos" data-line="2030"></span></a> <span class="kd">local</span> <span class="n">names</span> <span class="o">=</span> <span class="p">{}</span> <span class="c1">--table of last names & year</span> </span><span id="L-2031"><a href="#L-2031"><span class="linenos" data-line="2031"></span></a> <span class="kr">if</span> <span class="o">#</span><span class="n">a</span> <span class="o">></span> <span class="mi">0</span> <span class="kr">then</span> </span><span id="L-2032"><a href="#L-2032"><span class="linenos" data-line="2032"></span></a> <span class="kr">for</span> <span class="n">i</span><span class="p">,</span><span class="n">v</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span><span class="n">a</span><span class="p">)</span> <span class="kr">do</span> </span><span id="L-2033"><a href="#L-2033"><span class="linenos" data-line="2033"></span></a> <span class="n">names</span><span class="p">[</span><span class="n">i</span><span class="p">]</span> <span class="o">=</span> <span class="n">v</span><span class="p">.</span><span class="n">last</span> </span><span id="L-2034"><a href="#L-2034"><span class="linenos" data-line="2034"></span></a> <span class="kr">if</span> <span class="n">i</span> <span class="o">==</span> <span class="mi">4</span> <span class="kr">then</span> <span class="kr">break</span> <span class="kr">end</span> </span><span id="L-2035"><a href="#L-2035"><span class="linenos" data-line="2035"></span></a> <span class="kr">end</span> </span><span id="L-2036"><a href="#L-2036"><span class="linenos" data-line="2036"></span></a> <span class="kr">elseif</span> <span class="o">#</span><span class="n">e</span> <span class="o">></span> <span class="mi">0</span> <span class="kr">then</span> </span><span id="L-2037"><a href="#L-2037"><span class="linenos" data-line="2037"></span></a> <span class="kr">for</span> <span class="n">i</span><span class="p">,</span><span class="n">v</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span><span class="n">e</span><span class="p">)</span> <span class="kr">do</span> </span><span id="L-2038"><a href="#L-2038"><span class="linenos" data-line="2038"></span></a> <span class="n">names</span><span class="p">[</span><span class="n">i</span><span class="p">]</span> <span class="o">=</span> <span class="n">v</span><span class="p">.</span><span class="n">last</span> </span><span id="L-2039"><a href="#L-2039"><span class="linenos" data-line="2039"></span></a> <span class="kr">if</span> <span class="n">i</span> <span class="o">==</span> <span class="mi">4</span> <span class="kr">then</span> <span class="kr">break</span> <span class="kr">end</span> </span><span id="L-2040"><a href="#L-2040"><span class="linenos" data-line="2040"></span></a> <span class="kr">end</span> </span><span id="L-2041"><a href="#L-2041"><span class="linenos" data-line="2041"></span></a> <span class="kr">end</span> </span><span id="L-2042"><a href="#L-2042"><span class="linenos" data-line="2042"></span></a> <span class="n">names</span><span class="p">[</span> <span class="o">#</span><span class="n">names</span> <span class="o">+</span> <span class="mi">1</span> <span class="p">]</span> <span class="o">=</span> <span class="n">first_set</span><span class="p">(</span><span class="n">Year</span><span class="p">,</span> <span class="n">anchor_year</span><span class="p">);</span> <span class="c1">-- Year first for legacy citations</span> </span><span id="L-2043"><a href="#L-2043"><span class="linenos" data-line="2043"></span></a> <span class="n">id</span> <span class="o">=</span> <span class="n">anchorid</span><span class="p">(</span><span class="n">names</span><span class="p">)</span> </span><span id="L-2044"><a href="#L-2044"><span class="linenos" data-line="2044"></span></a> <span class="kr">end</span> </span><span id="L-2045"><a href="#L-2045"><span class="linenos" data-line="2045"></span></a> <span class="n">options</span><span class="p">.</span><span class="n">id</span> <span class="o">=</span> <span class="n">id</span><span class="p">;</span> </span><span id="L-2046"><a href="#L-2046"><span class="linenos" data-line="2046"></span></a> <span class="kr">end</span> </span><span id="L-2047"><a href="#L-2047"><span class="linenos" data-line="2047"></span></a> </span><span id="L-2048"><a href="#L-2048"><span class="linenos" data-line="2048"></span></a> <span class="kr">if</span> <span class="nb">string.len</span><span class="p">(</span><span class="n">text</span><span class="p">:</span><span class="n">gsub</span><span class="p">(</span><span class="s2">"<span[^>/]*>.-</span>"</span><span class="p">,</span> <span class="s2">""</span><span class="p">):</span><span class="n">gsub</span><span class="p">(</span><span class="s2">"%b<>"</span><span class="p">,</span><span class="s2">""</span><span class="p">))</span> <span class="o"><=</span> <span class="mi">2</span> <span class="kr">then</span> </span><span id="L-2049"><a href="#L-2049"><span class="linenos" data-line="2049"></span></a> <span class="n">z</span><span class="p">.</span><span class="n">error_categories</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-2050"><a href="#L-2050"><span class="linenos" data-line="2050"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">seterror</span><span class="p">(</span><span class="s1">'empty_citation'</span><span class="p">);</span> </span><span id="L-2051"><a href="#L-2051"><span class="linenos" data-line="2051"></span></a> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-2052"><a href="#L-2052"><span class="linenos" data-line="2052"></span></a> <span class="kr">end</span> </span><span id="L-2053"><a href="#L-2053"><span class="linenos" data-line="2053"></span></a> </span><span id="L-2054"><a href="#L-2054"><span class="linenos" data-line="2054"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">options</span><span class="p">.</span><span class="n">id</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-2055"><a href="#L-2055"><span class="linenos" data-line="2055"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="s1">'<span id="'</span> <span class="o">..</span> <span class="n">mw</span><span class="p">.</span><span class="n">uri</span><span class="p">.</span><span class="n">anchorEncode</span><span class="p">(</span><span class="n">options</span><span class="p">.</span><span class="n">id</span><span class="p">)</span> <span class="o">..</span><span class="s1">'" class="'</span> <span class="o">..</span> <span class="n">mw</span><span class="p">.</span><span class="n">text</span><span class="p">.</span><span class="n">nowiki</span><span class="p">(</span><span class="n">options</span><span class="p">.</span><span class="n">class</span><span class="p">)</span> <span class="o">..</span> <span class="s1">'">'</span> <span class="o">..</span> <span class="n">text</span> <span class="o">..</span> <span class="s2">"</span>"</span><span class="p">;</span> </span><span id="L-2056"><a href="#L-2056"><span class="linenos" data-line="2056"></span></a> <span class="kr">else</span> </span><span id="L-2057"><a href="#L-2057"><span class="linenos" data-line="2057"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="s1">'<span class="'</span> <span class="o">..</span> <span class="n">mw</span><span class="p">.</span><span class="n">text</span><span class="p">.</span><span class="n">nowiki</span><span class="p">(</span><span class="n">options</span><span class="p">.</span><span class="n">class</span><span class="p">)</span> <span class="o">..</span> <span class="s1">'">'</span> <span class="o">..</span> <span class="n">text</span> <span class="o">..</span> <span class="s2">"</span>"</span><span class="p">;</span> </span><span id="L-2058"><a href="#L-2058"><span class="linenos" data-line="2058"></span></a> <span class="kr">end</span> </span><span id="L-2059"><a href="#L-2059"><span class="linenos" data-line="2059"></span></a> </span><span id="L-2060"><a href="#L-2060"><span class="linenos" data-line="2060"></span></a> <span class="kd">local</span> <span class="n">empty_span</span> <span class="o">=</span> <span class="s1">'<span style="display:none;">&nbsp;</span>'</span><span class="p">;</span> </span><span id="L-2061"><a href="#L-2061"><span class="linenos" data-line="2061"></span></a> </span><span id="L-2062"><a href="#L-2062"><span class="linenos" data-line="2062"></span></a> <span class="c1">-- Note: Using display: none on then COinS span breaks some clients.</span> </span><span id="L-2063"><a href="#L-2063"><span class="linenos" data-line="2063"></span></a> <span class="kd">local</span> <span class="n">OCinS</span> <span class="o">=</span> <span class="s1">'<span title="'</span> <span class="o">..</span> <span class="n">OCinSoutput</span> <span class="o">..</span> <span class="s1">'" class="Z3988">'</span> <span class="o">..</span> <span class="n">empty_span</span> <span class="o">..</span> <span class="s1">'</span>'</span><span class="p">;</span> </span><span id="L-2064"><a href="#L-2064"><span class="linenos" data-line="2064"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">text</span> <span class="o">..</span> <span class="n">OCinS</span><span class="p">;</span> </span><span id="L-2065"><a href="#L-2065"><span class="linenos" data-line="2065"></span></a> </span><span id="L-2066"><a href="#L-2066"><span class="linenos" data-line="2066"></span></a> <span class="kr">if</span> <span class="o">#</span><span class="n">z</span><span class="p">.</span><span class="n">message_tail</span> <span class="o">~=</span> <span class="mi">0</span> <span class="kr">then</span> </span><span id="L-2067"><a href="#L-2067"><span class="linenos" data-line="2067"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">text</span> <span class="o">..</span> <span class="s2">" "</span><span class="p">;</span> </span><span id="L-2068"><a href="#L-2068"><span class="linenos" data-line="2068"></span></a> <span class="kr">for</span> <span class="n">i</span><span class="p">,</span><span class="n">v</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-2069"><a href="#L-2069"><span class="linenos" data-line="2069"></span></a> <span class="kr">if</span> <span class="n">is_set</span><span class="p">(</span><span class="n">v</span><span class="p">[</span><span class="mi">1</span><span class="p">])</span> <span class="kr">then</span> </span><span id="L-2070"><a href="#L-2070"><span class="linenos" data-line="2070"></span></a> <span class="kr">if</span> <span class="n">i</span> <span class="o">==</span> <span class="o">#</span><span class="n">z</span><span class="p">.</span><span class="n">message_tail</span> <span class="kr">then</span> </span><span id="L-2071"><a href="#L-2071"><span class="linenos" data-line="2071"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">text</span> <span class="o">..</span> <span class="n">errorcomment</span><span class="p">(</span> <span class="n">v</span><span class="p">[</span><span class="mi">1</span><span class="p">],</span> <span class="n">v</span><span class="p">[</span><span class="mi">2</span><span class="p">]</span> <span class="p">);</span> </span><span id="L-2072"><a href="#L-2072"><span class="linenos" data-line="2072"></span></a> <span class="kr">else</span> </span><span id="L-2073"><a href="#L-2073"><span class="linenos" data-line="2073"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">text</span> <span class="o">..</span> <span class="n">errorcomment</span><span class="p">(</span> <span class="n">v</span><span class="p">[</span><span class="mi">1</span><span class="p">]</span> <span class="o">..</span> <span class="s2">"; "</span><span class="p">,</span> <span class="n">v</span><span class="p">[</span><span class="mi">2</span><span class="p">]</span> <span class="p">);</span> </span><span id="L-2074"><a href="#L-2074"><span class="linenos" data-line="2074"></span></a> <span class="kr">end</span> </span><span id="L-2075"><a href="#L-2075"><span class="linenos" data-line="2075"></span></a> <span class="kr">end</span> </span><span id="L-2076"><a href="#L-2076"><span class="linenos" data-line="2076"></span></a> <span class="kr">end</span> </span><span id="L-2077"><a href="#L-2077"><span class="linenos" data-line="2077"></span></a> <span class="kr">end</span> </span><span id="L-2078"><a href="#L-2078"><span class="linenos" data-line="2078"></span></a> </span><span id="L-2079"><a href="#L-2079"><span class="linenos" data-line="2079"></span></a> <span class="n">no_tracking_cats</span> <span class="o">=</span> <span class="n">no_tracking_cats</span><span class="p">:</span><span class="n">lower</span><span class="p">();</span> </span><span id="L-2080"><a href="#L-2080"><span class="linenos" data-line="2080"></span></a> <span class="kr">if</span> <span class="n">inArray</span><span class="p">(</span><span class="n">no_tracking_cats</span><span class="p">,</span> <span class="p">{</span><span class="s2">""</span><span class="p">,</span> <span class="s2">"no"</span><span class="p">,</span> <span class="s2">"false"</span><span class="p">,</span> <span class="s2">"n"</span><span class="p">})</span> <span class="kr">then</span> </span><span id="L-2081"><a href="#L-2081"><span class="linenos" data-line="2081"></span></a> <span class="kr">for</span> <span class="n">_</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">ipairs</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">error_categories</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-2082"><a href="#L-2082"><span class="linenos" data-line="2082"></span></a> <span class="n">text</span> <span class="o">=</span> <span class="n">text</span> <span class="o">..</span> <span class="s1">'[[Category:'</span> <span class="o">..</span> <span class="n">v</span> <span class="o">..</span><span class="s1">']]'</span><span class="p">;</span> </span><span id="L-2083"><a href="#L-2083"><span class="linenos" data-line="2083"></span></a> <span class="kr">end</span> </span><span id="L-2084"><a href="#L-2084"><span class="linenos" data-line="2084"></span></a> <span class="kr">end</span> </span><span id="L-2085"><a href="#L-2085"><span class="linenos" data-line="2085"></span></a> </span><span id="L-2086"><a href="#L-2086"><span class="linenos" data-line="2086"></span></a> <span class="kr">return</span> <span class="n">text</span> </span><span id="L-2087"><a href="#L-2087"><span class="linenos" data-line="2087"></span></a><span class="kr">end</span> </span><span id="L-2088"><a href="#L-2088"><span class="linenos" data-line="2088"></span></a> </span><span id="L-2089"><a href="#L-2089"><span class="linenos" data-line="2089"></span></a><span class="c1">-- This is used by templates such as {{cite book}} to create the actual citation text.</span> </span><span id="L-2090"><a href="#L-2090"><span class="linenos" data-line="2090"></span></a><span class="kr">function</span> <span class="nc">z</span><span class="p">.</span><span class="nf">citation</span><span class="p">(</span><span class="n">frame</span><span class="p">)</span> </span><span id="L-2091"><a href="#L-2091"><span class="linenos" data-line="2091"></span></a> <span class="kd">local</span> <span class="n">pframe</span> <span class="o">=</span> <span class="n">frame</span><span class="p">:</span><span class="n">getParent</span><span class="p">()</span> </span><span id="L-2092"><a href="#L-2092"><span class="linenos" data-line="2092"></span></a> </span><span id="L-2093"><a href="#L-2093"><span class="linenos" data-line="2093"></span></a> <span class="kd">local</span> <span class="n">args</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-2094"><a href="#L-2094"><span class="linenos" data-line="2094"></span></a> <span class="kd">local</span> <span class="n">suggestions</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-2095"><a href="#L-2095"><span class="linenos" data-line="2095"></span></a> <span class="kd">local</span> <span class="n">error_text</span><span class="p">,</span> <span class="n">error_state</span><span class="p">;</span> </span><span id="L-2096"><a href="#L-2096"><span class="linenos" data-line="2096"></span></a> </span><span id="L-2097"><a href="#L-2097"><span class="linenos" data-line="2097"></span></a> <span class="kd">local</span> <span class="n">config</span> <span class="o">=</span> <span class="p">{};</span> </span><span id="L-2098"><a href="#L-2098"><span class="linenos" data-line="2098"></span></a> <span class="kr">for</span> <span class="n">k</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">pairs</span><span class="p">(</span> <span class="n">frame</span><span class="p">.</span><span class="n">args</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-2099"><a href="#L-2099"><span class="linenos" data-line="2099"></span></a> <span class="n">config</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">=</span> <span class="n">v</span><span class="p">;</span> </span><span id="L-2100"><a href="#L-2100"><span class="linenos" data-line="2100"></span></a> <span class="n">args</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">=</span> <span class="n">v</span><span class="p">;</span> </span><span id="L-2101"><a href="#L-2101"><span class="linenos" data-line="2101"></span></a> <span class="kr">end</span> </span><span id="L-2102"><a href="#L-2102"><span class="linenos" data-line="2102"></span></a> </span><span id="L-2103"><a href="#L-2103"><span class="linenos" data-line="2103"></span></a> <span class="kr">for</span> <span class="n">k</span><span class="p">,</span> <span class="n">v</span> <span class="kr">in</span> <span class="nb">pairs</span><span class="p">(</span> <span class="n">pframe</span><span class="p">.</span><span class="n">args</span> <span class="p">)</span> <span class="kr">do</span> </span><span id="L-2104"><a href="#L-2104"><span class="linenos" data-line="2104"></span></a> <span class="kr">if</span> <span class="n">v</span> <span class="o">~=</span> <span class="s1">''</span> <span class="kr">then</span> </span><span id="L-2105"><a href="#L-2105"><span class="linenos" data-line="2105"></span></a> <span class="kr">if</span> <span class="ow">not</span> <span class="n">validate</span><span class="p">(</span> <span class="n">k</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-2106"><a href="#L-2106"><span class="linenos" data-line="2106"></span></a> <span class="n">error_text</span> <span class="o">=</span> <span class="s2">""</span><span class="p">;</span> </span><span id="L-2107"><a href="#L-2107"><span class="linenos" data-line="2107"></span></a> <span class="kr">if</span> <span class="nb">type</span><span class="p">(</span> <span class="n">k</span> <span class="p">)</span> <span class="o">~=</span> <span class="s1">'string'</span> <span class="kr">then</span> </span><span id="L-2108"><a href="#L-2108"><span class="linenos" data-line="2108"></span></a> <span class="c1">-- Exclude empty numbered parameters</span> </span><span id="L-2109"><a href="#L-2109"><span class="linenos" data-line="2109"></span></a> <span class="kr">if</span> <span class="n">v</span><span class="p">:</span><span class="n">match</span><span class="p">(</span><span class="s2">"%S+"</span><span class="p">)</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-2110"><a href="#L-2110"><span class="linenos" data-line="2110"></span></a> <span class="n">error_text</span><span class="p">,</span> <span class="n">error_state</span> <span class="o">=</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'text_ignored'</span><span class="p">,</span> <span class="p">{</span><span class="n">v</span><span class="p">},</span> <span class="kc">true</span> <span class="p">);</span> </span><span id="L-2111"><a href="#L-2111"><span class="linenos" data-line="2111"></span></a> <span class="kr">end</span> </span><span id="L-2112"><a href="#L-2112"><span class="linenos" data-line="2112"></span></a> <span class="kr">elseif</span> <span class="n">validate</span><span class="p">(</span> <span class="n">k</span><span class="p">:</span><span class="n">lower</span><span class="p">()</span> <span class="p">)</span> <span class="kr">then</span> </span><span id="L-2113"><a href="#L-2113"><span class="linenos" data-line="2113"></span></a> <span class="n">error_text</span><span class="p">,</span> <span class="n">error_state</span> <span class="o">=</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'parameter_ignored_suggest'</span><span class="p">,</span> <span class="p">{</span><span class="n">k</span><span class="p">,</span> <span class="n">k</span><span class="p">:</span><span class="n">lower</span><span class="p">()},</span> <span class="kc">true</span> <span class="p">);</span> </span><span id="L-2114"><a href="#L-2114"><span class="linenos" data-line="2114"></span></a> <span class="kr">else</span> </span><span id="L-2115"><a href="#L-2115"><span class="linenos" data-line="2115"></span></a> <span class="kr">if</span> <span class="o">#</span><span class="n">suggestions</span> <span class="o">==</span> <span class="mi">0</span> <span class="kr">then</span> </span><span id="L-2116"><a href="#L-2116"><span class="linenos" data-line="2116"></span></a> <span class="n">suggestions</span> <span class="o">=</span> <span class="n">mw</span><span class="p">.</span><span class="n">loadData</span><span class="p">(</span> <span class="s1">'Module:Citation/CS1/Suggestions'</span> <span class="p">);</span> </span><span id="L-2117"><a href="#L-2117"><span class="linenos" data-line="2117"></span></a> <span class="kr">end</span> </span><span id="L-2118"><a href="#L-2118"><span class="linenos" data-line="2118"></span></a> <span class="kr">if</span> <span class="n">suggestions</span><span class="p">[</span> <span class="n">k</span><span class="p">:</span><span class="n">lower</span><span class="p">()</span> <span class="p">]</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="kr">then</span> </span><span id="L-2119"><a href="#L-2119"><span class="linenos" data-line="2119"></span></a> <span class="n">error_text</span><span class="p">,</span> <span class="n">error_state</span> <span class="o">=</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'parameter_ignored_suggest'</span><span class="p">,</span> <span class="p">{</span><span class="n">k</span><span class="p">,</span> <span class="n">suggestions</span><span class="p">[</span> <span class="n">k</span><span class="p">:</span><span class="n">lower</span><span class="p">()</span> <span class="p">]},</span> <span class="kc">true</span> <span class="p">);</span> </span><span id="L-2120"><a href="#L-2120"><span class="linenos" data-line="2120"></span></a> <span class="kr">else</span> </span><span id="L-2121"><a href="#L-2121"><span class="linenos" data-line="2121"></span></a> <span class="n">error_text</span><span class="p">,</span> <span class="n">error_state</span> <span class="o">=</span> <span class="n">seterror</span><span class="p">(</span> <span class="s1">'parameter_ignored'</span><span class="p">,</span> <span class="p">{</span><span class="n">k</span><span class="p">},</span> <span class="kc">true</span> <span class="p">);</span> </span><span id="L-2122"><a href="#L-2122"><span class="linenos" data-line="2122"></span></a> <span class="kr">end</span> </span><span id="L-2123"><a href="#L-2123"><span class="linenos" data-line="2123"></span></a> <span class="kr">end</span> </span><span id="L-2124"><a href="#L-2124"><span class="linenos" data-line="2124"></span></a> <span class="kr">if</span> <span class="n">error_text</span> <span class="o">~=</span> <span class="s1">''</span> <span class="kr">then</span> </span><span id="L-2125"><a href="#L-2125"><span class="linenos" data-line="2125"></span></a> <span class="nb">table.insert</span><span class="p">(</span> <span class="n">z</span><span class="p">.</span><span class="n">message_tail</span><span class="p">,</span> <span class="p">{</span><span class="n">error_text</span><span class="p">,</span> <span class="n">error_state</span><span class="p">}</span> <span class="p">);</span> </span><span id="L-2126"><a href="#L-2126"><span class="linenos" data-line="2126"></span></a> <span class="kr">end</span> </span><span id="L-2127"><a href="#L-2127"><span class="linenos" data-line="2127"></span></a> <span class="kr">end</span> </span><span id="L-2128"><a href="#L-2128"><span class="linenos" data-line="2128"></span></a> <span class="n">args</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">=</span> <span class="n">v</span><span class="p">;</span> </span><span id="L-2129"><a href="#L-2129"><span class="linenos" data-line="2129"></span></a> <span class="kr">elseif</span> <span class="n">args</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">~=</span> <span class="kc">nil</span> <span class="ow">or</span> <span class="p">(</span><span class="n">k</span> <span class="o">==</span> <span class="s1">'postscript'</span><span class="p">)</span> <span class="kr">then</span> </span><span id="L-2130"><a href="#L-2130"><span class="linenos" data-line="2130"></span></a> <span class="n">args</span><span class="p">[</span><span class="n">k</span><span class="p">]</span> <span class="o">=</span> <span class="n">v</span><span class="p">;</span> </span><span id="L-2131"><a href="#L-2131"><span class="linenos" data-line="2131"></span></a> <span class="kr">end</span> </span><span id="L-2132"><a href="#L-2132"><span class="linenos" data-line="2132"></span></a> <span class="kr">end</span> </span><span id="L-2133"><a href="#L-2133"><span class="linenos" data-line="2133"></span></a> </span><span id="L-2134"><a href="#L-2134"><span class="linenos" data-line="2134"></span></a> <span class="kr">return</span> <span class="n">citation0</span><span class="p">(</span> <span class="n">config</span><span class="p">,</span> <span class="n">args</span><span class="p">)</span> </span><span id="L-2135"><a href="#L-2135"><span class="linenos" data-line="2135"></span></a><span class="kr">end</span> </span><span id="L-2136"><a href="#L-2136"><span class="linenos" data-line="2136"></span></a> </span><span id="L-2137"><a href="#L-2137"><span class="linenos" data-line="2137"></span></a><span class="kr">return</span> <span class="n">z</span> </span></pre></div> <!-- NewPP limit report Parsed by mw‐web.codfw.main‐f69cdc8f6‐dhbcv Cached time: 20241124123623 Cache expiry: 2592000 Reduced expiry: false Complications: [] CPU time usage: 0.003 seconds Real time usage: 0.003 seconds Preprocessor visited node count: 1/1000000 Post‐expand include size: 0/2097152 bytes Template argument size: 0/2097152 bytes Highest expansion depth: 1/100 Expensive parser function count: 0/500 Unstrip recursion depth: 0/20 Unstrip post‐expand size: 0/5000000 bytes Number of Wikibase entities loaded: 0/400 --> <!-- Transclusion expansion time report (%,ms,calls,template) 100.00% 0.000 1 -total --> </div><!--esi <esi:include src="/esitest-fa8a495983347898/content" /> --><noscript><img src="https://login.wikimedia.org/wiki/Special:CentralAutoLogin/start?type=1x1" alt="" width="1" height="1" style="border: none; position: absolute;"></noscript> <div class="printfooter" data-nosnippet="">Kiʻi ʻia mai "<a dir="ltr" href="https://haw.wikipedia.org/w/index.php?title=Module:Citation/CS1&oldid=70467">https://haw.wikipedia.org/w/index.php?title=Module:Citation/CS1&oldid=70467</a>"</div></div> <div id="catlinks" class="catlinks catlinks-allhidden" data-mw="interface"></div> </div> </main> </div> <div class="mw-footer-container"> <footer id="footer" class="mw-footer" > <ul id="footer-info"> <li id="footer-info-lastmod"> Ua kāloli ʻia kēia ʻaoʻao i ka lā 17 Pepeluali 2014, ma ka hola 03:19.</li> <li id="footer-info-copyright">Text is available under the <a rel="nofollow" class="external text" href="https://creativecommons.org/licenses/by-sa/4.0/deed.en">Creative Commons Attribution-ShareAlike License</a>; additional terms may apply. See <a class="external text" href="https://foundation.wikimedia.org/wiki/Special:MyLanguage/Policy:Terms_of_Use">Terms of Use</a> for details.</li> </ul> <ul id="footer-places"> <li id="footer-places-privacy"><a href="https://foundation.wikimedia.org/wiki/Special:MyLanguage/Policy:Privacy_policy">Kulekele pilikino</a></li> <li id="footer-places-about"><a href="/wiki/Wikipedia:E_pili_ana_i%C4%81_Wikipikia">No Wikipedia</a></li> <li id="footer-places-disclaimers"><a href="/wiki/Wikipedia:Akahele_Laulaha">Akahana</a></li> <li id="footer-places-wm-codeofconduct"><a href="https://foundation.wikimedia.org/wiki/Special:MyLanguage/Policy:Universal_Code_of_Conduct">Code of Conduct</a></li> <li id="footer-places-developers"><a href="https://developer.wikimedia.org">Developers</a></li> <li id="footer-places-statslink"><a href="https://stats.wikimedia.org/#/haw.wikipedia.org">Statistics</a></li> <li id="footer-places-cookiestatement"><a href="https://foundation.wikimedia.org/wiki/Special:MyLanguage/Policy:Cookie_statement">Cookie statement</a></li> <li id="footer-places-mobileview"><a href="//haw.m.wikipedia.org/w/index.php?title=Module:Citation/CS1&mobileaction=toggle_view_mobile" class="noprint stopMobileRedirectToggle">Mobile view</a></li> </ul> <ul id="footer-icons" class="noprint"> <li id="footer-copyrightico"><a href="https://wikimediafoundation.org/" class="cdx-button cdx-button--fake-button cdx-button--size-large cdx-button--fake-button--enabled"><img src="/static/images/footer/wikimedia-button.svg" width="84" height="29" alt="Wikimedia Foundation" loading="lazy"></a></li> <li id="footer-poweredbyico"><a href="https://www.mediawiki.org/" class="cdx-button cdx-button--fake-button cdx-button--size-large cdx-button--fake-button--enabled"><img src="/w/resources/assets/poweredby_mediawiki.svg" alt="Powered by MediaWiki" width="88" height="31" loading="lazy"></a></li> </ul> </footer> </div> </div> </div> <div class="vector-settings" id="p-dock-bottom"> <ul></ul> </div><script>(RLQ=window.RLQ||[]).push(function(){mw.config.set({"wgHostname":"mw-web.codfw.main-f69cdc8f6-dhbcv","wgBackendResponseTime":461,"wgPageParseReport":{"limitreport":{"cputime":"0.003","walltime":"0.003","ppvisitednodes":{"value":1,"limit":1000000},"postexpandincludesize":{"value":0,"limit":2097152},"templateargumentsize":{"value":0,"limit":2097152},"expansiondepth":{"value":1,"limit":100},"expensivefunctioncount":{"value":0,"limit":500},"unstrip-depth":{"value":0,"limit":20},"unstrip-size":{"value":0,"limit":5000000},"entityaccesscount":{"value":0,"limit":400},"timingprofile":["100.00% 0.000 1 -total"]},"cachereport":{"origin":"mw-web.codfw.main-f69cdc8f6-dhbcv","timestamp":"20241124123623","ttl":2592000,"transientcontent":false}}});});</script> </body> </html>