Module:Sandbox/Peter SamFan/Test explained

-- This module implements .

local yesno = require('Module:Yesno')

local p =

function p.main(frame) local args = require('Module:Arguments').getArgs(frame,) return p.luaMain(args)end

function p.luaMain(args) if not args[1] and not args.url then return end local data = p.makeLinkData(args) local link = p.renderLink(data) local trackingCategories = p.renderTrackingCategories(args) return link .. trackingCategoriesend

function p.makeLinkData(args) local data =

-- Get the link and display values, and find whether we are outputting a -- wikilink or a URL. if args.url then data.isUrl = true data.link = args.url if args[1] then data.display = args[1] else data.display = args.url end else data.isUrl = false data.link = args[1] if args[2] then data.display = args[2] else data.display = args[1] end end

-- Classes local class = args.class and args.class:lower data.classes = if class

'ui-button-green' or class

'ui-button-blue' or class

'ui-button-red' then table.insert(data.classes, 'submit ui-button ui-widget ui-state-default ui-corner-all' .. ' ui-button-text-only ui-button-text' ) else table.insert(data.classes, 'mw-ui-button') end if class then table.insert(data.classes, class) end

-- Styles do ---- Check whether we are on the same page as we have specified in -- args[1], but not if we are using a URL link, as then args[1] is only -- a display value. If we are currently on the page specified in -- args[1] make the button colour darker so that it stands out from -- other buttons on the page. -- local success, linkTitle, currentTitle if not data.isUrl then currentTitle = mw.title.getCurrentTitle success, linkTitle = pcall(mw.title.new, args[1]) end if success and linkTitle and mw.title.equals(currentTitle, linkTitle) then if class

'ui-button-blue' or class

'mw-ui-progressive' then data.backgroundColor = '#2962CB' elseif class

'ui-button-green' or class

'mw-ui-constructive' then data.backgroundColor = '#008B6D' elseif class

'ui-button-red' or class

'mw-ui-destructive' then data.backgroundColor = '#A6170F' else data.backgroundColor = '#CCC' data.color = '#666' end end -- Add user-specified styles. data.style = args.style end

return dataend

function p.renderLink(data) -- Render the display span tag. local display do local displaySpan = mw.html.create('span') for i, class in ipairs(data.classes or) do displaySpan:addClass(class) end displaySpan :attr('role', 'button') :attr('aria-disabled', 'false') :css if data.style then displaySpan:cssText(data.style) end displaySpan:wikitext(data.display) display = tostring(displaySpan) end

-- Render the link local link if data.isUrl then link = string.format('[%s %s]', data.link, display) else link = string.format('%s', data.link, display) end

return string.format('

%s', link)end

function p.renderTrackingCategories(args) if yesno(args.category)

false then return end local class = args.class and args.class:lower if class

'ui-button-green' or class

'ui-button-blue' or class

'ui-button-red' then return '' else return endend

return p