Module:Main

-- -- This module produces a link to a main article or articles. It implements the -- template . -- -- If the module is used in category or category talk space, it produces "The -- main article for this category is xxx". Otherwise, it produces -- "Main article: xxx". --

local mTableTools = require('Module:TableTools') local mArguments = require('Module:Arguments') local mHatnote = require('Module:Hatnote')

local p = {}

function p.main(frame) local args = mArguments.getArgs(frame, {parentOnly = true}) local pages = {} for k, v in pairs(args) do		if type(k) == 'number' then local display = args['l' .. tostring(k)] local page = {v, display} pages[k] = page end end pages = mTableTools.compressSparseArray(pages) return p._main(unpack(pages)) end

function p._main(...) -- Get the list of pages. If no first page was specified we use the current -- page name. local pages = {...} local currentTitle = mw.title.getCurrentTitle local firstPageTable = pages[1] local firstPage if firstPageTable then firstPage = firstPageTable[1] else firstPage = currentTitle.text firstPageTable = {firstPage} pages[1] = firstPageTable end

-- Find the pagetype. local firstPageNs = mHatnote._findNamespaceId(firstPage, true) local pagetype = firstPageNs == 0 and 'article' or 'page'

-- Make the formatted link text local links = mHatnote._formatPageTables(pages) links = mw.text.listToText(links)

-- Build the text. local isPlural = #pages > 1 local currentNs = currentTitle.namespace local isCategoryNamespace = currentNs - currentNs % 2 == 14 local stringToFormat if isCategoryNamespace then if isPlural then stringToFormat = 'The main %ss for this' .. ' category are %s' else stringToFormat = 'The main %s for this' .. ' category is %s' end else if isPlural then stringToFormat = 'Main %ss: %s' else stringToFormat = 'Main %s: %s' end end local text = string.format(stringToFormat, pagetype, links)

-- Pass the text to p._rellink. local extraclasses = 'relarticle mainarticle' return mHatnote._rellink(text, extraclasses) end

return p