Module:Message box/sandbox: Difference between revisions

Content deleted Content added
add collapsible spagetti code
Draftts
 
(45 intermediate revisions by 14 users not shown)
Line 1:
require('strict')
-- This is a meta-module for producing message box templates, including
-- {{mbox}}, {{ambox}}, {{imbox}}, {{tmbox}}, {{ombox}}, {{cmbox}} and {{fmbox}}.
 
-- Load necessary modules.
require('Module:No globals')
local getArgs
local yesno = require('Module:Yesno')
 
-- Get a language object for formatDate and ucfirst.
local lang = mw.language.getContentLanguage()
 
local CONFIG_MODULE = 'Module:Message box/configuration/sandbox'
-- Define constants
local CONFIG_MODULE = 'Module:Message box/configuration'
local DEMOSPACES = {talk = 'tmbox', image = 'imbox', file = 'imbox', category = 'cmbox', article = 'ambox', main = 'ambox'}
 
Line 90 ⟶ 83:
elseif ns == 0 then
obj.cfg = cfg.ambox -- main namespace
elseif ns == 118 then
obj.cfg = cfg.ambox -- draft namespace
elseif ns == 6 then
obj.cfg = cfg.imbox -- file namespace
Line 162 ⟶ 157:
self.typeClass = typeData.class
self.typeImage = typeData.image
self.typeImageNeedsLink = typeData.imageNeedsLink
 
-- Find if the box has been wrongly substituted.
Line 195 ⟶ 191:
self.textstyle = args.textstyle
-- Set headerimage styleclasses.
self.imageRightClass = args.imagerightclass or args.imageclass
-- Only for tmbox
self.headerstyleimageLeftClass = args.headerstyleimageleftclass or args.imageclass
 
-- Specify header text
self.headertext = args.headertext
-- Find if we are on the template page or not. This functionality is only
-- used if useCollapsibleTextFields is set, or if both cfg.templateCategory
Line 277 ⟶ 270:
local talkText
if self.isSmall then
local talkLink = talkArgIsTalkPage and talk or (talkTitle.prefixedText .. (talk == '#' and '' or '#') .. talk)
talkText = string.format('([[%s|talk]])', talkLink)
else
Line 290 ⟶ 283:
else
talkText = string.format(
'%s the [[%s' .. (talk == '#' and '' or '#') .. '%s|talk page]].',
talkText,
talkTitle.prefixedText,
Line 310 ⟶ 303:
end
if date then
self.date = string.format(" <smallspan class='date-container'>''<i>(<span class='date'>%s</span>)''</smalli></span>", date)
end
self.info = args.info
Line 332 ⟶ 325:
self.imageCellDiv = not self.isSmall and cfg.imageCellDiv
self.imageEmptyCell = cfg.imageEmptyCell
if cfg.imageEmptyCellStyle then
self.imageEmptyCellStyle = 'border:none;padding:0px;width:1px'
end
-- Collapsible setting for tmbox
local setCollapsible = args.collapse
if setCollapsible then
self.tableCollapseStyle = 'border-collapse:separate;'
end
 
 
-- Left image settings.
Line 353 ⟶ 336:
and (cfg.imageSmallSize or '30x30px')
or '40x40px'
self.imageLeft = string.format('[[File:%s|%s|link=%s|alt=]]', self.typeImage
or 'ImboxInformation noticeicon4.pngsvg', imageSize, self.typeImageNeedsLink and "" or "|link=" )
end
end
Line 363 ⟶ 346:
self.imageRight = imageRight
end
-- set templatestyles
self.base_templatestyles = cfg.templatestyles
self.templatestyles = args.templatestyles
end
 
Line 496 ⟶ 483:
mw.text.nowiki('{{'), self.name, self.name, mw.text.nowiki('}}')
))
end
 
local frame = mw.getCurrentFrame()
root:wikitext(frame:extensionTag{
name = 'templatestyles',
args = { src = self.base_templatestyles },
})
-- Add support for a single custom templatestyles sheet. Undocumented as
-- need should be limited and many templates using mbox are substed; we
-- don't want to spread templatestyles sheets around to arbitrary places
if self.headertexttemplatestyles then
root:wikitext(frame:extensionTag{
name = 'templatestyles',
args = { src = self.templatestyles },
})
end
 
Line 503 ⟶ 505:
for i, class in ipairs(self.classes or {}) do
boxTable:addClass(class or nil)
end
if setCollapsible then
boxTable
:addClass ('mw-collapsible mw-made-collapsible')
:cssText (self.tableCollapseStyle)
:attr('cellspacing', '4')
end
boxTable
Line 517 ⟶ 513:
boxTable:attr(self.attrs)
end
 
-- Add the left-hand image.
local row = boxTable:tag('tr')
Line 527 ⟶ 523:
-- image width to 52px. If any images in a div are wider than that,
-- they may overlap with the text or cause other display problems.
imageLeftCell = imageLeftCell:tag('div'):cssaddClass('width', '52pxmbox-image-div')
end
imageLeftCell:wikitext(self.imageLeft or nil)
:addClass(self.imageLeftClass)
:wikitext(self.headertextimageLeft or nil)
elseif self.imageEmptyCell then
-- Some message boxes define an empty cell if no image is specified, and
Line 537 ⟶ 535:
row:tag('td')
:addClass('mbox-empty-cell')
:cssText(self.imageEmptyCellStyle or nil)
end
 
-- Add header?
local header = row:tag('td'):addClass('mbox-text')
if self.headertext then
if setCollapsible then
-- The show button
local showButton = header:tag('span'):addClass('collapseButton'):cssText('float:left;')
local togglewhitespace = showButton:tag('span'):addClass('nowrap'):wikitext('&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;')
header
:cssText(self.headerstyle or nil)
:wikitext((showButton and togglewhitespace and self.headertext) or nil)
else
header
:cssText(self.headerstyle or nil)
:wikitext(self.headertext or nil)
end
end
if self.imageLeft then
local imageLeftCell = row:tag('th'):addClass('mbox-image')
if self.imageCellDiv then
-- If we are using a div, redefine imageLeftCell so that the image
-- is inside it. Divs use style="width: 52px;", which limits the
-- image width to 52px. If any images in a div are wider than that,
-- they may overlap with the text or cause other display problems.
imageLeftCell = imageLeftCell:tag('div'):css('width', '52px')
end
end
 
Line 594 ⟶ 561:
end
if self.removalNotice then
textCellDiv:tag('smallspan')
:addClass('hide-when-compact')
:tag('i')
:wikitext(string.format(" (%s)", self.removalNotice))
end
if setCollapsible then
textCell:addClass('outercollapse')
end
else
Line 616 ⟶ 579:
-- If we are using a div, redefine imageRightCell so that the image
-- is inside it.
imageRightCell = imageRightCell:tag('div'):cssaddClass('width', '52pxmbox-image-div')
end
imageRightCell
:addClass(self.imageRightClass)
:wikitext(self.imageRight or nil)
end
Line 635 ⟶ 599:
if self.invalidTypeError then
root:tag('div')
:cssaddClass('textmbox-align', 'centerinvalid-type')
:wikitext(string.format(
'This message box is using an invalid "type=%s" parameter and needs fixing.',