模組:Main

出自Gea-Suan Lin's Wiki
於 2018年4月16日 (一) 04:15 由 Gslin留言 | 貢獻 所做的修訂 (创建页面,内容为“--[[ -- This module produces a link to a main article or articles. It implements the -- template {{main}}. -- -- If the module is used in category or category talk…”)
(差異) ←上個修訂 | 最新修訂 (差異) | 下個修訂→ (差異)
跳至導覽 跳至搜尋

此模塊的文檔可以在Module:Main/doc創建

--[[
-- This module produces a link to a main article or articles. It implements the
-- template {{main}}.
-- 
-- 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 mHatnote = require('Module:Hatnote')
local mTableTools -- lazily initialise
local mArguments -- lazily initialise

local p = {}

function p.main(frame)
	mTableTools = require('Module:TableTools')
	mArguments = require('Module:Arguments')
	local args = mArguments.getArgs(frame, {parentOnly = true})
	local pages = {}
	--模板版的限制
	local limit =10 
	local islimit=false
	local limittext = "<span class=\"error\">(在模板"..frame:expandTemplate{title="tl",args={"main"}}.."中使用了太多的参数)</span>"
	--模板版的限制
	for k, v in pairs(args) do
		if type(k) == 'number' then
			if k > limit then 
				islimit=true 
				break 
			else	
				local display = args['l' .. tostring(k)]
				local page = {v, display}
				pages[k] = page
			end
		end
	end
	pages = mTableTools.compressSparseArray(pages)
	local options = {
		selfref = args.selfref
	}
	return p._main(frame,options, unpack(pages)) .. ((islimit and limittext) or "")
end

function p._main(frame,options, ...)
	-- 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)
	local pagetype = firstPageNs == 0 and '条目' or '页面'

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

	-- Build the text.
	local currentNs = currentTitle.namespace
	local isCategoryNamespace = currentNs - currentNs % 2 == 14
	local stringToFormat
	if isCategoryNamespace then
		stringToFormat = '此[[Wikipedia:頁面分類|分类]]的主%s是%s'
	else
		stringToFormat = '主%s:%s'
	end
	local text = string.format(stringToFormat, pagetype, links)

	-- Process the options and pass the text to the _rellink function in
	-- [[Module:Hatnote]].
	--[[options = options or {}
	local hnOptions = {
		extraclasses = 'noprint relarticle mainarticle' --追加noprint的css类
		,selfref = options.selfref
	}
	return mHatnote._hatnote(text, hnOptions)]]
	return frame:expandTemplate{title="rellink",args={text,extraclasses='noprint relarticle mainarticle'}} --没想到Hatnote与{{rellink}}实现不同,替代品
end

return p