Module:Template link general

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

-- Is a string non-empty? local _ne = require('Module:Yesno')

local nw = mw.text.nowiki

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 =  .. textPart ..  if _ne(args.braceinside) then titlePart = nw('{') .. titlePart .. nw('}') end return titlePart end

function p.main(frame) local args = getArgs(frame, {		trim = true,		removeBlanks = false	}) return p._main(args) end

function p._main(args) -- TemplateStyles local templateStyles = { mono  = false, nowrap = false, }

local bold = _ne(args.bold) or _ne(args.boldlink) or _ne(args.boldname) local italic = _ne(args.italic) or _ne(args.italics) local dontBrace = _ne(args.brace) or _ne(args.braceinside) local code = _ne(args.code) or _ne(args.tt) local classes = {}

-- Build the link part local titlePart = linkTitle(args) if bold then titlePart = "'''" .. titlePart .. "'''" end if _ne(args.nowrapname) then templateStyles.nowrap = true titlePart = ' ' .. titlePart .. ' '	end

-- Build the arguments local textPart = "" local textPartBuffer = "" local i = 2 while args[i] do		local val = args[i] textPartBuffer = textPartBuffer .. '&#124;'		if val ~= "" then if _ne(args.nowiki) then -- Unstrip nowiki tags first because calling nw on something that already contains nowiki tags will -- mangle the nowiki strip marker and result in literal UNIQ...QINU showing up				val = nw(mw.text.unstripNoWiki(val)) end if italic then val = ' ' .. val .. ' ' end textPart = textPart .. textPartBuffer .. val textPartBuffer = "" end i = i+1 end

local tagName = nil local css = nil

-- final wrap local ret = titlePart .. textPart if not dontBrace then ret = nw('') end if _ne(args.a) then ret = nw('*') .. ' ' .. ret end if _ne(args.kbd) then tagName = 'kbd' end

if _ne(args.mono) then templateStyles.mono = true table.insert(classes, 'monospaced') end

local plaincode = _ne(args.plaincode) and not code if code or plaincode then if tagName then -- kbd == true && code == true ret = ('%s'):format(tagName, ret, tagName) end tagName = 'code' if plaincode then css = { background = 'transparent', border    = 'none', }		end end

if _ne(args.nowrap) then templateStyles.nowrap = true table.insert(classes, 'nowrap') end

if tagName or #classes > 0 or css then local span = mw.html.create(tagName or 'span') :addClass(table.concat(classes, ' ')) :wikitext(ret)

if css then span:css(css) end ret = tostring(span:allDone) end

local ts = {} if templateStyles.mono then table.insert(ts, mw.getCurrentFrame:extensionTag{			name = 'templatestyles',			args = { src = 'Template:Mono/styles.css' }		}) end

if templateStyles.nowrap then table.insert(ts, mw.getCurrentFrame:extensionTag{			name = 'templatestyles',			args = { src = 'Template:Nowrap/styles.css' }		}) end

if _ne(args.debug) then ret = ret .. '\n ' .. mw.text.encode(mw.dumpObject(args)) .. ' '	end

return table.concat(ts) .. ret end

return p