Différences entre les versions de « Module:Présentation »
Aller à la navigation
Aller à la recherche
(vérification supplémentaire) |
(valeurs de retour par défaut) |
||
Ligne 17 : | Ligne 17 : | ||
end | end | ||
end | end | ||
return 0 | |||
end | end | ||
Ligne 26 : | Ligne 27 : | ||
end | end | ||
end | end | ||
return '' | |||
end | end | ||
Ligne 35 : | Ligne 37 : | ||
end | end | ||
end | end | ||
return '' | |||
end | end | ||
Version du 10 avril 2015 à 18:02
--[[
]]
local presentation = {}
function presentation.total( frame )
local sequence = presentation._expandSequence( mw.title.getCurrentTitle() ) return table.getn( sequence )
end
function presentation.current( frame )
local sequence = presentation._expandSequence( mw.title.getCurrentTitle() ) for i,v in pairs( sequence ) do if v == mw.title.getCurrentTitle().fullText then return i end end return 0
end
function presentation.next( frame )
local sequence = presentation._expandSequence( mw.title.getCurrentTitle() ) for i,v in pairs( sequence ) do if v == mw.title.getCurrentTitle().fullText then return sequence[i+1] end end return
end
function presentation.previous( frame )
local sequence = presentation._expandSequence( mw.title.getCurrentTitle() ) for i,v in pairs( sequence ) do if v == mw.title.getCurrentTitle().fullText then return sequence[i-1] end end return
end
function presentation._expandSequence( title )
local list = {}; title = title.rootPageTitle; while true do if title:subPageTitle( '0' ).exists then title = title:subPageTitle( '0' ) list[table.getn(list)+1] = title.fullText elseif title:subPageTitle( '1' ).exists then title = title:subPageTitle( '1' ) list[table.getn(list)+1] = title.fullText elseif tonumber(title.subpageText) ~= nil and title.basePageTitle:subPageTitle( tostring(tonumber(title.subpageText)+1) ).exists then title = title.basePageTitle:subPageTitle( tostring(tonumber(title.subpageText)+1) ) list[table.getn(list)+1] = title.fullText elseif title.baseText ~= title.rootText then title = title.basePageTitle else break end end return list
end
return presentation