Module:Doorverwijspagina

Moduledocumentatie​[bekijk] [bewerk] [ververs] [geschiedenis]

Module voor doorverwijspagina's.

Functies:

• dpintro: voor {{dpintro}}
• getlabel: voor {{dp}}

-- Module for disambiguation page stuff
local p = {}

function getlabel()
	local label = mw.title.getCurrentTitle().prefixedText
	label = string.gsub(label, "^(.*) %(doorverwijspagina%)$", "%1")
	return label
end

-- [[sjabloon:dpintro]]
function p.dpintro(frame)
	-- convert parent frame's args from a metatable to a regular table
	local args = {}
	for k, v in pairs(frame:getParent().args) do
		args[k] = v
	end
	if args[2] ~= nil and args[1] == nil then
		args[1] = mw.title.getCurrentTitle().prefixedText
	end
	local r
	if #args > 1 then
		for index, arg in ipairs(args) do
			if index == 1 then
				r = ""
			elseif index == #args then
				r = r .. " of "
			else
				r = r .. ", "
			end
			r = r .. "'''" .. arg .. "'''"
		end
	else
		local label
		if args and #args == 1 then
			label = args[1]
		else
			label = getlabel()
		end
		r = "'''" .. label .. "'''"
    end
	r = r .. " kan verwijzen naar:"

    return r
end

-- [[sjabloon:dp]]
function p.dp_zoek(frame)
	local label = getlabel()
	return "Bekijk alle artikelen waarvan de titel [[Speciaal:Prefixindex/" .. 
		label .. "|begint met '''" .. label .. "''']] of [[Speciaal:Zoeken/intitle:\"" .. 
		label .. "\"|met '''" .. label .. "''' in de titel]]."
end

-- [[sjabloon:dp]]
function p.dp_uitleg(frame)
	local label = getlabel()
	return "Dit is een '''[[Wikipedia:Doorverwijspagina|doorverwijspagina]]''', " ..
		"bedoeld om de verschillen in betekenis of gebruik van ''" .. 
		label .. "'' inzichtelijk te maken. \n" ..
		"<small>Op deze pagina staat een uitleg van de verschillende betekenissen van ''" .. 
		label .. "'' en [[Speciaal:VerwijzingenNaarHier/" .. label .. 
		"|verwijzingen]] daarnaartoe. Bent u hier via een pagina in Wikipedia terechtgekomen? " ..
		"Pas dan de verwijzing naar deze doorverwijspagina aan, " ..
		"zodat toekomstige bezoekers direct op de juiste pagina terechtkomen.</small>"
end

return p