https://the-democratika.com/wiki/index.php?action=history&feed=atom&title=Module%3AMilitary_navigationModule:Military navigation - Revision history2026-04-05T02:12:48ZRevision history for this page on the wikiMediaWiki 1.43.0https://the-democratika.com/wiki/index.php?title=Module:Military_navigation&diff=8929&oldid=prev>Ahecht: give frame priority over parent to avoid script errors2023-12-27T20:02:29Z<p>give frame priority over parent to avoid script errors</p>
<p><b>New page</b></p><div>local p = { }<br />
<br />
local Navbox = require('Module:Navbox')<br />
local Styles = require('Module:WPMILHIST Infobox style')<br />
<br />
local function isblank(s)<br />
return (not s) or s == ''<br />
end<br />
local function ifnotblank(s,p,t)<br />
return (s and s ~= '') and (p..s) or t<br />
end<br />
<br />
function p.main(frame)<br />
local args = { }<br />
local pargs = frame:getParent().args<br />
local fargs = frame.args<br />
local sargs = {}<br />
local tcats = ''<br />
<br />
-- process bodystyle and titlestyle<br />
local style = fargs['style'] or pargs['style'] or ''<br />
if style == 'wide' then<br />
args['titlestyle'] = Styles['nav_box_wide_header']<br />
args['bodystyle'] = Styles['nav_box_wide']<br />
else<br />
args['titlestyle'] = Styles['nav_box_header']<br />
local border = fargs['border'] or pargs['border'] or ''<br />
if border == 'child' or border == 'subgroup' then<br />
args['bodystyle'] = Styles['nav_box_child']<br />
tcats = tcats .. '[[Category:Pages using military navigation subgroups without wide style]]'<br />
else<br />
args['bodystyle'] = Styles['nav_box']<br />
end<br />
end<br />
sargs['titlestyle'] = 1<br />
sargs['bodystyle'] = 1<br />
<br />
-- process groupstyle, abovestyle, belowstyle<br />
args['groupstyle'] = Styles['nav_box_label'] .. (fargs['groupstyle'] or pargs['groupstyle'] or '')<br />
sargs['groupstyle'] = 1<br />
args['abovestyle'] = Styles['nav_box_label'] .. (fargs['abovestyle'] or pargs['abovestyle'] or '')<br />
sargs['abovestyle'] = 1<br />
args['belowstyle'] = Styles['nav_box_label'] .. (fargs['belowstyle'] or pargs['belowstyle'] or '')<br />
sargs['belowstyle'] = 1<br />
-- process oddstyle, evenstyle<br />
args['oddstyle'] = ifnotblank((fargs['odd_color'] or pargs['odd_color']),'background:',nil)<br />
args['evenstyle'] = ifnotblank((fargs['even_color'] or pargs['even_color']),'background:',nil)<br />
sargs['oddstyle'] = 1<br />
sargs['evenstyle'] = 1<br />
-- process name and rawname<br />
args['name'] = ifnotblank((fargs['name'] or pargs['name']),'',(fargs['rawname'] or pargs['rawname']))<br />
if isblank(args['name']) then args['navbar'] = 'plain' end<br />
sargs['name'] = 1<br />
sargs['rawname'] = 1<br />
<br />
-- copy the remaining args, with frame args overriding parent args<br />
for k, v in pairs(pargs) do<br />
if v and v ~= '' and sargs[k] == nil then<br />
args[k] = v<br />
end<br />
end<br />
for k, v in pairs(fargs) do<br />
if v and v ~= '' and sargs[k] == nil then<br />
args[k] = v<br />
end<br />
end<br />
-- add allow wrap<br />
if args['title'] and style ~= 'wide' then<br />
if not mw.ustring.match(args['title'], '<span class="wrap">') then<br />
-- probably a more efficient way to match 15 or more characters<br />
local m = '[^%[%]<>|][^%[%]<>|][^%[%]<>|][^%[%]<>|][^%[%]<>|]'<br />
m = m .. m .. m<br />
args['title'] = mw.ustring.gsub(args['title'], <br />
'%[%[(' .. m .. '[^%[%]<>|]*)%]%]', <br />
'[[%1|<span class="wrap">%1</span>]]')<br />
args['title'] = mw.ustring.gsub(args['title'], <br />
'%[%[([^%[%]<>|]*)|(' .. m .. '[^%[%]<>|]*)%]%]', <br />
'[[%1|<span class="wrap">%2</span>]]')<br />
end<br />
end<br />
<br />
-- add navbox-vertical for non-wide format<br />
if style ~= 'wide' then<br />
args['bodyclass'] = 'navbox-vertical' .. (args['bodyclass'] and (' ' .. args['bodyclass']) or '')<br />
end<br />
<br />
return tcats .. Navbox._navbox(args)<br />
<br />
end <br />
<br />
return p</div>>Ahecht