MKWii TAS Wiki

Module:Navbox: Difference between revisions

← Older edit
Change navbox template
change module navbox to wikipedia
 
Line 77: Line 77:
end
end
return item
return item
end
-- Separate function so that we can evaluate properly whether hlist should
-- be added by the module
local function has_navbar()
return args.navbar ~= 'off' and args.navbar ~= 'plain' and not
(not args.name and mw.getCurrentFrame():getParent():getTitle():gsub('/sandbox$', '') == 'Template:Navbox')
end
end


local function renderNavBar(titleCell)
local function renderNavBar(titleCell)


if has_navbar() then
if args.navbar ~= 'off' and args.navbar ~= 'plain' and not (not args.name and mw.getCurrentFrame():getParent():getTitle():gsub('/sandbox$', '') == 'Template:Navbox') then
titleCell:wikitext(navbar{
titleCell:wikitext(navbar{
args.name,
args.name,
-- we depend on this being mini = 1 when the navbox module decides
-- to add hlist templatestyles. we also depend on navbar outputting
-- a copy of the hlist templatestyles.
mini = 1,
mini = 1,
fontstyle = (args.basestyle or '') .. ';' .. (args.titlestyle or '') .. ';background:none transparent;border:none;box-shadow:none; padding:0;'
fontstyle = (args.basestyle or '') .. ';' .. (args.titlestyle or '') .. ';background:none transparent;border:none;box-shadow:none;padding:0;'
})
})
end
end
Line 125: Line 115:
if args.titlegroup then
if args.titlegroup then
titleCell
titleCell
:addClass('navbox-title1')
:css('border-left', '2px solid #fdfdfd')
:css('width', '100%')
end
end


Line 201: Line 192:
row
row
:tag('td')
:tag('td')
:addClass('noviewer')
:addClass('navbox-image')
:addClass('navbox-image')
:addClass(args.imageclass)
:addClass(args.imageclass)
Line 237: Line 229:
if args['group' .. listnum] then
if args['group' .. listnum] then
listCell
listCell
:addClass('navbox-list1')
:css('text-align', 'left')
:css('border-left-width', '2px')
:css('border-left-style', 'solid')
else
else
listCell:attr('colspan', 2)
listCell:attr('colspan', 2)
Line 275: Line 269:
row
row
:tag('td')
:tag('td')
:addClass('noviewer')
:addClass('navbox-image')
:addClass('navbox-image')
:addClass(args.imageclass)
:addClass(args.imageclass)
Line 301: Line 296:
}
}
return not (listClasses[args.listclass] or listClasses[args.bodyclass])
return not (listClasses[args.listclass] or listClasses[args.bodyclass])
end
-- there are a lot of list classes in the wild, so we have a function to find
-- them and add their TemplateStyles
local function addListStyles()
local frame = mw.getCurrentFrame()
-- TODO?: Should maybe take a table of classes for e.g. hnum, hwrap as above
-- I'm going to do the stupid thing first though
-- Also not sure hnum and hwrap are going to live in the same TemplateStyles
-- as hlist
local function _addListStyles(htmlclass, templatestyles)
local class_args = { -- rough order of probability of use
'bodyclass', 'listclass', 'aboveclass', 'belowclass', 'titleclass',
'navboxclass', 'groupclass', 'titlegroupclass', 'imageclass'
}
local patterns = {
'^' .. htmlclass .. '$',
'%s' .. htmlclass .. '$',
'^' .. htmlclass .. '%s',
'%s' .. htmlclass .. '%s'
}
local found = false
for _, arg in ipairs(class_args) do
for _, pattern in ipairs(patterns) do
if mw.ustring.find(args[arg] or '', pattern) then
found = true
break
end
end
if found then break end
end
if found then
return frame:extensionTag{
name = 'templatestyles', args = { src = templatestyles }
}
else
return ''
end
end
local hlist_styles = ''
-- navbar always has mini = 1, so here (on this wiki) we can assume that
-- we don't need to output hlist styles in navbox again.
if not has_navbar() then
hlist_styles = _addListStyles('hlist', 'Flatlist/styles.css')
end
local plainlist_styles = _addListStyles('plainlist', 'Plainlist/styles.css')
return hlist_styles .. plainlist_styles
end
end


Line 370: Line 315:


local function isIllegible()
local function isIllegible()
-- require('Module:Color contrast') absent on mediawiki.org
local styleratio = require('Module:Color contrast')._styleratio
 
for key, style in pairs(args) do
if tostring(key):match("style$") then
if styleratio{mw.text.unstripNoWiki(style)} < 4.5 then
return true
end
end
end
return false
return false
end
end
Line 452: Line 405:
-- render the main body of the navbox
-- render the main body of the navbox
local tbl = renderMainTable()
local tbl = renderMainTable()
 
-- get templatestyles
-- render the appropriate wrapper around the navbox, depending on the border param
local frame = mw.getCurrentFrame()
local base_templatestyles = frame:extensionTag{
name = 'templatestyles', args = { src = 'Module:Navbox/styles.css' }
}
local templatestyles = ''
if args.templatestyles and args.templatestyles ~= '' then
templatestyles = frame:extensionTag{
name = 'templatestyles', args = { src = args.templatestyles }
}
end
local res = mw.html.create()
local res = mw.html.create()
-- 'navbox-styles' exists for two reasons:
--  1. To wrap the styles to work around phab: T200206 more elegantly. Instead
--   of combinatorial rules, this ends up being linear number of CSS rules.
--  2. To allow MobileFrontend to rip the styles out with 'nomobile' such that
--    they are not dumped into the mobile view.
res:tag('div')
:addClass('navbox-styles')
:addClass('nomobile')
:wikitext(base_templatestyles .. templatestyles)
:done()
-- render the appropriate wrapper around the navbox, depending on the border param
if border == 'none' then
if border == 'none' then
local nav = res:tag('div')
local nav = res:tag('div')
:attr('role', 'navigation')
:attr('role', 'navigation')
:wikitext(addListStyles())
:node(tbl)
:node(tbl)
-- aria-labelledby title, otherwise above, otherwise lone group
-- aria-labelledby title, otherwise above, otherwise lone group
Line 490: Line 419:
end
end
elseif border == 'subgroup' then
elseif border == 'subgroup' then
-- We assume that this navbox is being rendered in a list cell of a
-- We assume that this navbox is being rendered in a list cell of a parent navbox, and is
-- parent navbox, and is therefore inside a div with padding:0em 0.25em.
-- therefore inside a div with padding:0em 0.25em. We start with a </div> to avoid the
-- We start with a </div> to avoid the padding being applied, and at the
-- padding being applied, and at the end add a <div> to balance out the parent's </div>
-- end add a <div> to balance out the parent's </div>
res
res
:wikitext('</div>')
:wikitext('</div>')
:wikitext(addListStyles())
:node(tbl)
:node(tbl)
:wikitext('<div>')
:wikitext('<div>')
Line 507: Line 434:
:cssText(args.style)
:cssText(args.style)
:css('padding', '3px')
:css('padding', '3px')
:wikitext(addListStyles())
:node(tbl)
:node(tbl)
-- aria-labelledby title, otherwise above, otherwise lone group
-- aria-labelledby title, otherwise above, otherwise lone group
Line 520: Line 446:
renderTrackingCategories(res)
renderTrackingCategories(res)
end
end
return striped(tostring(res))
return striped(tostring(res))
end
end
Line 528: Line 453:
getArgs = require('Module:Arguments').getArgs
getArgs = require('Module:Arguments').getArgs
end
end
args = getArgs(frame, {wrappers = {'Template:Navbox', 'Template:Navbox subgroup'}})
args = getArgs(frame, {wrappers = {'Template:Navbox'}})
if frame.args.border then
-- This allows Template:Navbox_subgroup to use {{#invoke:Navbox|navbox|border=...}}.
args.border = frame.args.border
end


-- Read the arguments in the order they'll be output in, to make references number in the right order.
-- Read the arguments in the order they'll be output in, to make references number in the right order.
Retrieved from "https://wiki.mkwtas.com/wiki/Module:Navbox"