模块:See also
此模块的文档可以在模块:See also/doc创建
--[[
-- This module produces a "See also: a, b and c" link. It implements the
-- template {{see also}}.
--]]
local mHatnote = require('Module:Hatnote')
local mTableTools -- lazily initialise
local mArguments -- lazily initialise
local p = {}
function p.seeAlso(frame)
mTableTools = require('Module:TableTools')
mArguments = require('Module:Arguments')
local args = mArguments.getArgs(frame, {parentOnly = true})
local pages = {}
for k, v in pairs(args) do
if type(k) == 'number' then
local numstring = tostring(k)
local display = args['label ' .. numstring]
or args['l' .. numstring]
local page = {v, display}
pages[k] = page
end
end
pages = mTableTools.compressSparseArray(pages)
if not pages[1] then
return mHatnote.makeWikitextError(
'未指定页面名称',
'Template:See also#错误',
args.category
)
end
local options = {
altphrase = args.altphrase,
selfref = args.selfref
}
return p._seeAlso(options, unpack(pages))
end
function p._seeAlso(options, ...)
local altphrase = options and options.altphrase or '参见'
local links = mHatnote.formatPageTables(...)
links = mw.text.listToText(links)
local text = altphrase .. '：' .. links
-- Pass options through.
local hnOptions = {}
hnOptions.selfref = options.selfref
hnOptions.extraclasses = 'rellink boilerplate seealso noprint'
return mHatnote._hatnote(text, hnOptions)
end
return p