Module:Clickable button

This module implements Template:Clickable button

-- This module implements {{clickable button}}.
localyesno=require('Module:Yesno')
localp={}
functionp.main(frame)
localargs=require('Module:Arguments').getArgs(frame,{
wrappers='Template:Clickable button'
})
returnp.luaMain(args)
end
functionp.luaMain(args)
localdata=p.makeLinkData(args)
locallink=p.renderLink(data)
localtrackingCategories=p.renderTrackingCategories(args)
returnlink..trackingCategories
end
functionp.makeLinkData(args)
localdata={}
-- Get the link and display values, and find whether we are outputting a
-- wikilink or a URL.
ifargs.urlthen
data.isUrl=true
data.link=args.url
ifargs[1]=='none'then
data.display=''
elseifargs[1]then
data.display=args[1]
else
data.display=args.url
end
else
data.isUrl=false
data.link=args[1]
ifargs[2]=='none'then
data.display=''
elseifargs[2]then
data.display=args[2]
else
data.display=args[1]
end
end
-- Classes
localclass=args.classandargs.class:lower()
data.classes={}
ifclass=='ui-button-green'
orclass=='ui-button-blue'
orclass=='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'
)
elseifstring.find(tostring(class),'none')then
table.insert(data.classes,'')
else
table.insert(data.classes,'mw-ui-button')
end
ifclassthen
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.
		--]]
localsuccess,linkTitle,currentTitle
ifnotdata.isUrlthen
currentTitle=mw.title.getCurrentTitle()
success,linkTitle=pcall(mw.title.new,args[1])
end
ifsuccess
andlinkTitle
andmw.title.equals(currentTitle,linkTitle)
then
ifclass=='ui-button-blue'
orclass=='mw-ui-progressive'
orclass=='mw-ui-constructive'
then
data.backgroundColor='#2962CB'
elseifclass=='ui-button-green'then
data.backgroundColor='#008B6D'
elseifclass=='ui-button-red'orclass=='mw-ui-destructive'then
data.backgroundColor='#A6170F'
else
data.backgroundColor='#CCC'
data.color='#666'
end
end
-- Add user-specified styles.
data.style=args.style
data.localUrl=args[1]
data.url=args.url
data.title=args.title
data.pre=args.pre
data.post=args.post
end
returndata
end
functionp.renderLink(data)
-- Render the display span tag.
localdisplay
localdisplaySpan=mw.html.create('span')
fori,classinipairs(data.classesor{})do
displaySpan:addClass(class)
end
displaySpan
:css{
['background-color']=data.backgroundColor,
color=data.color
}
ifdata.stylethen
displaySpan:cssText(data.style)
end
displaySpan:wikitext(data.display)
localdisplay=tostring(displaySpan)
localtitle=data.titleandtostring(data.title)or''
localpre=data.preandtostring(data.pre)or''
localpost=data.postandtostring(data.post)or''
-- Render the link
locallink
ifnotdata.localUrlandnotdata.urlthen
link=display
elseifdata.isUrlthen
link=string.format('[%s %s]',data.link,display)
else
link=string.format('[[%s|%s]]',data.link,display)
end
returnstring.format('<span class="plainlinks" title="%s">%s%s%s</span>',title,pre,link,post)
end
functionp.renderTrackingCategories(args)
ifyesno(args.category)==falsethen
return''
end
localclass=args.classandargs.class:lower()
ifclass=='ui-button-green'
orclass=='ui-button-blue'
orclass=='ui-button-red'
then
return'[[Category:Pages using old style ui-button-color]]'
else
return''
end
end
returnp