Module:Respell

Documentation for this module may be created at Module:Respell/doc

local p = {}

function p._main(args)
	local ret = {}
	local link
	for i, v in ipairs(args) do
		v = mw.text.trim(v)
		-- Compatibility: Ignore arguments that only contain an apostrophe
		if v ~= '' and v ~= "'" then
			if ret[#ret] and not (ret[#ret]:find('_') or ret[#ret]:find('%-$'))
				and not (v:find('_') or v:find('^%-'))
			then
				table.insert(ret, '-')
			end
			if v:find('^%u+$') then
				v = '<span style="font-size:90%">' .. v .. '</span>'
			end
			table.insert(ret, v)
		end
		-- For documentation: Blank parameter at the end suppresses the link
		if not args[i + 1] and v ~= '' then link = true end
	end
	ret = '<i title="English pronunciation respelling">' ..
		table.concat(ret):gsub('_', ' ')
			:gsub(' %-', ' -&#8288;') -- Avoid dangling hyphens
			:gsub('^%-', '-&#8288;')
		.. '</i>'
	ret = link and '[[wikipedia:Help:Pronunciation respelling key|' .. ret .. ']]' or ret
	return ret
end

function p.main(frame)
	return p._main(frame:getParent().args)
end

return p