Modulo:Sandbox/Sakretsu

local p = {}

function p.hasTemplate(frame)
	local template_name = mw.text.trim(frame.args[1] or '')
	if template_name == '' then return end
	local first_char = template_name:match('^%a')
	if first_char then
		first_char = string.format('[%s%s]', first_char:upper(), first_char:lower())
		template_name = template_name:gsub('^.', first_char)
	end
	local content = mw.title.getCurrentTitle():getContent()
	content = content:gsub('<[Rr][Ee][Ff].->.-</[Rr][Ee][Ff]%s*>', '')
	if content:match('{{%s*' .. template_name .. '%s*[|}]') then
		return 1
	else
		return
	end
end

return p