|
|
| Ligne 20 : |
Ligne 20 : |
| if param then texte = texte:format( param, ... ) | | if param then texte = texte:format( param, ... ) |
| end | | end |
| return '<p class="error">' .. texte .. '</p>\n' | | return '<p><strong class="error">' .. texte .. '</strong></p>\n' |
| end | | end |
| local function _pasDePalette() | | local function _pasDePalette() |
| Ligne 28 : |
Ligne 28 : |
| local function _paletteInconnue( i ) | | local function _paletteInconnue( i ) |
| categories.paletteInconnue = categoriePaletteInconnue | | categories.paletteInconnue = categoriePaletteInconnue |
| return erreur( 'Erreur : La palette %s n’existe pas', parentArgs[i] ) | | return erreur( 'Erreur : Il n’existe pas de modèle « Palette %s »', parentArgs[i] ) |
| end | | end |
| | | |
local Palette = { }
local function paletteAvecParametre( i, args )
end
function Palette.listePalette( frame )
local args = frame.args
local parentArgs = frame:getParent().args
local wikiTable = { '
\n' }
setmetatable( wikiTable, { __index = table } )
local maxPalette = 4
local categoriePaletteInconnue =
local categorieTropDePalette =
local categories = { }
local function erreur( texte, param, ... )
if param then texte = texte:format( param, ... )
end
return '
' .. texte .. '
\n'
end
local function _pasDePalette()
return erreur( 'Erreur dans l’utilisation du Modèle:Palette : paramètre obligatoire absent.' )
end
local function _paletteInconnue( i )
categories.paletteInconnue = categoriePaletteInconnue
return erreur( 'Erreur : Il n’existe pas de modèle « Palette %s »', parentArgs[i] )
end
local function _paletteAvecParametres( i )
local argsPalette = { }
for n, v in pairs( parentArgs ) do
if not tonumber(n) then
argsPalette[n] = v
if n:match( i .. '$' ) then
argsPalette[ n:sub(0 - #tostring(i) ) ] = v
elseif not argsPalette[n] then
argsPalette[n] = v
end
end
end
return frame:expandTemplate{ title = 'Palette ' .. parentArgs[i], args = argsPalette }
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 parentArgs[i] and i <= maxPalette do
if parentArgs[i] ~= then
local codePalette = args[i]
if codePalette:match( '^%[%[:Modèle:' ) then
-- La palette n'existe pas
wikiTable:insert( _paletteInconnue( i ) )
elseif codePalette:match( '^palette verticale' ) then
-- C'est une palette verticale
wikiTable:insert( 1, codePalette:sub( 18 ) .. '\n' )
elseif codePalette:match( '^palette avec paramètres' ) then
-- C'est une palette nécessitant des paramètres nommés
wikiTable:insert( _paletteAvecParametres( i ) )
else
wikiTable:insert( codePalette )
end
end
i = i + 1
end
if i == 1 or #wikiTable == 1 then
wikiTable:insert( _pasDePalette() )
elseif i > maxPalette and parentArgs[i] and ( parentArgs[i] ~= or parentArgs[i+1] and parentArgs[i+1] ~= ) then
wikiTable:insert( _tropDePalettes() )
end
wikiTable:insert( '
' )
for i, v in pairs( categories ) do
wikiTable:insert( v )
end
return wikiTable:concat()
end
return Palette