skandinavien-wiki.net

Modul:Message box: Unterschied zwischen den Versionen

Modul Diskussion

Modul:Message box (Quelltext anzeigen)

Version vom 8. Februar 2023, 16:27 Uhr

1.625 Bytes hinzugefügt ,  vor 2 Jahren
K
20 Versionen von wpen:Module:Message_box importiert
(Test)
K (20 Versionen von wpen:Module:Message_box importiert)
 
(41 dazwischenliegende Versionen von 17 Benutzern werden nicht angezeigt)
Zeile 1: Zeile 1:
-- This is a meta-module for producing message box templates, including {{mbox}}, {{ambox}}, {{imbox}}, {{tmbox}}, {{ombox}}, {{cmbox}} and {{fmbox}}.
-- This is a meta-module for producing message box templates, including
-- {{mbox}}, {{ambox}}, {{imbox}}, {{tmbox}}, {{ombox}}, {{cmbox}} and {{fmbox}}.


-- Require necessary modules.
-- Load necessary modules.
local htmlBuilder = require('Modul:HtmlBuilder')
require('strict')
local categoryHandler = require('Modul:Category handler').main
local getArgs
local yesno = require('Modul:Yesno')
local yesno = require('Module:Yesno')
 
-- Load the configuration page.
local cfgTables = mw.loadData('Modul:Message box/configuration')


-- Get a language object for formatDate and ucfirst.
-- Get a language object for formatDate and ucfirst.
local lang = mw.language.getContentLanguage()
local lang = mw.language.getContentLanguage()


-- Set aliases for often-used functions to reduce table lookups.
-- Define constants
local format = mw.ustring.format
local CONFIG_MODULE = 'Module:Message box/configuration'
local tinsert = table.insert
local DEMOSPACES = {talk = 'tmbox', image = 'imbox', file = 'imbox', category = 'cmbox', article = 'ambox', main = 'ambox'}
local tconcat = table.concat
local TEMPLATE_STYLES = 'Module:Message box/%s.css'
local trim = mw.text.trim


local box = {}
--------------------------------------------------------------------------------
-- Helper functions
--------------------------------------------------------------------------------


local function getTitleObject(page)
local function getTitleObject(...)
if type(page) == 'string' then
-- Get the title object, passing the function through pcall
-- Get the title object, passing the function through pcall  
-- in case we are over the expensive function count limit.
-- in case we are over the expensive function count limit.
local success, title = pcall(mw.title.new, ...)
local success, title = pcall(mw.title.new, page)
if success then
if success then
return title
return title
end
end
end
end
end
Zeile 42: Zeile 39:
local ret = {}
local ret = {}
for k in pairs(vals) do
for k in pairs(vals) do
tinsert(ret, k)
table.insert(ret, k)
end
end
table.sort(ret)
table.sort(ret)
Zeile 53: Zeile 50:
local num = mw.ustring.match(tostring(k), '^' .. prefix .. '([1-9]%d*)$')
local num = mw.ustring.match(tostring(k), '^' .. prefix .. '([1-9]%d*)$')
if num then
if num then
tinsert(nums, tonumber(num))
table.insert(nums, tonumber(num))
end
end
end
end
Zeile 60: Zeile 57:
end
end


function box.getNamespaceId(ns)
--------------------------------------------------------------------------------
if not ns then return end
-- Box class definition
if type(ns) == 'string' then
--------------------------------------------------------------------------------
ns = lang:ucfirst(mw.ustring.lower(ns))
 
if ns == 'Main' then
local MessageBox = {}
ns = 0
MessageBox.__index = MessageBox
end
 
end
function MessageBox.new(boxType, args, cfg)
local nsTable = mw.site.namespaces[ns]
args = args or {}
if nsTable then
local obj = {}
return nsTable.id
 
end
obj.boxType = boxType
end
 
-- Set the title object and the namespace.
obj.title = getTitleObject(args.page) or mw.title.getCurrentTitle()


function box.getMboxType(nsid)
-- Set the config for our box type.
-- Gets the mbox type from a namespace number.
obj.cfg = cfg[boxType]
if nsid == 0 then
if not obj.cfg then
return 'ambox' -- main namespace
local ns = obj.title.namespace
elseif nsid == 6 then
-- boxType is "mbox" or invalid input
return 'imbox' -- file namespace
if args.demospace and args.demospace ~= '' then
elseif nsid == 14 then
-- implement demospace parameter of mbox
return 'cmbox' -- category namespace
local demospace = string.lower(args.demospace)
else
if DEMOSPACES[demospace] then
local nsTable = mw.site.namespaces[nsid]
-- use template from DEMOSPACES
if nsTable and nsTable.isTalk then
obj.cfg = cfg[DEMOSPACES[demospace]]
return 'tmbox' -- any talk namespace
obj.boxType = DEMOSPACES[demospace]
elseif string.find( demospace, 'talk' ) then
-- demo as a talk page
obj.cfg = cfg.tmbox
obj.boxType = 'tmbox'
else
-- default to ombox
obj.cfg = cfg.ombox
obj.boxType = 'ombox'
end
elseif ns == 0 then
obj.cfg = cfg.ambox -- main namespace
obj.boxType = 'ambox'
elseif ns == 6 then
obj.cfg = cfg.imbox -- file namespace
obj.boxType = 'imbox'
elseif ns == 14 then
obj.cfg = cfg.cmbox -- category namespace
obj.boxType = 'cmbox'
else
else
return 'ombox' -- other namespaces or invalid input
local nsTable = mw.site.namespaces[ns]
if nsTable and nsTable.isTalk then
obj.cfg = cfg.tmbox -- any talk namespace
obj.boxType = 'tmbox'
else
obj.cfg = cfg.ombox -- other namespaces or invalid input
obj.boxType = 'ombox'
end
end
end
end
end
end


function box:addCat(ns, cat, sort)
-- Set the arguments, and remove all blank arguments except for the ones
if type(cat) ~= 'string' then return end
-- listed in cfg.allowBlankParams.
local nsVals = {'main', 'template', 'all'}
do
local tname
local newArgs = {}
for i, val in ipairs(nsVals) do
for k, v in pairs(args) do
if ns == val then
if v ~= '' then
tname = ns .. 'Cats'
newArgs[k] = v
end
end
end
end
for i, param in ipairs(obj.cfg.allowBlankParams or {}) do
if not tname then
newArgs[param] = args[param]
for i, val in ipairs(nsVals) do
nsVals[i] = format('"%s"', val)
end
end
error('invalid ns parameter passed to box:addCat; valid values are ' .. mw.text.listToText(nsVals, nil, ' or '))
obj.args = newArgs
end
self[tname] = self[tname] or {}
if type(sort) == 'string' then
tinsert(self[tname], format('[[Category:%s|%s]]', cat, sort))
else
tinsert(self[tname], format('[[Category:%s]]', cat))
end
end
end


function box:addClass(class)
-- Define internal data structure.
if type(class) ~= 'string' then return end
obj.categories = {}
self.classes = self.classes or {}
obj.classes = {}
tinsert(self.classes, class)
-- For lazy loading of [[Module:Category handler]].
end
obj.hasCategories = false


function box:setTitle(args)
return setmetatable(obj, MessageBox)
-- Get the title object and the namespace.
self.pageTitle = getTitleObject(args.page ~= '' and args.page)
self.title = self.pageTitle or mw.title.getCurrentTitle()
self.demospace = args.demospace ~= '' and args.demospace or nil
self.nsid = box.getNamespaceId(self.demospace) or self.title.namespace
end
end


function box:getConfig(boxType)
function MessageBox:addCat(ns, cat, sort)
-- Get the box config data from the data page.
if not cat then
if boxType == 'mbox' then
return nil
boxType = box.getMboxType(self.nsid)
end
end
local cfg = cfgTables[boxType]
if sort then
if not cfg then
cat = string.format('[[Category:%s|%s]]', cat, sort)
local boxTypes = {}
else
for k, v in pairs(dataTables) do
cat = string.format('[[Category:%s]]', cat)
tinsert(boxTypes, format('"%s"', k))
end
tinsert(boxTypes, '"mbox"')
error(format('invalid message box type "%s"; valid types are %s', tostring(boxType), mw.text.listToText(boxTypes)), 2)
end
end
return cfg
self.hasCategories = true
self.categories[ns] = self.categories[ns] or {}
table.insert(self.categories[ns], cat)
end
end


function box:removeBlankArgs(cfg, args)
function MessageBox:addClass(class)
-- Only allow blank arguments for the parameter names listed in cfg.allowBlankParams.
if not class then
local newArgs = {}
return nil
for k, v in pairs(args) do
if v ~= '' then
newArgs[k] = v
end
end
for i, param in ipairs(cfg.allowBlankParams or {}) do
newArgs[param] = args[param]
end
end
return newArgs
table.insert(self.classes, class)
end
end


function box:setBoxParameters(cfg, args)
function MessageBox:setParameters()
local args = self.args
local cfg = self.cfg
 
-- Get type data.
-- Get type data.
self.type = args.type
self.type = args.type
local typeData = cfg.types[self.type]
local typeData = cfg.types[self.type]
self.invalidTypeError = cfg.showInvalidTypeError and self.type and not typeData and true or false
self.invalidTypeError = cfg.showInvalidTypeError
and self.type
and not typeData
typeData = typeData or cfg.types[cfg.default]
typeData = typeData or cfg.types[cfg.default]
self.typeClass = typeData.class
self.typeClass = typeData.class
Zeile 170: Zeile 175:


-- Find if the box has been wrongly substituted.
-- Find if the box has been wrongly substituted.
if cfg.substCheck and args.subst == 'SUBST' then
self.isSubstituted = cfg.substCheck and args.subst == 'SUBST'
self.isSubstituted = true
end


-- Find whether we are using a small message box.
-- Find whether we are using a small message box.
if cfg.allowSmall and (
self.isSmall = cfg.allowSmall and (
cfg.smallParam and args.small == cfg.smallParam
cfg.smallParam and args.small == cfg.smallParam
or not cfg.smallParam and yesno(args.small)
or not cfg.smallParam and yesno(args.small)
)
)
then
self.isSmall = true
else
self.isSmall = false
end


-- Add attributes, classes and styles.
-- Add attributes, classes and styles.
if cfg.allowId then
self.id = args.id
self.id = args.id
self.name = args.name
if self.name then
self:addClass('box-' .. string.gsub(self.name,' ','_'))
end
if yesno(args.plainlinks) ~= false then
self:addClass('plainlinks')
end
end
self:addClass(cfg.usePlainlinksParam and yesno(args.plainlinks or true) and 'plainlinks')
for _, class in ipairs(cfg.classes or {}) do
for _, class in ipairs(cfg.classes or {}) do
self:addClass(class)
self:addClass(class)
Zeile 199: Zeile 201:
self:addClass(args.class)
self:addClass(args.class)
self.style = args.style
self.style = args.style
self.attrs = args.attrs


-- Set text style.
-- Set text style.
self.textstyle = args.textstyle
self.textstyle = args.textstyle


-- Process data for collapsible text fields. At the moment these are only used in {{ambox}}.
-- Find if we are on the template page or not. This functionality is only
self.useCollapsibleTextFields = cfg.useCollapsibleTextFields
-- used if useCollapsibleTextFields is set, or if both cfg.templateCategory
-- and cfg.templateCategoryRequireName are set.
self.useCollapsibleTextFields = cfg.useCollapsibleTextFields
if self.useCollapsibleTextFields
or cfg.templateCategory
and cfg.templateCategoryRequireName
then
if self.name then
local templateName = mw.ustring.match(
self.name,
'^[tT][eE][mM][pP][lL][aA][tT][eE][%s_]*:[%s_]*(.*)$'
) or self.name
templateName = 'Template:' .. templateName
self.templateTitle = getTitleObject(templateName)
end
self.isTemplatePage = self.templateTitle
and mw.title.equals(self.title, self.templateTitle)
end
-- Process data for collapsible text fields. At the moment these are only
-- used in {{ambox}}.
if self.useCollapsibleTextFields then
if self.useCollapsibleTextFields then
self.name = args.name
local nameTitle = getTitleObject(self.name)
self.isTemplatePage = nameTitle and self.title.prefixedText == ('Template:' .. nameTitle.text) and true or false
-- Get the self.issue value.
-- Get the self.issue value.
if self.isSmall and args.smalltext then
if self.isSmall and args.smalltext then
Zeile 225: Zeile 244:
text = type(text) == 'string' and text or nil
text = type(text) == 'string' and text or nil
local issues = {}
local issues = {}
tinsert(issues, sect)
table.insert(issues, sect)
tinsert(issues, issue)
table.insert(issues, issue)
tinsert(issues, text)
table.insert(issues, text)
self.issue = tconcat(issues, ' ')
self.issue = table.concat(issues, ' ')
end
end


-- Get the self.talk value.
-- Get the self.talk value.
local talk = args.talk
local talk = args.talk
if talk == '' and self.isTemplatePage then
-- Show talk links on the template page or template subpages if the talk
-- parameter is blank.
if talk == ''
and self.templateTitle
and (
mw.title.equals(self.templateTitle, self.title)
or self.title:isSubpageOf(self.templateTitle)
)
then
talk = '#'
talk = '#'
elseif talk == '' then
talk = nil
end
end
if talk then
if talk then
-- See if the talk link exists and is for a talk or a content namespace.
-- If the talk value is a talk page, make a link to that page. Else
-- assume that it's a section heading, and make a link to the talk
-- page of the current page with that section heading.
local talkTitle = getTitleObject(talk)
local talkTitle = getTitleObject(talk)
local talkArgIsTalkPage = true
if not talkTitle or not talkTitle.isTalkPage then
if not talkTitle or not talkTitle.isTalkPage then
-- If we couldn't process the talk page link, get the talk page of the current page.
talkArgIsTalkPage = false
local success
talkTitle = getTitleObject(
success, talkTitle = pcall(self.title.talkPageTitle, self.title)
self.title.text,
if not success then
mw.site.namespaces[self.title.namespace].talk.id
talkTitle = nil
)
end
end
end
if talkTitle and talkTitle.exists then
if talkTitle and talkTitle.exists then
local talkText = 'Relevant discussion may be found on'
local talkText = 'Relevant discussion may be found on'
if talkTitle.isTalkPage then
if talkArgIsTalkPage then
talkText = format('%s [[%s|%s]].', talkText, talk, talkTitle.prefixedText)
talkText = string.format(
'%s [[%s|%s]].',
talkText,
talk,
talkTitle.prefixedText
)
else
else
talkText = format('%s the [[%s#%s|talk page]].', talkText, talkTitle.prefixedText, talk)
talkText = string.format(
'%s the [[%s#%s|talk page]].',
talkText,
talkTitle.prefixedText,
talk
)
end
end
self.talk = talkText
self.talk = talkText
Zeile 267: Zeile 308:
end
end
if date then
if date then
self.date = format(" <small>''(%s)''</small>", date)
self.date = string.format(" <small class='date-container'>''(<span class='date'>%s</span>)''</small>", date)
end
end
self.info = args.info
self.info = args.info
if yesno(args.removalnotice) then
self.removalNotice = cfg.removalNotice
end
end
end


-- Set the non-collapsible text field. At the moment this is used by all box types other than ambox,
-- Set the non-collapsible text field. At the moment this is used by all box
-- and also by ambox when small=yes.
-- types other than ambox, and also by ambox when small=yes.
if self.isSmall then
if self.isSmall then
self.text = args.smalltext or args.text
self.text = args.smalltext or args.text
Zeile 284: Zeile 328:


-- General image settings.
-- General image settings.
self.imageCellDiv = not self.isSmall and cfg.imageCellDiv and true or false
self.imageCellDiv = not self.isSmall and cfg.imageCellDiv
self.imageEmptyCell = cfg.imageEmptyCell
self.imageEmptyCell = cfg.imageEmptyCell
if cfg.imageEmptyCellStyle then
if cfg.imageEmptyCellStyle then
Zeile 297: Zeile 341:
self.imageLeft = imageLeft
self.imageLeft = imageLeft
if not imageLeft then
if not imageLeft then
local imageSize = self.isSmall and (cfg.imageSmallSize or '30x30px') or '40x40px'
local imageSize = self.isSmall
self.imageLeft = format('[[File:%s|%s|link=|alt=]]', self.typeImage or 'Imbox notice.png', imageSize)
and (cfg.imageSmallSize or '30x30px')
or '40x40px'
self.imageLeft = string.format('[[File:%s|%s|link=|alt=]]', self.typeImage
or 'Imbox notice.png', imageSize)
end
end
end
end
Zeile 307: Zeile 354:
self.imageRight = imageRight
self.imageRight = imageRight
end
end
end


-- Add mainspace categories. At the moment these are only used in {{ambox}}.
function MessageBox:setMainspaceCategories()
if cfg.allowMainspaceCategories then
local args = self.args
if args.cat then
local cfg = self.cfg
args.cat1 = args.cat
 
if not cfg.allowMainspaceCategories then
return nil
end
 
local nums = {}
for _, prefix in ipairs{'cat', 'category', 'all'} do
args[prefix .. '1'] = args[prefix]
nums = union(nums, getArgNums(args, prefix))
end
 
-- The following is roughly equivalent to the old {{Ambox/category}}.
local date = args.date
date = type(date) == 'string' and date
local preposition = 'from'
for _, num in ipairs(nums) do
local mainCat = args['cat' .. tostring(num)]
or args['category' .. tostring(num)]
local allCat = args['all' .. tostring(num)]
mainCat = type(mainCat) == 'string' and mainCat
allCat = type(allCat) == 'string' and allCat
if mainCat and date and date ~= '' then
local catTitle = string.format('%s %s %s', mainCat, preposition, date)
self:addCat(0, catTitle)
catTitle = getTitleObject('Category:' .. catTitle)
if not catTitle or not catTitle.exists then
self:addCat(0, 'Articles with invalid date parameter in template')
end
elseif mainCat and (not date or date == '') then
self:addCat(0, mainCat)
end
end
self.catNums = getArgNums(args, 'cat')
if allCat then
if args.category then
self:addCat(0, allCat)
args.category1 = args.category
end
self.categoryNums = getArgNums(args, 'category')
if args.all then
args.all1 = args.all
end
self.allNums = getArgNums(args, 'all')
self.categoryParamNums = union(self.catNums, self.categoryNums)
self.categoryParamNums = union(self.categoryParamNums, self.allNums)
-- The following is roughly equivalent to the old {{Ambox/category}}.
local date = args.date
date = type(date) == 'string' and date
local preposition = 'from'
for _, num in ipairs(self.categoryParamNums) do
local mainCat = args['cat' .. tostring(num)] or args['category' .. tostring(num)]
local allCat = args['all' .. tostring(num)]
mainCat = type(mainCat) == 'string' and mainCat
allCat = type(allCat) == 'string' and allCat
if mainCat and date and date ~= '' then
local catTitle = format('%s %s %s', mainCat, preposition, date)
self:addCat('main', catTitle)
catTitle = getTitleObject('Category:' .. catTitle)
if not catTitle or not catTitle.exists then
self:addCat('main', 'Articles with invalid date parameter in template')
end
elseif mainCat and (not date or date == '') then
self:addCat('main', mainCat)
end
if allCat then
self:addCat('main', allCat)
end
end
end
end
end
end


-- Add template-namespace categories.
function MessageBox:setTemplateCategories()
local args = self.args
local cfg = self.cfg
 
-- Add template categories.
if cfg.templateCategory then
if cfg.templateCategory then
if cfg.templateCategoryRequireName then
if cfg.templateCategoryRequireName then
self.isTemplatePage = type(self.name) == 'string' and self.title.prefixedText == ('Template:' .. self.name)
if self.isTemplatePage then
if self.isTemplatePage then
self:addCat('template', cfg.templateCategory)
self:addCat(10, cfg.templateCategory)
end
end
elseif not self.title.isSubpage then
elseif not self.title.isSubpage then
self:addCat('template', cfg.templateCategory)
self:addCat(10, cfg.templateCategory)
end
end
end
end


-- Add template error category.
-- Add template error categories.
if cfg.templateErrorCategory then
if cfg.templateErrorCategory then
local templateErrorCategory = cfg.templateErrorCategory
local templateErrorCategory = cfg.templateErrorCategory
Zeile 384: Zeile 434:
end
end
end
end
self:addCat('template', templateCat, templateSort)
self:addCat(10, templateCat, templateSort)
end
end
end


-- Categories for all namespaces.
function MessageBox:setAllNamespaceCategories()
-- Set categories for all namespaces.
if self.invalidTypeError then
if self.invalidTypeError then
local allSort = (self.nsid == 0 and 'Main:' or '') .. self.title.prefixedText
local allSort = (self.title.namespace == 0 and 'Main:' or '') .. self.title.prefixedText
self:addCat('all', 'Wikipedia message box parameter needs fixing', allSort)
self:addCat('all', 'Wikipedia message box parameter needs fixing', allSort)
end
end
Zeile 395: Zeile 447:
self:addCat('all', 'Pages with incorrectly substituted templates')
self:addCat('all', 'Pages with incorrectly substituted templates')
end
end
end
function MessageBox:setCategories()
if self.title.namespace == 0 then
self:setMainspaceCategories()
elseif self.title.namespace == 10 then
self:setTemplateCategories()
end
self:setAllNamespaceCategories()
end


-- Convert category tables to strings and pass them through [[Module:Category handler]].
function MessageBox:renderCategories()
self.categories = categoryHandler{
if not self.hasCategories then
main = tconcat(self.mainCats or {}),
-- No categories added, no need to pass them to Category handler so,
template = tconcat(self.templateCats or {}),
-- if it was invoked, it would return the empty string.
all = tconcat(self.allCats or {}),
-- So we shortcut and return the empty string.
nocat = args.nocat,
return ""
demospace = self.demospace,
end
page = self.pageTitle and self.pageTitle.prefixedText or nil
-- Convert category tables to strings and pass them through
-- [[Module:Category handler]].
return require('Module:Category handler')._main{
main = table.concat(self.categories[0] or {}),
template = table.concat(self.categories[10] or {}),
all = table.concat(self.categories.all or {}),
nocat = self.args.nocat,
page = self.args.page
}
}
end
end


function box:export()
function MessageBox:export()
local root = htmlBuilder.create()
local root = mw.html.create()


-- Add the subst check error.
-- Add the subst check error.
if self.isSubstituted and self.name then
if self.isSubstituted and self.name then
root
root:tag('b')
.tag('b')
:addClass('error')
.addClass('error')
:wikitext(string.format(
.wikitext(format(
'Template <code>%s[[Template:%s|%s]]%s</code> has been incorrectly substituted.',
'Template <code>%s[[Template:%s|%s]]%s</code> has been incorrectly substituted.',
mw.text.nowiki('{{'), self.name, self.name, mw.text.nowiki('}}')
mw.text.nowiki('{{'), self.name, self.name, mw.text.nowiki('}}')
))
))
end
end
-- Add TemplateStyles
root:wikitext(mw.getCurrentFrame():extensionTag{
name = 'templatestyles',
args = { src = TEMPLATE_STYLES:format(self.boxType) },
})


-- Create the box table.
-- Create the box table.
local boxTable = root.tag('table')
local boxTable
boxTable
-- Check for fmbox because not all interface messages have mw-parser-output
.attr('id', self.id)
-- which is necessary for TemplateStyles. Add the wrapper class if it is and
-- then start the actual mbox, else start the mbox.
if self.boxType == 'fmbox' then
boxTable = root:tag('div')
:addClass('mw-parser-output')
:tag('table')
else
boxTable = root:tag('table')
end
 
boxTable:attr('id', self.id or nil)
for i, class in ipairs(self.classes or {}) do
for i, class in ipairs(self.classes or {}) do
boxTable
boxTable:addClass(class or nil)
.addClass(class)
end
end
boxTable
boxTable
.cssText(self.style)
:cssText(self.style or nil)
.attr('role', 'presentation')
:attr('role', 'presentation')
 
if self.attrs then
boxTable:attr(self.attrs)
end


-- Add the left-hand image.
-- Add the left-hand image.
local row = boxTable.tag('tr')
local row = boxTable:tag('tr')
if self.imageLeft then
if self.imageLeft then
local imageLeftCell = row.tag('td').addClass('mbox-image')
local imageLeftCell = row:tag('td'):addClass('mbox-image')
if self.imageCellDiv then
if self.imageCellDiv then
-- If we are using a div, redefine imageLeftCell so that the image is inside it.
-- If we are using a div, redefine imageLeftCell so that the image
-- Divs use style="width: 52px;", which limits the image width to 52px. If any
-- is inside it. Divs use style="width: 52px;", which limits the
-- images in a div are wider than that, they may overlap with the text or cause
-- image width to 52px. If any images in a div are wider than that,
-- other display problems.
-- they may overlap with the text or cause other display problems.
imageLeftCell = imageLeftCell.tag('div').css('width', '52px')  
imageLeftCell = imageLeftCell:tag('div'):css('width', '52px')
end
end
imageLeftCell
imageLeftCell:wikitext(self.imageLeft or nil)
.wikitext(self.imageLeft)
elseif self.imageEmptyCell then
elseif self.imageEmptyCell then
-- Some message boxes define an empty cell if no image is specified, and some don't.
-- Some message boxes define an empty cell if no image is specified, and
-- The old template code in templates where empty cells are specified gives the following hint:
-- some don't. The old template code in templates where empty cells are
-- "No image. Cell with some width or padding necessary for text cell to have 100% width."
-- specified gives the following hint: "No image. Cell with some width
row.tag('td')
-- or padding necessary for text cell to have 100% width."
.addClass('mbox-empty-cell')  
row:tag('td')
.cssText(self.imageEmptyCellStyle)
:addClass('mbox-empty-cell')
:cssText(self.imageEmptyCellStyle or nil)
end
end


-- Add the text.
-- Add the text.
local textCell = row.tag('td').addClass('mbox-text')
local textCell = row:tag('td'):addClass('mbox-text')
if self.useCollapsibleTextFields then
if self.useCollapsibleTextFields then
-- The message box uses advanced text parameters that allow things to be collapsible. At the
-- The message box uses advanced text parameters that allow things to be
-- moment, only ambox uses this.
-- collapsible. At the moment, only ambox uses this.
textCell
textCell:cssText(self.textstyle or nil)
.cssText(self.textstyle)
local textCellDiv = textCell:tag('div')
local textCellSpan = textCell.tag('span')
textCellDiv
textCellSpan
:addClass('mbox-text-span')
.addClass('mbox-text-span')
:wikitext(self.issue or nil)
.wikitext(self.issue)
if (self.talk or self.fix) and not self.isSmall then
if not self.isSmall then
textCellDiv:tag('span')
textCellSpan
:addClass('hide-when-compact')
.tag('span')
:wikitext(self.talk and (' ' .. self.talk) or nil)
.addClass('hide-when-compact')
:wikitext(self.fix and (' ' .. self.fix) or nil)
.wikitext(self.talk and ' ' .. self.talk)
end
.wikitext(self.fix and ' ' .. self.fix)
textCellDiv:wikitext(self.date and (' ' .. self.date) or nil)
if self.info and not self.isSmall then
textCellDiv
:tag('span')
:addClass('hide-when-compact')
:wikitext(self.info and (' ' .. self.info) or nil)
end
end
textCellSpan
if self.removalNotice then
.wikitext(self.date and ' ' .. self.date)
textCellDiv:tag('small')
if not self.isSmall then
:addClass('hide-when-compact')
textCellSpan
:tag('i')
.tag('span')
:wikitext(string.format(" (%s)", self.removalNotice))
.addClass('hide-when-compact')
.wikitext(self.info and ' ' .. self.info)
end
end
else
else
-- Default text formatting - anything goes.
-- Default text formatting - anything goes.
textCell
textCell
.cssText(self.textstyle)
:cssText(self.textstyle or nil)
.wikitext(self.text)
:wikitext(self.text or nil)
end
-- Add a message, if used on ns11
if self.nsid == 11 then
textCell
.wikitext(format('Bei der Vielzahl von Vorlagen wird nicht jede Diskussionsseite beobachtet. Melde deine Fragen bitte auf der Diskussionsseite der Vorlagenwerkstatt oder in der Lounge an.', self.type or ''))
end
end


-- Add the right-hand image.
-- Add the right-hand image.
if self.imageRight then
if self.imageRight then
local imageRightCell = row.tag('td').addClass('mbox-imageright')
local imageRightCell = row:tag('td'):addClass('mbox-imageright')
if self.imageCellDiv then
if self.imageCellDiv then
imageRightCell = imageRightCell.tag('div').css('width', '52px') -- If we are using a div, redefine imageRightCell so that the image is inside it.
-- If we are using a div, redefine imageRightCell so that the image
-- is inside it.
imageRightCell = imageRightCell:tag('div'):css('width', '52px')
end
end
imageRightCell
imageRightCell
.wikitext(self.imageRight)
:wikitext(self.imageRight or nil)
end
end


-- Add the below row.
-- Add the below row.
if self.below then
if self.below then
boxTable.tag('tr')
boxTable:tag('tr')
.tag('td')
:tag('td')
.attr('colspan', self.imageRight and '3' or '2')
:attr('colspan', self.imageRight and '3' or '2')
.addClass('mbox-text')
:addClass('mbox-text')
.cssText(self.textstyle)
:cssText(self.textstyle or nil)
.wikitext(self.below)
:wikitext(self.below or nil)
end
end


-- Add error message for invalid type parameters.
-- Add error message for invalid type parameters.
if self.invalidTypeError then
if self.invalidTypeError then
root
root:tag('div')
.tag('div')
:css('text-align', 'center')
.css('text-align', 'center')
:wikitext(string.format(
.wikitext(format('This message box is using an invalid "type=%s" parameter and needs fixing.', self.type or ''))
'This message box is using an invalid "type=%s" parameter and needs fixing.',
self.type or ''
))
end
end


-- Add categories.
-- Add categories.
root
root:wikitext(self:renderCategories() or nil)
.wikitext(self.categories)


return tostring(root)
return tostring(root)
end
end


local function main(boxType, args)
--------------------------------------------------------------------------------
box:setTitle(args)
-- Exports
local cfg = box:getConfig(boxType)
--------------------------------------------------------------------------------
args = box:removeBlankArgs(cfg, args)
 
box:setBoxParameters(cfg, args)
local p, mt = {}, {}
 
function p._exportClasses()
-- For testing.
return {
MessageBox = MessageBox
}
end
 
function p.main(boxType, args, cfgTables)
local box = MessageBox.new(boxType, args, cfgTables or mw.loadData(CONFIG_MODULE))
box:setParameters()
box:setCategories()
return box:export()
return box:export()
end
end


local function makeWrapper(boxType)
function mt.__index(t, k)
return function (frame)
return function (frame)
-- If called via #invoke, use the args passed into the invoking
if not getArgs then
-- template, or the args passed to #invoke if any exist. Otherwise
getArgs = require('Module:Arguments').getArgs
-- assume args are being passed directly in from the debug console
-- or from another Lua module.
local origArgs
if frame == mw.getCurrentFrame() then
origArgs = frame:getParent().args
for k, v in pairs(frame.args) do
origArgs = frame.args
break
end
else
origArgs = frame
end
-- Trim whitespace.
local args = {}
for k, v in pairs(origArgs) do
if type(v) == 'string' then
v = trim(v)
end
args[k] = v
end
end
return main(boxType, args)
return t.main(k, getArgs(frame, {trim = false, removeBlanks = false}))
end
end
end
end


local p = {
return setmetatable(p, mt)
main = main,
mbox = makeWrapper('mbox')
}
 
for boxType in pairs(cfgTables) do
p[boxType] = makeWrapper(boxType)
end
 
return p
Abgerufen von „https://skandinavien-wiki.net/wiki/Spezial:Mobiler_Unterschied/11820...19025“