Module:Palette : Différence entre versions
(Nouvelle page : local Palette = { } local function paletteAvecParametre( i, args ) end function Palette.listePalette( frame ) local args = frame.args local parentArgs = frame.getParent().ar...) |
(bug) |
||
Ligne 7 : | Ligne 7 : | ||
function Palette.listePalette( frame ) | function Palette.listePalette( frame ) | ||
local args = frame.args | local args = frame.args | ||
− | local parentArgs = frame | + | local parentArgs = frame:getParent().args |
local wikiTable = { '<div class="navbox_group" style="clear:both;">\n' } | local wikiTable = { '<div class="navbox_group" style="clear:both;">\n' } | ||
setmetatable( wikiTable, { __index = table } ) | setmetatable( wikiTable, { __index = table } ) |
Version du 29 août 2014 à 06:17
La documentation pour ce module peut être créée à Module:Palette/doc
local Palette = { } local function paletteAvecParametre( i, args ) end function Palette.listePalette( frame ) local args = frame.args local parentArgs = frame:getParent().args local wikiTable = { '<div class="navbox_group" style="clear:both;">\n' } setmetatable( wikiTable, { __index = table } ) local maxPalette = 4 local categoriePaletteInconnue = '[[Catégorie:Modèle Palette - Palette inconnue]]' local categorieTropDePalette = '[[Catégorie:Modèle Palette - Page contenant trop de palettes]]' local categories = { } local function erreur( texte, param, ... ) if param then texte = texte:format( param, ... ) end return '<p class="error">' .. texte .. '</p>\n' end local function _pasDePalette() return erreur( 'Erreur dans l’utilisation du [[Modèle:Palette]] : paramètre obligatoire absent.' ) end local function _paletteInconnue( nomPalette ) categories.paletteInconnue = categoriePaletteInconnue return erreur( 'la palette [[Modèle:Palette %s|]] n’existe pas', parentArgs[i] ) end local function _paletteAvecParametres( i ) local nocat = parentArgs.nocat parentArgs.nocat = parentArgs[ 'nocat' .. i ] local resutl = frame:expandTemplate{ title = 'Palette ' .. args[i], args = parentArgs } parentArgs.nocat = nocat return resutl end local function _tropDePalettes() categories.tropDePalette = categorieTropDePalette return erreur( 'Erreur dans le [[Modèle:Palette]] : trop de palettes (maximum : %s)', maxPalette ) end local i = 1 while i <= maxPalette and parentArgs[i] do local codePalette = args[i] local testCodePalette = codePalette:sub( 1, 9 ) if parentArgs[i] ~= '' then if testCodePalette == '[[:Modèle' then -- La palette n'existe pas wikiTable:insert( _paletteInconnue( parentArgs[i] ) ) elseif testCodePalette == 'verticale' then -- C'est une palette verticale wikiTable:insert( 1, codePalette:sub( 11 ) .. '\n' ) elseif testCodePalette == 'paramètre' then -- C'est une palette nécessitant des paramètres nommés wikiTable:insert( _paletteAvecParametres( i ) ) else wikiTable:insert( codePalette .. '\n' ) end end i = i + 1 end wikiTable:insert( '</div>' ) if i == 1 then wikiTable:insert( _pasDePalette() ) elseif i > maxPalette and args[i] and ( args[i] ~= '' or args[i+1] and args[i+1] ~= '' ) then wikiTable:insert( _tropDePalettes() ) end for i, v in pairs( categories ) do wikiTable:insert( v ) end return wikiTable:concat() end return Palette