Module:Case

See usage on Template:T, Template:u, and template:l.

---

local p = {} --p stands for package

langObject = mw.getLanguage('simple')

function p.title_case(frame)
	parts = mw.text.split(frame.args.link, frame.args.split, true)
	title = ""
	for _, part in pairs(parts) do
	  title = title .. langObject:ucfirst(string.lower(part)) .. frame.args.split
	end
	if table.getn(parts) > 1 then
		title = string.sub(title, 0, string.len(title) - 1)
	end
    return "[[" .. frame.args.link .. "|" .. title .. "]]"
end

function p.uppercase_first_letter(frame)
    return "[[" .. frame.args.link .. "|" .. langObject:ucfirst(string.lower(frame.args.link)) .. "]]"
end

function p.lowercase(frame)
    return "[[" .. frame.args.link .. "|" .. string.lower(frame.args.link) .. "]]"
end

return p