Module:Tlg

-- This implements Template:Tlg local getArgs = require('Module:Arguments').getArgs local p = {}

-- Is a string non-empty? local function _ne(s) return s ~= nil and s ~= "" end

local function addTemplate(s) local i, _ = s:find(':', 1, true) if i == nil then return 'Template:' .. s	end local ns = s:sub(1, i - 1) if ns == '' or mw.site.namespaces[ns] then return s	else return 'Template:' .. s	end end

local function trimTemplate(s) local needle = 'template:' if s:sub(1, needle:len):lower == needle then return s:sub(needle:len + 1) else return s	end end

local function linkTitle(args) if _ne(args.nolink) then return args['1'] end local titleObj local titlePart = '[[:'	if args['1'] then		-- This handles :Page and other NS		titleObj = mw.title.new(args['1'], 'Template')	else		titleObj = mw.title.getCurrentTitle	end	titlePart = titlePart .. (titleObj ~= nil and titleObj.fullText or				addTemplate(args['1']))	local textPart = args.alttext	if not _ne(textPart) then		if titleObj ~= nil then			textPart = titleObj.ns == 10 and titleObj.text or titleObj.fullText		else			-- redlink			textPart = trimTemplate(args['1'])		end	end	if _ne(args.subst) then		textPart = 'subst:' .. textPart	end	if _ne(args.brace) then		textPart = ''	elseif _ne(args.braceinside) then		textPart = '{' .. textPart .. '}'	end	titlePart = titlePart .. '&#124;' .. textPart	if _ne(args.braceinside) then		titlePart = '{' .. titlePart .. '}'	end	return titlePart end

function p.main(frame) local args = getArgs(frame) return p._main(args) end

function p._main(args) local bold = _ne(args.bold) or _ne(args.boldlink) or _ne(args.boldname) local italic = _ne(args.italic) or _ne(italic.italics) local dontBrace = _ne(args.brace) or _ne(args.braceinside) local code = _ne(args.code) or _ne(args.tt) -- Build the link part local titlePart = linkTitle(args) if bold then titlePart = "'''" .. titlePart .. "'''" end if _ne(args.nowrapname) then titlePart = ' ' .. titlePart .. ' ' end -- Build the arguments local textPart = "" for i = 2, 11 do		local ii = tostring(i) local val = args[ii] if not _ne(ii) then break end if not _ne(args.yeswiki) then val = ' ' .. val .. ' ' end if italic then val = ' ' .. val .. ' ' end textPart = textPart .. '&#124;' .. val end if _ne(args['12']) then textPart = textPart .. '&#124;…' end -- final wrap local ret = titlePart .. textPart if not dontBrace then ret = '' end if _ne(args.a) then ret = ' * ' .. ret end if _ne(args.kbd) then ret = ' ' .. ret .. ' ' end if code then ret = ' ' elseif _ne(args.plaincode) then ret = ' ' end if _ne(args.nowrap) then ret = ' ' .. ret .. ' ' end return ret end

return p