Theau 2 : Page créée avec « local p = {} -- will not work if there is links on links --=p.find_dl_colon(mw.text.split("plop:bidou:plop", ":")) --2 --=p.find_dl_colon(mw.text.split("plop:bidou… »

2021-07-29T17:42:04Z

Page créée avec « local p = {} -- will not work if there is links on links --=p.find_dl_colon(mw.text.split("plop:bidou:plop", ":")) --2 --=p.find_dl_colon(mw.text.split("plop:bidou… »

Nouvelle page

local p = {}

-- will not work if there is links on links

--=p.find_dl_colon(mw.text.split("[[plop:bidou]]:plop", ":"))
--2
--=p.find_dl_colon(mw.text.split("plop:bidou", ":"))
--1
--=p.find_dl_colon(mw.text.split("[[plop:bidou:zoz]] a [[plop:p]] :plop", ":"))
--4

function p.find_dl_colon(definee_def, index, internalindex)
index = index or 1
internalindex = internalindex or 1

while internalindex do
internalindex = mw.ustring.find(definee_def[index], "%[%[", search)
if internalindex then
local closeindex = mw.ustring.find(definee_def[index], "%]%]", internalindex)
while not closeindex do
index = index + 1
internalindex = 1
if index > #definee_def then
error("unclosed link in a definition of the definition list")
end
closeindex = mw.ustring.find(definee_def[index], "%]%]", internalindex)
end
internalindex = closeindex
end
end
return index
end

function p.split_wikitext_dl(wikistring)
local dlmap = {}
mw.log("")
for k, val in ipairs(mw.text.split(mw.text.trim(wikistring), "\n;")) do
local definee_definition
if k == 1 then
definee_definition = mw.text.split(mw.text.trim(val):sub(2), ":")
else
definee_definition = mw.text.split(val, ":")
end

local colon_dl = p.find_dl_colon(definee_definition)
dlmap[mw.text.trim(table.concat(definee_definition, ":", 1, colon_dl))] = table.concat(definee_definition, ":", colon_dl + 1)
end
return dlmap
end

local function getKeysSorted(tbl, sortFunction)
local keys = {}
for key in pairs(tbl) do
table.insert(keys, key)
end

table.sort(keys, function(a, b)
return sortFunction(a, b)
end)

return keys
end

local function strip_tags(htmlstring)
return mw.ustring.gsub(htmlstring, "<.*>", "")
end

local function strip_wikilink(wikistring)
local str = mw.ustring.gsub(wikistring, "%[%[[^|]*|", "")
str = mw.ustring.gsub(str, "%]%]", "")
str = mw.ustring.gsub(str, "'''", "")
return mw.text.killMarkers(str)
end

local function compare_defs(a, b)
return strip_wikilink(a) < strip_wikilink(b)
end

p.sort_definition_list = function(frame)
local defs = p.split_wikitext_dl(frame.args[1])
local res = ""
for k, key in pairs(getKeysSorted(defs, compare_defs)) do
mw.log("%>" .. k)
mw.log("%=>" .. key .. " (" .. strip_wikilink(key) .. ")")
res = res .. ";" .. key .. ":" .. defs[key] .. "\n"
end
return res .. "\n"
end

local testwiki = ";plop : bidou\n;plop [[a:p|bé]] : bidou\n;plop [[a:p|bé]] [[a:p|bé]] : bidou 2\n"

function p.test()

local frame = {}
frame.args = {}
frame.args[1] = testwiki
mw.log(p.sort_definition_list(frame))

mw.log("------------------------------------------------------------------------")
mw.logObject(p.split_wikitext_dl(testwiki))
end

return p

Module:Sort definition list - Historique des versions

Theau 2 : Page créée avec « local p = {} -- will not work if there is links on links --=p.find_dl_colon(mw.text.split("plop:bidou:plop", ":")) --2 --=p.find_dl_colon(mw.text.split("plop:bidou… »

Theau 2 : Page créée avec « local p = {} -- will not work if there is links on links --=p.find_dl_colon(mw.text.split("plop:bidou:plop", ":")) --2 --=p.find_dl_colon(mw.text.split("plop:bidou… »