Module:voir

Documentation[voir] [modifier] [historique] [purger]

Ce module réunit des fonctions pour afficher les modèles{{voir}},{{voir autres systèmes}}et{{voir autres scripts}}.

Fonctions:

templateSee(frame)

Utilisable indirectement dans un modèle voir. Crée une liste formatée à partir de la liste d'éléments donnés au modèle. Le bandeau n’est pas inclus.

templateSeeOtherScripts(frame)

Utilisable indirectement dans un modèle voir autres scripts. Crée une liste formatée « script: symbole » à partir de la liste de paires d’éléments donnés au modèle. Le bandeau n’est pas inclus.

Ladocumentationde cemoduleest générée par le modèle{{Documentation module}}.
Elle estinclusedepuis la pageModule:voir/Documentation.Veuillez placer les catégories sur cette page-là.
Les éditeurs peuvent travailler dans le bac à sable(créer).
Voir lesstatistiques d'appel depuis le wikicodesur l'outilwstatet lesappels depuis d'autres modules.

---

-- Avant de publier toute modification, testez l’affichage dans [[Discussion module:voir]]
localm_bases=require("Module:bases")

localp={}

--- Parses the raw arguments.
--- @param rawTable table Raw parameters table.
--- @param title string Current page’s title.
--- @return table The parsed list.
localfunction_toTable(rawTable,title)
locali=1
localmaxLinks=200
localparamsTable={}

whilerawTable[i]andi<=maxLinksdo
localitem=mw.text.trim(rawTable[i])

-- Pour traiter [[page (explication)]]
localdescription=(mw.ustring.match(item,"%(([^%(%)%|]*)%)$"))or""
ifdescription~=""then
description="''("..description..")''"
item=mw.ustring.gsub(item,"%([^%(%)%|]*%)$","")
end

-- Caractères spéciaux non représentables avec une page: à écrire comme Lien{{!}}Caractère
-- (Bricolage: pas possible de faire mieux?)
locallink=mw.ustring.gsub(item,"|.*","")

iflink~=""andlink~=titlethen
table.insert(paramsTable,"[["..item.."]]"..description)
end
i=i+1
end

returnparamsTable
end

localfunctioncontainsDuplicates(list)
localmaxLinks=200
locali=1
whilelist[i]andi<=maxLinksdo
localj=i+1
whilelist[j]andj<=maxLinksdo
iflist[i]==list[j]then
returntrue
end
j=j+1
end
i=i+1
end
returnfalse
end

--- Actually builds the list of values. The entry corresponding to the title of
--- the current page is hidden.
--- @param values table The values to display as a list.
--- @return string The formatted list.
localfunction_makeText(values)
localtitle=mw.title.getCurrentTitle().fullText
locallist=_toTable(values,title)
localtext=''

if#list>0then
text=table.concat(list,",")
ifcontainsDuplicates(list)then
text=text..'<br><span style= "color: red" >Le modèle voir contient des doublons. Merci de les retirer.</span>[[Catégorie:Wiktionnaire:Modèle voir avec doublons]]'
end
else
text="(Merci de rajouter les articles en paramètres, ou à défaut d’enlever ce modèle)"
text=text..m_bases.fait_categorie_contenu('Modèle voir sans paramètre valide')
end

returntext
end

--- Builds the list for [[Modèle:voir]] and [[Modèle:voir autres systèmes]].
functionp.templateSee(frame)
return_makeText(frame:getParent().args)
end

--- Builds the list for [[Modèle:voir autres scripts]].
functionp.templateSeeOtherScripts(frame)
localargs=frame:getParent().args
localvalues={}

locali=1
whileargs[i]do
table.insert(values,args[i+1].."("..args[i]..")")
i=i+2
end

return_makeText(values)
end

--- Builds the list for [[Modèle:voir autres systèmes]].
functionp.templateSeeOtherSystems(frame)
localargs=frame:getParent().args
localvalues={}
locallang_code=args[1]

locali=2
whileargs[i]do
table.insert(values,args[i].."#"..lang_code.."|"..args[i])
i=i+1
end

return_makeText(values)
end

returnp