Module:Infobox

local Infobox = {}

function Infobox:new( args )

   --Object initialisation
   local object = {
       text = "",
       title = mw.title.getCurrentTitle()
   }
   setmetatable(object, {
       __index = Infobox,
       __tostring = function( self ) return self:tostring() end
   })

   --Open main div

local str = '

'

   return object

end

function Infobox:addTitle( args )

local str = '

' if args.text and args.text ~= then str = str .. args.text else str = str .. self.title.text end self.text = self.text .. str .. '

'

end

function Infobox:openTable( args )

   local str = '<table'
   if args.type then 
       str = str .. ' class="' .. args.type .. '"'
   end
   str = str .. '><caption'
   if class then
       str = str .. ' class="' .. args.class .. '"'
   end

   --Style of the caption
   local style = {}
   if args.border then
       style['border-color'] = args.border
   end
   if args.background then
       style['background'] = args.background
       if args.color then
           style['color'] = args.color
       end
   end
   if style ~= {} then
       str = str .. ' style="' .. formatStyle( style ) .. '"'
   end

   str = str .. '>'
   if args.text and args.text ~=  then
       str = str .. args.text
   else
       str = str .. 'Données clés'
   end

self.text = self.text .. str .. '' end function Infobox:closeTable( args ) self.text = self.text .. ''

end

function Infobox:addMixedRow( args )

   if not args.value or args.value ==  then
       return
   end
   if not args.label then

self.text = self.text .. 'Le paramètre label n\'est pas renseigné.'

   end

local str = '' .. args.label .. '' .. args.value .. ''

end

function Infobox:tostring()

return self.text .. '

'

end

--Create a style property value from an array CSS property = CSS value function formatStyle( args )

   local elems = {}
   for key, val in pairs( args ) do
       elems.add( key .. ':' .. val )
   end
   return table.concat( elems, '; ' )

end

local p = {} function p.new( args )

   return Infobox:new( args )

end function p.test()

   local a = Infobox:new( {} )
   a:addTitle( {} )
   a:openTable( {} )
   a:addMixedRow( {
       label = 'Test',
       value = 'test'
   } )
   a:closeTable( {} )
   return tostring(a)

end return p