Module:Category see also - Revision history

Ookami: 5 revisions imported

2020-09-03T13:37:39Z

5 revisions imported

← Older revision	Revision as of 13:37, 3 September 2020
(No difference)

Adam52: 1 revision imported

2020-08-22T20:23:47Z

1 revision imported

← Older revision	Revision as of 20:23, 22 August 2020
(No difference)

wk>Mr. Stradivarius: Protected "Module:Category see also": High-risk Lua module: 50,000+ transclusions ([Edit=Require template editor access] (indefinite) [Move=Require template editor access] (indefinite))

2018-01-27T05:50:30Z

Protected "Module:Category see also": High-risk Lua module: 50,000+ transclusions ([Edit=Require template editor access] (indefinite) [Move=Require template editor access] (indefinite))

← Older revision	Revision as of 05:50, 27 January 2018
(No difference)

meta>Mr. Stradivarius: better namespace handling for category names, and raise an error for invalid titles

2017-05-15T06:50:22Z

better namespace handling for category names, and raise an error for invalid titles

← Older revision		Revision as of 06:50, 15 May 2017
Line 50:		Line 50:
	end		end
	return function (category)		return function (category)
			local title = mw.title.new(category)
			local pageName, display
			if not title then
			-- category is not a valid title, usually because of invalid
			-- characters like < or [. Raise an error and suppress the stack
			-- level information so that we can catch it and format the error
			-- message as wikitext.
			error(string.format(
			"'%s' is not a valid category name",
			category
			), 0)
			elseif title.namespace == 14 then -- Category namespace
			pageName = title.text
			display = title.text
			else
			pageName = title.prefixedText
			display = category
			end
	-- We can get away with using two arguments even when		-- We can get away with using two arguments even when
	-- options.showDisplay is false, as string.format ignores extra		-- options.showDisplay is false, as string.format ignores extra
	-- arguments as long as there is an argument for each flag in the		-- arguments as long as there is an argument for each flag in the
	-- format string.		-- format string.
	return formatString:format(~~category~~, ~~category~~)		return formatString:format(pageName, display)
	end		end
	end		end
Line 72:		Line 90:
	local links = {}		local links = {}
	for i, cat in ipairs(args) do		for i, cat in ipairs(args) do
	links[i] = ~~makeCategoryLink~~(~~cat~~)		local success, categoryLink = pcall(makeCategoryLink, cat)
			if success then
			links[i] = categoryLink
			else
			-- If there was an error, then categoryLink is the error message.
			return makeWikitextError(categoryLink)
			end
	end		end

meta>Mr. Stradivarius: output "the categories" before the links if we have more than one link

2017-05-12T13:36:20Z

output "the categories" before the links if we have more than one link

← Older revision		Revision as of 13:36, 12 May 2017
Line 73:		Line 73:
	for i, cat in ipairs(args) do		for i, cat in ipairs(args) do
	links[i] = makeCategoryLink(cat)		links[i] = makeCategoryLink(cat)
			end

			local formatString
			if nLinks == 1 then
			formatString = '%s: %s.'
			else
			formatString = '%s: the categories %s.'
	end		end

Line 83:		Line 90:
	end		end

	local hatnoteText = ~~string.~~format(		local hatnoteText = formatString:format(
	~~'%s: %s.',~~
	args.LABEL or 'See also',		args.LABEL or 'See also',
	mw.text.listToText(links, ', ', conjunction)		mw.text.listToText(links, ', ', conjunction)

meta>Mr. Stradivarius: fix comment

2017-05-12T13:31:32Z

fix comment

← Older revision		Revision as of 13:31, 12 May 2017
Line 50:		Line 50:
	end		end
	return function (category)		return function (category)
	-- We can get away with using two arguments even when ~~showDisplay is~~		-- We can get away with using two arguments even when
	-- false, as string.format ignores extra arguments as long as there is		-- options.showDisplay is false, as string.format ignores extra
	-- an argument for each flag in the format string.		-- arguments as long as there is an argument for each flag in the
			-- format string.
	return formatString:format(category, category)		return formatString:format(category, category)
	end		end

meta>Mr. Stradivarius: keep the "Category:" prefix if we have one link

2017-05-12T13:29:58Z

keep the "Category:" prefix if we have one link

← Older revision		Revision as of 13:29, 12 May 2017
Line 12:		Line 12:
	end		end

	-- Given a ~~project string~~, returns a function that formats categories for ~~that~~		-- Gets the length of the sequence seq. Usually this should be done with the #
	-- project~~. The~~ project ~~can be nil, in which case it formats~~ the ~~category~~ for		-- operator, but we need to work with tables that get their values through an
	-- the ~~current~~ project.		-- __index metamethod.
			local function getSequenceLength(seq)
			local length = 0
			for i in ipairs(seq) do
			length = i
			end
			return length
			end

			-- Given a table of options, returns a function that formats categories for
			-- those options.
			--
			-- Options:
			-- project - a project code such as "fr" (for the French Wikipedia)
			-- showPrefix - a boolean value for whether to show the "Category:" prefix
			-- (and the project prefix if specified)
	--		--
	-- This is implemented as a function generator rather than a simple function		-- This is implemented as a function generator rather than a simple function
	-- so that we can just process the ~~project name~~ once, instead of every time		-- so that we can just process the options once, instead of every time we
	-- we generate a category.		-- generate a category.
	local function ~~generateCategoryLinkMaker~~(~~project~~)		local function newCategoryLinker(options)
	local formatString		local formatString
	if project then		if options.project then
	formatString = '[[:' .. project .. ':Category:%s\|%s]]'		if options.showPrefix then
			formatString = '[[:' .. options.project .. ':Category:%s]]'
			else
			formatString = '[[:' .. options.project .. ':Category:%s\|%s]]'
			end
	else		else
	formatString = '[[:Category:%s\|%s]]'		if options.showPrefix then
			formatString = '[[:Category:%s]]'
			else
			formatString = '[[:Category:%s\|%s]]'
			end
	end		end
	return function (category)		return function (category)
			-- We can get away with using two arguments even when showDisplay is
			-- false, as string.format ignores extra arguments as long as there is
			-- an argument for each flag in the format string.
	return formatString:format(category, category)		return formatString:format(category, category)
	end		end
Line 32:		Line 58:

	function p._main(args)		function p._main(args)
	if ~~not args[~~1] then		local nLinks = getSequenceLength(args)

			if nLinks < 1 then
	return makeWikitextError('at least one parameter required')		return makeWikitextError('at least one parameter required')
	end		end
	local makeCategoryLink = ~~generateCategoryLinkMaker(~~args.project)
			local makeCategoryLink = newCategoryLinker{
			project = args.project,
			showPrefix = nLinks == 1,
			}

	local links = {}		local links = {}
	for i, cat in ipairs(args) do		for i, cat in ipairs(args) do
	links[i] = makeCategoryLink(cat)		links[i] = makeCategoryLink(cat)
	end		end

			-- Don't output a comma before the "and" if we have only two links.
			local conjunction
			if nLinks == 2 then
			conjunction = ' and '
			else
			conjunction = ', and '
			end

	local hatnoteText = string.format(		local hatnoteText = string.format(
	'%s: %s.',		'%s: %s.',
	args.LABEL or 'See also',		args.LABEL or 'See also',
	mw.text.listToText(links, ', ', ~~', and '~~)		mw.text.listToText(links, ', ', conjunction)
	)		)
	return mHatnote._hatnote(hatnoteText, {selfref = true})		return mHatnote._hatnote(hatnoteText, {selfref = true})

meta>Mr. Stradivarius: create replacement for Template:Category see also

2017-05-12T12:45:07Z

create replacement for Template:Category see also

New page

-- This module implements {{Category see also}}

local mHatnote = require('Module:Hatnote')

local p = {}

local function makeWikitextError(msg)
return string.format(
'<strong class="error">Error: %s ([[Template:Category see also]])</strong>',
msg
)
end

-- Given a project string, returns a function that formats categories for that
-- project. The project can be nil, in which case it formats the category for
-- the current project.
--
-- This is implemented as a function generator rather than a simple function
-- so that we can just process the project name once, instead of every time
-- we generate a category.
local function generateCategoryLinkMaker(project)
local formatString
if project then
formatString = '[[:' .. project .. ':Category:%s|%s]]'
else
formatString = '[[:Category:%s|%s]]'
end
return function (category)
return formatString:format(category, category)
end
end

function p._main(args)
if not args[1] then
return makeWikitextError('at least one parameter required')
end
local makeCategoryLink = generateCategoryLinkMaker(args.project)
local links = {}
for i, cat in ipairs(args) do
links[i] = makeCategoryLink(cat)
end
local hatnoteText = string.format(
'%s: %s.',
args.LABEL or 'See also',
mw.text.listToText(links, ', ', ', and ')
)
return mHatnote._hatnote(hatnoteText, {selfref = true})
end

function p.main(frame)
local args = require('Module:Arguments').getArgs(frame, {
wrappers = 'Template:Category see also',
})
return p._main(args)
end

return p