Module:Hatnote list: Difference between revisions
m
19 revisions imported from wikipedia:Module:Hatnote_list: All aboard the import train again. Originally imported from English Wikipedia.
m (1 revision imported) |
m (19 revisions imported from wikipedia:Module:Hatnote_list: All aboard the import train again. Originally imported from English Wikipedia.) |
||
| (11 intermediate revisions by 8 users not shown) | |||
Line 9:
local mArguments --initialize lazily
local mFormatLink = require('Module:Format link')
local mHatnote = require('Module:Hatnote')
local libraryUtil = require('libraryUtil')
Line 29 ⟶ 30:
formatted = false
}
return string.find(
)
-- Stringifies a list generically; probably shouldn't be used directly
local function stringifyList(list, options)
-- Type-checks, defaults, and a shortcut
checkType("stringifyList", 1, list, "table")
Line 42 ⟶ 50:
local s = options.space
-- Format the list if requested
if options.formatted then
list = mFormatLink.formatPages(
{categorizeMissing = mHatnote.missingTargetCat}, list
)
end
-- Set the separator; if any item contains it, use the alternate separator
local separator = options.separator
▲ --searches display text only
▲ function searchDisp(t, f)
▲ return string.find(string.sub(t, (string.find(t, '|') or 0) + 1), f)
▲ end
for k, v in pairs(list) do
if searchDisp(v, separator) then
Line 65 ⟶ 73:
--DRY function
function p.conjList (conj, list, fmt)
return stringifyList(list, {conjunction = conj, formatted = fmt})
end
-- Stringifies lists with "and" or "or"
function p.andList (...) return p.conjList("and", ...) end
function p.orList (...) return p.conjList("or", ...) end
--------------------------------------------------------------------------------
Line 85 ⟶ 93:
title = mw.title.getCurrentTitle().text,
otherText = 'other uses',
forSeeForm = 'For %s, see %s.',
}
--Collapses duplicate punctuation
local function punctuationCollapse (text)
local replacements = {
["%.%.$"] = ".",
Line 125 ⟶ 133:
local i = from
local terminated = false
-- If there is extra text, and no arguments are given, give nil value
-- to not produce default of "For other uses, see foo (disambiguation)"
if options.extratext and i > maxArg then return nil end
-- Loop to generate rows
repeat
Line 157 ⟶ 168:
function p.forSeeTableToString (forSeeTable, options)
-- Type-checks and defaults
checkType("forSeeTableToString", 1, forSeeTable, "table", true)
checkType("forSeeTableToString", 2, options, "table", true)
options = options or {}
Line 165 ⟶ 176:
-- Stringify each for-see item into a list
local strList = {}
for k, v in pairs(forSeeTable) do
local
local pagesStr =
mHatnote._formatLink(mHatnote.disambiguate(options.title))▼
p.andList(v.pages, true) or
local forSeeStr = string.format(options.forSeeForm, useStr, pagesStr)▼
mFormatLink._formatLink{
forSeeStr = punctuationCollapse(forSeeStr)▼
categorizeMissing = mHatnote.missingTargetCat,
table.insert(strList, forSeeStr)▼
}
▲ local forSeeStr = string.format(options.forSeeForm, useStr, pagesStr)
▲ forSeeStr = punctuationCollapse(forSeeStr)
▲ table.insert(strList, forSeeStr)
end
end
if options.extratext then table.insert(strList, punctuationCollapse(options.extratext..'.')) end
-- Return the concatenated list
return table.concat(strList, ' ')
| |||