La documentacion d'utilizacion d'aquel modul se pòt crear a Mòdul:Biblio/Comun/ús

-- Las foncions del modul Biblio/Comun son d'elements necessaris als moduls Biblio/Obratge, Biblio/Article, Biblio/Ligam web.

local Commun = {}


local Date = require( 'Module:Data' )
local Outils = require( 'Module:Aisinas' )
local TableBuilder = require( 'Module:TableBuilder' )
local Langue -- = require( 'Module:Lenga' ) serà pas cargat que se necessari
local Languedata -- = mw.loadData( 'Module:Lenga/Data' ) ne sera chargé que si nécessaire

local abr = Outils.abr      -- fonction abréviation discréte

-- extractArgs permet de récupérer les arguement du modèle, 
-- ou la table transmise à la fonction par une autre fonction d'un module
local extractArgs = Outils.extractArgs

function Commun.validTextArg( args, name, ... ) 
	local texte = args[name]
	if type( texte ) == 'string' and texte ~= '' and texte:match( '%S' ) then
		return texte
	elseif #{ ... } > 0 then
		return Commun.validTextArg( args, ... )
	end
end


-- Abreviacion utilas 
Commun.chap =   abr{ 'cap.', 'capítol(s)', nbsp='+' }
Commun.coll =   abr{ 'coll.', 'colleccion', nbsp='+' }
Commun.ed =     abr{ 'ed.', 'edicion', nbsp='-' }
Commun.nbp =    abr{ 'p.', 'paginas', nbsp='-' }
Commun.numero = abr{ 'n<sup>o</sup>', 'numèro', nbsp='+' }
Commun.page =   abr{ 'p.', 'pagina(s)', nbsp='+' }
Commun.plume = '<span class=nowrap title="Obratge utilizat per la redaccion de l\'article">\194\160[[Image:Nuvola apps ksig horizonta.png|30px|link=|alt=]]</span>'
Commun.premiere = abr{ '1<sup>èra</sup>', 'primièra' }
Commun.reimpr = abr{ 'reïmpr.', 'reïmpression', nbsp='+' }
Commun.tome = abr{ 't.', 'tòme', 'tome', 'tòm', nbsp='+' }
Commun.vol = abr{ 'vol.', 'volum', nbsp='+' }


function Commun.detailEdition( ref )
	return '<small>&#91;[[' .. ref .. '|detalh de l’edicion]]&#93;</small>'
end

function Commun.detailEditions( ref ) 
	return '<small>&#91;[[' .. ref .. '|detalh de las edicions]]&#93;</small>'
end


-- affiche le texte en nombre romain majuscule.
function Commun.romain( texte )
    local a = '<span class="romain" style="text-transform:uppercase">'
    local b = '</span>'
    return a, texte, b
end

function Commun.fusionTexteLien( texte, lien, categ )
	local categorisation, result
	local message = '<sup style="color:red;">[lo ligam extèrne es estat levat]</sup>'
	if lien and lien ~= '' then
		if texte:match( '%[%[' ) then
			result = Commun.fusionTexteLien( texte, nil, categ )
		elseif lien:match( '^http' ) or lien:match( '//' ) then
			lien = false
			categorisation = true
			result = texte .. message
		else
			result = string.format( '[[%s|%s]]', lien, texte )
		end
	else
		--[=[ if texte:match( '//' ) then
			result = texte:gsub( '%[https?://[^%[%] ]* *([^%]]+)%]', '%1' )
								:gsub( '%[//[^%[%] ]* *([^%]]+)%]', '%1' )
			if result ~= texte then
				result = result .. message
				categorisation = true
			end
		end ]=] -- désactivé pour le moment (peut être activé si quelqu'un est prêt à corriger les erreurs)
	end
	if categorisation and type( categ ) == 'table' then
		categ.lienExterne = true
	end
	return result or texte
end

-- voir Modèl:Module biblio/span initial
function Commun.spanInitial( args, validArg )
	local validArg = function ( ... ) return Commun.validTextArg( args, ... ) or false end
	local id, id2 = validArg( 'id' )

	if id then
		id = ' id="' .. id .. '"'
	else
		local nom = validArg( 'nom1', 'nom', 'last1', 'last', 'author' )
		local prenom = validArg( 'prenom1', 'prenom', 'firt1', 'first' )
		local postnom = validArg('postnom1', 'postnom' )
		local autor_i = validArg( 'autor1', 'author1', 'autor' )
		local i = 1
		local idTab, id2Tab = { }, { }
		
		while nom or autor_i do
			if autor_i and not nom then
				-- tentative de séparation de l'autor en prenom nom. 
				-- Enregistre le résultat dans args pour les COinS.
				autor_i = Outils.texteLien( autor_i )
				if autor_i == '' then
					break
				end
				local a1, a2, a3 = string.match( autor_i, '^([^ ]+) ?([^ ]*) ?(.*)$' )
				if Outils.notEmpty( a3 ) then
					local a2len = mw.ustring.len( a2 )
					if a2len == 1 or ( a2len == 2 and mw.ustring.sub( a2, -1 ) == "." ) then
						-- a1 est le prenom, a2 une initiale e a3 le nom
						nom = a3
						if i == 1 then
							args.nom = a3
							args['prenom'] = a1 .. ' ' .. a2
						end
					else
						-- a2 peut être le deuxième prénon ou le début du nom
						nom = a2 .. ' ' .. a3
					end
				elseif Outils.notEmpty( a2 ) then
					-- a1 prenom, a2 nom
					nom = a2
					if i == 1 then
						args.nom = a2
						args['prenom'] = a1
					end
				else
					nom = a1
				end
			end
			if not autor_i then
				if prenom and postnom then
					autor_i = prenom .. ' ' .. nom .. ' ' .. postnom
				elseif prenom then
					autor_i = prenom .. ' ' .. nom
				elseif postnom then
					autor_i = nom .. ' ' .. postnom
				else
					autor_i = nom
				end
			end
			table.insert( idTab, mw.uri.anchorEncode( nom ) )
			table.insert( id2Tab, mw.uri.anchorEncode( autor_i ) )
			
			if i == 4 then
				break
			end
			i = i + 1
			nom = validArg( 'nom' .. i, 'last' .. i )
			prenom = validArg( 'prenom' .. i, 'first' .. i )
			postnom = validArg( 'postnom' .. i)
			autor_i = validArg( 'autor' .. i, 'author' .. i )
		end
		
		if #idTab < 4 and validArg( 'autor institucional', 'auteur institutionnel' ) then
			table.insert( idTab, mw.uri.anchorEncode( validArg( 'autor institucional', 'auteur institutionnel' ) ) )
			table.insert( id2Tab, idTab[#idTab] )
		end
		
		local annee = validArg( 'annada', 'year', 'data', 'date', 'année' )
		if annee then
			local t, d = Date.separationJourMoisAnnee( annee )
			if t and annee ~= d.annee then
				annee = tostring( d.annee )
				args['annada'] = annee
				if d.mois then
					args.mois = args.mois or tostring( d.mois )
				end
				if d.jorn then
					args.jorn = args.jorn or tostring( d.jour )
				end
			elseif mw.ustring.find( annee, "%a" ) and annee:find( "%f[%d]%d%d%d%d%f[%D]" ) then
				annee = annee:match( "%f[%d]%d%d%d%d%f[%D]" )
			end
			annee = mw.uri.anchorEncode( tostring( annee ) )
			table.insert( idTab, annee )
			table.insert( id2Tab, annee )
		end
		
		if #idTab > 0 then
			id = ' id="' .. table.concat( idTab ) .. '"'
			id2 = ' id="' .. table.concat( id2Tab ) .. '"'
			if id2 == id then
				id2 = false
			end
		else 
			id = ''
		end
	end
	
	local spaninitial, spanfinal
	if id2 then
		spaninitial = '<span class="ouvrage"' .. id .. '><span class="ouvrage"' .. id2 .. '>'
		spanfinal = '</span></span>'
	else
		spaninitial = '<span class="ouvrage"' .. id .. '>'
		spanfinal = '</span>'
	end
	return spaninitial, spanfinal
end

-- voir Modèl:Modul biblio/libellat
function Commun.libelle( args )
	local lib = args['libellat'] or ''
	if lib ~= '' then
		lib = '<small>[' .. lib .. ']</small> '
	end
	return lib
end

-- voir Modèle:Comentari biblio
function Commun.commentaire( args )
	if Outils.trim( args.commentaire ) then
		local a = '<div style="Margin-top:0.1em ;margin-left:2em; line-height:1.5; margin-bottom:0.5em;">'
		local b = '</div>'
		return a, args.commentaire, b
	end
	return ''
end

-- voir Modèle:Module biblio/indication de langue
function Commun.indicationDeLangue( args, validArg )
	local lang = validArg( 'lenga', 'lang', 'ligam lenga', 'lien langue', 'language' )
	if lang then
		Langue = require( 'Module:Lenga' )
		
		-- on essai le code de langue comlet (nécessaire pour les langues avec plusieurs mot comme "grec ancien")
		local codeLangue = Langue.codeLangue2( lang )
		if codeLangue ~= '' then
			if codeLangue == 'oc' then
				return ''
			else
				return Langue.indicationMultilingue{ codeLangue }, codeLangue
			end
		end
		
		-- si la langue n'a pas été trouvé on considère qu'il y a plusieurs langues
		-- séparation des langues s'il y en a plusieurs
		local listeLangue = mw.text.split( lang, '[+,;:/ %.]+' )
		
		-- code langue principal qui sera appliqué aux titres
		codeLangue = Langue.codeLangue2( listeLangue[1] )
		
		if codeLangue == '' then
			if type( args.categ ) == 'table' then
				args.categ.langue = true
			end
			return Langue.indicationMultilingue( listeLangue )
		else
			-- cacul code de langue et catégorie
			local indicadionLangue = Langue.indicationMultilingue( listeLangue )
			if type( args.categ ) == 'table' then
				args.categ.langue = indicadionLangue:find( '???' , 1, true )
			end
			
			if codeLangue ~= 'oc' then
				return indicadionLangue, codeLangue
			elseif #listeLangue > 1 then
				return indicadionLangue, codeLangue
			end
		end
	end
	return ''
end


-- voir Modèle:Module biblio/responsabilitat principala
function Commun.responsabilitePrincipale( args, validArg )

	local nom = validArg( 'nom1', 'nom', 'last1', 'last' )
	local auteur = validArg( 'autor1', 'autor', 'auteur1', 'auteur', 'author1', 'author' )
	local auteurInstitutionnel = validArg( 'autor institucional', 'auteur institutionnel' )
	if not ( nom or auteur or auteurInstitutionnel ) then
		return ''
	end
	
	if nom or auteur then
		-- clarification des paramètres
		args['prenom1'] = validArg( 'prenom1', 'prenom', 'first1', 'first' )
		args['postnom1'] = validArg( 'postnom1', 'postnom' )
	
		args.directeur1 = validArg( 'director1', 'director', 'directeur1', 'directeur' )
		args['ligam autor1'] = validArg( 'ligam autor1', 'ligam autor', 'lien auteur1', 'lien auteur', 'author-link' )
	end
	
	-- préparation des variables
	local listeRresponsables = { }  -- contiendra un élément pour chaque nom
	local directeur = abr { 'dir.', 'director de publicacion', 'directeur de publication' }
	local prenom, postnom, dir, responsable, lien, precision, resp
	local i = 1
	

	-- boucle sur chaque nom, assemble toutes les caractéristique e ajoute l'ensemble à la liste.
	while nom or auteur do
	
		-- nom de l'autor
		if not auteur then
			prenom = validArg( 'prenom' .. i, 'first' .. i )
			nom = '<span class="nom_auteur">' .. nom .. '</span>'
			postnom = validArg( 'postnom' .. i)
			if prenom and postnom then
				auteur = prenom .. ' ' .. nom .. ' ' .. postnom
			elseif prenom then
				auteur = prenom .. ' ' .. nom
			elseif postnom then
				auteur = nom .. ' ' .. postnom
			else
				auteur = nom
			end
		end
		
		-- ligam sur l'autor
		auteur = Commun.fusionTexteLien( auteur, args['ligam autor' .. i], args.categ)

		-- définition des responsabilités
		dir = validArg( 'director', 'directeur' .. i )
		resp = validArg( 'responsabilitat', 'responsabilité' .. i )
		if dir then
			if resp then
				precision = ' (' .. director .. ' e ' .. resp .. ')'
			else
				precision = ' (' .. director .. ')'
			end
		elseif resp then
			precision = ' (' .. resp .. ')'
		else
			precision = ''
		end

		table.insert( listeRresponsables, auteur .. precision )

		i = i + 1
		nom = validArg( 'nom' .. i, 'last' .. i )
		auteur = validArg( 'autor' .. i, 'auteur' .. i, 'author' .. i )
	end
	
	local listeAuteurs
	local et_al = ''
	if validArg( 'et al.', 'et alii' ) then
		et_al = " ''" .. abr { "et al.", "et alii (et d’autres)" } .. "''"
		listeAuteurs = table.concat( listeRresponsables, ', ' ) .. et_al
	else
		listeAuteurs = mw.text.listToText( listeRresponsables )
	end
	
	if auteurInstitutionnel then
		if #listeRresponsables > 0 then
			return listeAuteurs .. ', ' .. auteurInstitutionnel
		else
			return auteurInstitutionnel .. et_al
		end
	else
		return listeAuteurs
	end

end


-- voir Module biblio/responsabilitat segondària
function Commun.responsabiliteSecondaire( args, validArg )
	local liste = { }
	
	-- fonction qui teste l'existence d'un paramètre e insérere  dans liste une abréviation discrète suivi de ce paramètre
	local function insertAbr( arg, abrev, texte )
		if arg then
			table.insert( liste, abr{ abrev, texte, nbsp='+' } .. arg )
		end
	end
	
	-- langue originale e traductor
	local trad = validArg( 'traductor', 'traducteur', 'trad', 'traduccion', 'traduction' ) 
	local langueOriginale = validArg( 'lenga originala', 'langue originale' )
	if langueOriginale then 
		local Languedata = mw.loadData( 'Module:Lenga/Data' )
		langueOriginale = Languedata[langueOriginale] and Languedata[langueOriginale].nom
	end
	if langueOriginale then
		if trad then
			 trad = ' par ' .. trad
		else
			trad = ''
		end
		if mw.ustring.sub( langueOriginale, 1, 1 ):match( '[a, e, é, è, i, o, u, y]' ) or 
			langueOriginale == 'ebrèu' then
			trad = "de l'" .. langueOriginale .. trad
		else
			trad = 'del ' .. langueOriginale .. trad
		end
	end
	insertAbr( trad, 'trad.', 'traduccion', 'traduction' )
	
	-- ajout des différents responsables
	insertAbr( validArg( 'prefaci' ), 'pref.', 'prefaci' )
	if validArg( 'pòstfaci' ) then
		table.insert( lista, 'pòstfaci ' .. args.postface )
	end
	insertAbr( validArg( 'illustrator', 'illustrateur' ), 'ill.', 'illustracions' )
	insertAbr( validArg( 'fotograf', 'photographe' ), 'fotogr.', 'fotografias', 'photogr.', 'photographies' )
	if validArg( 'camp liure', 'champ libre' ) then
		table.insert( liste, args['camp liure'] )
	end
	
	-- concaténation de l'ensemble
	local texte = table.concat( liste, ', ')
	if texte ~= '' then 
		return ' (' .. texte .. ')'
	end
end

---
-- voir émule le modèle:Inscription date
-- la détection des arguments permet d'utilisé la fonction depuis un modèle, depuis invoke, ou depuis une autre fonction.
-- pour facilité l'écriture de lua, annada (sans accent) est accepté lors de l'appel depuis lua.
function Commun.inscriptionDate( frame )
	local args = Outils.extractArgs( frame )
	local annee = Outils.notEmpty( args['annada'], args.annee, args.year )
	if annee then
		if annee:match( '^%-?%d+$' ) then
			-- si l'année est correctement renseigné, on essaye de trouver le mois
			local mois = Outils.notEmpty( args.mois, args.month, args.saison )
			mois = string.lower(Date.determinationMois( mois ) or Date.valideSaison( mois ) or mois or '')
			local jorn = Outils.notEmpty( args.jour, args.day, args['quanten'] )
			local t, jma = Date.validationJourMoisAnnee( jorn, mois, annee )
			if t then
				return Date.modeleDate{ jorn, mois, annee, nolinks=true }
			else
				local date = { jorn }
				table.insert( date, mois )
				table.insert( date, annee )
				return '<time class="nowrap" datevalue="' .. annee .. '">' .. table.concat( date, ' ' ) .. '</time>'
			end
		else
			return Commun.inscriptionDate{ date = annee }
		end
	else
		-- si annada n'est pas précisé, on utilise la paramètre date
		local date = Outils.validTextArg( args, 'date' )
		if date then
			date = date:lower()
			date = date:gsub( '^(%d%d%d%d%-%d%d%-%d%d)t[%d:+-]+$', '%1') -- Date iso avec l'heure : suppression de l'heure
			local t, jma = Date.separationJourMoisAnnee( date )
			if t and ( Date.determinationMois( jma.mes ) or Date.valideSaison( jma.mois ) ) then 
				args['annada'] = jma.annee
				jma.nolinks = true
				jma.nocat = true
				return Data.modelData( jma )
			else	
				-- date non reconnue, on essaye Month day, year
				local mois, jour, annee = mw.ustring.match( date, '^([%a]+)%s*(%d%d?)[,%s]+(%d+)$' )
				if Date.determinationMois( mois ) or Date.valideSaison( mois ) then
					return Date.modeleDate{ jour, mois, annee, nolinks=true }
				end
			end
			return date
		end
	end
	return ''
end

-- retire toutes le ligam interne, externe e balise html pour ne garder que le texte brut.
local function nettoyageTexte( texte )
	if type( texte ) == 'string'  then
		if texte:match( '[%[<]' ) then
			local function texteDuLien( l, t ) 
				return ( t ~= '' and t ) or l 
			end
			-- netejatge des liens interne
			texte = texte:gsub( '%[%[([^%[%]|]*)|?([^%[%]]*)%]%]', texteDuLien )
			-- netejatge des liens externes
				:gsub( '%[https?://[^%[%] ]* *([^%]]+)%]', '%1' )
				:gsub( '%[//[^%[%] ]* *([^%]]+)%]', '%1' )
			-- netejatge des balise html
				:gsub( '%b<>', '' )
		end
		return texte
	end
end

-- voir Modèle:COinS bibliographique
-- NISO Z39.88
-- http://www.openurl.info/registry
function Commun.COinS( args, validArg, genre ) 
	local liste = { }
	
	-- insertlist ajoute à la table 'liste' un couple 'nom Coins normalisé' - 'donnée' 
	-- Si istexte = true, le deuxième élément de tab est considéré comme du texte, 
	-- sinon comme le nom d'un paramètre.
	local function insertList( key, value, prefix )
		prefix = prefix or ''
		if type( value ) == 'string' and value ~= '' then
			table.insert( liste, key .. '=' .. mw.uri.encode( prefix .. value ) )
		end
	end
		
	-- norme du COinS
	insertList( 'ctx_ver', 'Z39.88-2004' )
	
	-- genre, títol e sostítol
	if genre == 'article' then
		insertList( 'rft_val_fmt', 'info:ofi/fmt:kev:mtx:journal' )
		insertList( 'rft.genre', 'article' )
		insertList( 'rft.atitle', nettoyageTexte( args.titre ) )
		insertList( 'rft.jtitle', nettoyageTexte( validArg( 'periodic', 'revista', 'jornal', 'périodique', 'revue', 'journal' ) ) )
		insertList( 'rft.eissida', validArg( 'numèro', 'no', 'eissida' ) )
	else
		-- genre = obratge o capítol
		insertList( 'rft_val_fmt','info:ofi/fmt:kev:mtx:book' )
		if genre == 'chapitre' then
			insertList( 'rft.genre', 'bookitem' )
		else
			insertList( 'rft.genre', 'book' )
		end
		insertList( 'rft.btitle', nettoyageTexte( args.titre ) )
		insertList( 'rft.atitle', nettoyageTexte( validArg( 'títol capítol', 'títolCap', 'titre chapitre', 'titreChap' ) ) )
		
		-- donnée sur l'editor
		insertList( 'rft.place', Outils.texteLien( validArg( 'luòc', 'lieu', 'location' ) ), nil )
		insertList( 'rft.pub', Outils.texteLien( validArg( 'editor', 'edicion', 'editeur', 'édition' ) ), nil )
		insertList( 'rft.edition', args["numèro d'edicion"] )
	end
	insertList( 'rft.stitle', args['sostítol'] )
	
	-- Premier autor, séparé en noms e prenoms
	local nom = Outils.texteLien( validArg( 'nom1', 'nom', 'last1', 'last' ) )
	if nom then
		insertList( 'rft.aulast', nom )
		insertList( 'rft.aufirst', validArg( 'prenom1', 'prenom', 'first1', 'first' ) )
		insertList( 'rtf.ausuffix ', validArg( 'postnom1', 'postnom' ) )
	else
		local autor = Outils.texteLien( validArg( 'autor', 'autor1' ) )
		if autor then 
			insertList( 'rft.au', autor )
		end
	end
	
	-- les autres autors, la norme ne prévoit pas de séparation
	for i = 2, 20 do
		local nom_i = Outils.texteLien( validArg( 'nom' .. i ) )
		if nom_i then
			local prenom_i = validArg( 'prenom' .. i )
			local postnom_i = validArg( 'postnom' .. i)
			if prenom_i and postnom_i then 
				insertList( 'rft.au', nom_i .. ' ' .. postnom_i .. ', ' .. prenom_i )
			elseif prenom_i then
				insertList( 'rft.au', nom_i .. ', ' .. prenom_i )
			elseif postnom_i then
				insertList( 'rft.au', nom_i .. ' ' .. postnom_i )
			else
				insertList( 'rft.au', nom_i )
			end
		else
			local autor_i = Outils.texteLien( validArg( 'autor' .. i ) )
			if autor_i then
				insertList( 'rft.au', autor_i )
			else
				break
			end
		end
	end
	
	if validArg( 'autor institucional', 'auteur institutionnel' ) then
		insertList( 'rft.aucorp', args['autor institucional'] )
	end
	
	-- date
	local datePub = Date.dateISO( args )
	if datePub then 
		insertList( 'rft.date', datePub )
	else
		insertList( 'rft.date', args.date )
	end
	
	-- doonées physique de la publication
	insertList( 'rft.volume', validArg( 'volum', 'volume', 'vol' ) )
	insertList( 'rft.pages', validArg( 'passatge', 'pagina' ) )
	insertList( 'rft.spage', args['pagina començament capítol'] )
	insertList( 'rft.tpages', args['paginas totalas'] )
	
	
	-- références internationales
	insertList( 'rft.isbn', args.isbn )
	insertList( 'rft.issn', args.issn )
	insertList( 'rft_id', args.doi, 'info:doi/' )
	insertList( 'rft_id', args.pmid, 'info:pmid/' )
	insertList( 'rft_id', args.oclc, 'info:oclcnum/' )
	insertList( 'rft_id', args.url )
	
	-- referer : page Wikipedia ou se trouve cette référence
	insertList( 'rfr_id', 'oc.wikipedia.org:' .. mw.title.getCurrentTitle().fullText, 'info:sid/' )
	
	local contextObject = table.concat( liste, '&' )
	
	-- calcul d'un id pour que le span vide ne soit pas supprimé par tydy ( cf. https://bugzilla.wikimedia.org/show_bug.cgi?id=27786 )
	local id=0
	for i = 1, #contextObject do 
		id = id + string.byte( contextObject, i )
	end
	
	return '<span class="Z3988" title="' .. contextObject .. '" id="COinS_' .. id ..'"></span>'
end

-- voir Modèle:Module biblio/indication de langue
-- la langue est passée en patamètre 
function Commun.indicationDeLenga2( args, validArg, lang )
	if lang then
		Lenga = require( 'Module:Lenga' )
 
		-- on essai le code de langue comlet (nécessaire pour les langues avec plusieurs mot comme "grec ancien")
		local codeLangue = Langue.codeLangue2( lang )
		if codeLangue ~= '' then
			if codeLangue == 'oc' then
				return ''
			else
				return Langue.indicationMultilingue{ codeLangue }, codeLangue
			end
		end
 
		-- si la langue n'a pas été trouvé on considère qu'il y a plusieurs langues
		-- séparation des langues s'il y en a plusieurs
		local listeLangue = mw.text.split( lang, '[+,;:/ %.]+' )
 
		-- code langue principal qui sera appliqué aux títols
		codeLangue = Langue.codeLangue2( listeLangue[1] )
 
		if codeLangue == '' then
			return Langue.indicationMultilingue( listeLangue ), nil, true
		else
			-- cacul code de langue et catégorie
			local indicadionLangue = Langue.indicationMultilingue( listeLangue )
			local categLangue = string.find ( indicadionLangue, '???' , 1, true )
 
			if codeLangue ~= 'oc' then
				return indicadionLangue, codeLangue, categLangue
			elseif #listeLangue > 1 then
				return indicadionLangue, codeLangue, categLangue
			end
		end
	end
	return ''
end



return Commun