Module:Section link: Difference between revisions

m
14 revisions imported from templatewiki:Module:Section_link
m>Mr. Stradivarius
(create replacement for Template:Section link)
 
m (14 revisions imported from templatewiki:Module:Section_link)
 
(13 intermediate revisions by 5 users not shown)
Line 4: Line 4:


local p = {}
local p = {}
local function makeWikitextError(msg)
return string.format(
'<strong class="error">[[Template:Section link]] error: %s.</strong>',
msg
)
end


local function makeSectionLink(page, section, display)
local function makeSectionLink(page, section, display)
Line 16: Line 9:
page = page or ''
page = page or ''
return string.format('[[%s#%s|%s]]', page, section, display)
return string.format('[[%s#%s|%s]]', page, section, display)
end
local function normalizeTitle(title)
title = mw.ustring.gsub(mw.ustring.gsub(title,"'",""),'"','')
return mw.title.new(mw.ustring.gsub(title,"%b<>","")).prefixedText
end
end


Line 22: Line 20:
checkType('_main', 1, page, 'string', true)
checkType('_main', 1, page, 'string', true)
checkType('_main', 3, options, 'table', true)
checkType('_main', 3, options, 'table', true)
if type(sections) == 'string' then
if sections == nil then
sections = {}
elseif type(sections) == 'string' then
sections = {sections}
sections = {sections}
elseif type(sections) ~= 'table' then
elseif type(sections) ~= 'table' then
error(string.format(
error(string.format(
"type error in argument #2 to '_main' (string or table expected, got %s)",
"type error in argument #2 to '_main' " ..
"(string, table or nil expected, got %s)",
type(sections)
type(sections)
), 2)
), 2)
Line 32: Line 33:
options = options or {}
options = options or {}
title = title or mw.title.getCurrentTitle()
title = title or mw.title.getCurrentTitle()
if #sections < 1 then
 
return makeWikitextError('at least one section must be specified')
-- Deal with blank page names elegantly
if page and not page:find('%S') then
page = nil
options.nopage = true
end
end


-- Make the link(s).
-- Make the link(s).
local isShowingPage = not options.nopage
local isShowingPage = not options.nopage
if #sections == 1 then
if #sections <= 1 then
local linkPage = page or ''
local linkPage = page or ''
local section = sections[1] or 'Notes'
local section = sections[1] or 'Notes'
local display = '§&thinsp;' .. section
local display = '§&nbsp;' .. section
if isShowingPage then
if isShowingPage then
page = page or title.prefixedText
page = page or title.prefixedText
display = page .. ' ' .. display
if options.display and options.display ~= '' then
if normalizeTitle(options.display) == normalizeTitle(page) then
display = options.display .. ' ' .. display
else
error(string.format(
'Display title "%s" was ignored since it is ' ..
"not equivalent to the page's actual title",
options.display
), 0)
end
else
display = page .. ' ' .. display
end
end
end
return makeSectionLink(linkPage, section, display)
return makeSectionLink(linkPage, section, display)
else
else
-- Multiple sections. First, make the list of links.
-- Multiple sections. First, make a list of the links to display.
local ret = {}
local ret = {}
for i, section in ipairs(sections) do
for i, section in ipairs(sections) do
ret[i] = makeSectionLink(page, section)
ret[i] = makeSectionLink(page, section)
end
end
 
-- Assemble the list of links into a string with mw.text.listToText.
-- Assemble the list of links into a string with mw.text.listToText.
-- We use the default arguments for mw.text.listToText, unless we have
-- We use the default separator for mw.text.listToText, but a custom
-- exactly two sections, in which case we use a custom conjunction.
-- conjunction. There is also a special case conjunction if we only
-- have two links.
local conjunction
local conjunction
if #sections == 2 then
if #sections == 2 then
conjunction = '&#8203; and '
conjunction = '&#8203; and '
else
conjunction = ', and '
end
end
ret = mw.text.listToText(ret, nil, conjunction)
ret = mw.text.listToText(ret, nil, conjunction)


-- Add the intro text.
-- Add the intro text.
local intro = '§§&thinsp;'
local intro = '§§&nbsp;'
if isShowingPage then
if isShowingPage then
intro = (page or title.prefixedText) .. ' ' .. intro
intro = (page or title.prefixedText) .. ' ' .. intro
end
end
ret = intro .. ret
ret = intro .. ret
 
return ret
return ret
end
end
Line 76: Line 95:
function p.main(frame)
function p.main(frame)
local args = require('Module:Arguments').getArgs(frame, {
local args = require('Module:Arguments').getArgs(frame, {
wrappers = 'Template:Section link'
wrappers = 'Template:Section link',
valueFunc = function (key, value)
value = value:match('^%s*(.-)%s*$') -- Trim whitespace
-- Allow blank first parameters, as the wikitext template does this.
if value ~= '' or key == 1 then
return value
end
end
})
})


Line 86: Line 112:
-- Doing this in the loop because of a bug in [[Module:Arguments]]
-- Doing this in the loop because of a bug in [[Module:Arguments]]
-- when using pairs with deleted arguments.
-- when using pairs with deleted arguments.
page = v
page = mw.text.decode(v, decodeNamedEntities)
elseif type(k) == 'number' then
elseif type(k) == 'number' then
sections[k] = v
sections[k] = v
Line 92: Line 118:
options[k] = v
options[k] = v
end
end
end
-- Extract section from page, if present
if page then
local p, s = page:match('^(.-)#(.*)$')
if p then page, sections[1] = p, s end
end
end


Line 107: Line 139:
end
end
sections = compressArray(sections)
sections = compressArray(sections)
 
return p._main(page, sections, options)
return p._main(page, sections, options)
end
end


return p
return p