Module:Section link - Revision history

Wprecht: 1 revision imported

2022-02-08T19:21:07Z

1 revision imported

← Older revision	Revision as of 12:21, 8 February 2022
(No difference)

Wprecht: 1 revision imported

2022-02-08T19:20:54Z

1 revision imported

← Older revision	Revision as of 12:20, 8 February 2022
(No difference)

Wprecht: 1 revision imported

2020-12-22T01:15:34Z

1 revision imported

← Older revision		Revision as of 18:15, 21 December 2020
Line 1:		Line 1:
	-- This module implements {{section link}}.		-- This module implements {{section link}}.
	~~require('Module:No globals');~~

	local checkType = require('libraryUtil').checkType		local checkType = require('libraryUtil').checkType
Line 9:		Line 8:
	display = display or section		display = display or section
	page = page or ''		page = page or ''
	~~-- MediaWiki doesn't allow these in `page`, so only need to do for `section`~~
	~~if type(section) == 'string' then~~
	~~section = string.gsub(section, "{", "{")~~
	~~section = string.gsub(section, "}", "}")~~
	~~end~~
	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, "'", ""), '"', '')~~
	~~title = mw.ustring.gsub(title, "%b<>", "")~~
	~~return mw.title.new(title).prefixedText~~
	end		end

Line 52:		Line 40:
	local linkPage = page or ''		local linkPage = page or ''
	local section = sections[1] or 'Notes'		local section = sections[1] or 'Notes'
	local display = '§&~~nbsp~~;' .. section		local display = '§ ' .. section
	if isShowingPage then		if isShowingPage then
	page = page or title.prefixedText		page = page or title.prefixedText
	~~if options.display and options.display ~= '' then~~		display = page .. ' ' .. display
	~~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)
Line 90:		Line 66:

	-- Add the intro text.		-- Add the intro text.
	local intro = '§§&~~nbsp~~;'		local intro = '§§ '
	if isShowingPage then		if isShowingPage then
	intro = (page or title.prefixedText) .. ' ' .. intro		intro = (page or title.prefixedText) .. ' ' .. intro
Line 101:		Line 77:

	function p.main(frame)		function p.main(frame)
	~~local yesno = require('Module:Yesno')~~
	local args = require('Module:Arguments').getArgs(frame, {		local args = require('Module:Arguments').getArgs(frame, {
	wrappers = 'Template:Section link',		wrappers = 'Template:Section link',
Line 112:		Line 87:
	end		end
	})		})

	~~for k, v in pairs(args) do -- replace underscores in the positional parameter values~~
	~~if 'number' == type(k) then~~
	~~if not yesno (args['keep-underscores']) then -- unless \|keep-underscores=yes~~
	~~args[k] = mw.uri.decode (v, 'WIKI'); -- percent-decode; replace underscores with space characters~~
	~~else~~
	~~args[k] = mw.uri.decode (v, 'PATH'); -- percent-decode; retain underscores~~
	~~end~~
	~~end~~
	~~end~~

	-- Sort the arguments.		-- Sort the arguments.
Line 130:		Line 95:
	-- 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 = ~~mw.text.decode(~~v~~, true)~~		page = v
	elseif type(k) == 'number' then		elseif type(k) == 'number' then
	sections[k] = v		sections[k] = v
Line 136:		Line 101:
	options[k] = v		options[k] = v
	end		end
	~~end~~

	~~options.nopage = yesno (options.nopage); -- make boolean~~

	~~-- 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

ll>Primefac: fix error for when {{}} are used inside of the slink (TPER)

2020-06-30T19:17:25Z

fix error for when {{}} are used inside of the slink (TPER)

Show changes

ll>Primefac: done

2017-01-17T01:29:39Z

done

@@ Line 1: / Line 1: @@
--- This module implements {{section link}}.
+{{#invoke:Section link|main}}<noinclude>
+{{documentation}}
-local checkType = require('libraryUtil').checkType
+<!--  Categories go on the /doc subpage and interwikis go on Wikidata. -->
+</noinclude>

commons>Legoktm: Fixing content model

2015-07-29T23:31:27Z

Fixing content model

New page

-- This module implements {{section link}}.

local checkType = require('libraryUtil').checkType

local p = {}

local function makeSectionLink(page, section, display)
display = display or section
page = page or ''
return string.format('[[%s#%s|%s]]', page, section, display)
end

function p._main(page, sections, options, title)
-- Validate input.
checkType('_main', 1, page, 'string', true)
checkType('_main', 3, options, 'table', true)
if sections == nil then
sections = {}
elseif type(sections) == 'string' then
sections = {sections}
elseif type(sections) ~= 'table' then
error(string.format(
"type error in argument #2 to '_main' " ..
"(string, table or nil expected, got %s)",
type(sections)
), 2)
end
options = options or {}
title = title or mw.title.getCurrentTitle()

-- Deal with blank page names elegantly
if page and not page:find('%S') then
page = nil
options.nopage = true
end

-- Make the link(s).
local isShowingPage = not options.nopage
if #sections <= 1 then
local linkPage = page or ''
local section = sections[1] or 'Notes'
local display = '§ ' .. section
if isShowingPage then
page = page or title.prefixedText
display = page .. ' ' .. display
end
return makeSectionLink(linkPage, section, display)
else
-- Multiple sections. First, make a list of the links to display.
local ret = {}
for i, section in ipairs(sections) do
ret[i] = makeSectionLink(page, section)
end

-- Assemble the list of links into a string with mw.text.listToText.
-- We use the default separator for mw.text.listToText, but a custom
-- conjunction. There is also a special case conjunction if we only
-- have two links.
local conjunction
if #sections == 2 then
conjunction = ' and '
else
conjunction = ', and '
end
ret = mw.text.listToText(ret, nil, conjunction)

-- Add the intro text.
local intro = '§§ '
if isShowingPage then
intro = (page or title.prefixedText) .. ' ' .. intro
end
ret = intro .. ret

return ret
end
end

function p.main(frame)
local args = require('Module:Arguments').getArgs(frame, {
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
})

-- Sort the arguments.
local page
local sections, options = {}, {}
for k, v in pairs(args) do
if k == 1 then
-- Doing this in the loop because of a bug in [[Module:Arguments]]
-- when using pairs with deleted arguments.
page = v
elseif type(k) == 'number' then
sections[k] = v
else
options[k] = v
end
end

-- Compress the sections array.
local function compressArray(t)
local nums, ret = {}, {}
for num in pairs(t) do
nums[#nums + 1] = num
end
table.sort(nums)
for i, num in ipairs(nums) do
ret[i] = t[num]
end
return ret
end
sections = compressArray(sections)

return p._main(page, sections, options)
end

return p