Wikipedia

Modul:Citation/CS1/Date validation/sandkasse: Forskelle mellem versioner

Gennemse historikken interaktivt
← Gå til forrige forskelGå til næste forskel →
Content deleted Content added
Eksempler på datoer
Tilføjet mere hjælpetekst
Linje 1.084:
]]
for param_name, param_val in pairs(date_parameters_list) do -- for each date-holding parameter in the list
if is_set(param_val.val) then -- MGA73: Hvis IKKE en af de 4 nedenfor...
if not param_val.val:match ('^[1-9]%d%d%d *%- *[1-9]%d%d%d') and -- MGA73: .val fx 1995-1996
not param_val.val:match ('%d%d%d%d%-%d%d%-%d%d') and -- MGA73: .val fx 2020-12-25
not param_val.val:match ('%d%d%-%d%d%-%d%d%d%d') and -- MGA73: .val fx 05-02-2021
not param_val.val:match ('%d%d?%/%d%d?[%s-]%d%d%d%d') then -- MGA73: .val fx 1/2-1986
param_val.val, n = param_val.val:gsub ('%-', ' – '); -- MGA73: .val x 2 ... hvis IKKE en af de 4, så ret bindestreg til tankestreg -- replace any hyphen with ndash
if 0 ~= n then
date_parameters_list[param_name].val = param_val.val; -- MGA73: .val x 2 -- update the list
result = true;
end
end -- MGA73: Hvis IKKE en af de 3 nedenfor...
end
if not param_val.val:match ('[1-9]%d?%. +%a+%.? *– *[1-9]%d?%. +%a+%.? +[1-9]%d%d%d') and -- MGA73: .val fx 1. december – 10. december 2008
not param_val.val:match ('[1-9]%d?%. +%a+%.? +[1-9]%d%d%d *– *[1-9]%d?%. +%a+%.? +[1-9]%d%d%d') and -- MGA73: .val fx 1. december 2008 – 10. december 2009
not param_val.val:match ('^%a+%.? +[1-9]%d%d%d *– *%a+%.? +[1-9]%d%d%d') then -- MGA73: .val fx september 2020 – februar 2021
param_val.val, n = param_val.val:gsub (' *– *', '-'); -- MGA73: .val -- erstat... hvis IKKE en af de 4, så ret tankestreg medtil bindestreg
if 0 ~= n then
date_parameters_list[param_name].val = param_val.val; -- MGA73: .val -- update the list
Linje 1.104:
end
end
if param_val.val:match ('[^ ]–[^ ]') then -- MGA73: .val Hvis der IKKE er mellemrum omkring tankestreg ...
param_val.val, n = param_val.val:gsub ('–', ' – '); -- MGA73: .val ... så sæt mellemrum
if 0 ~= n then
date_parameters_list[param_name].val = param_val.val; -- MGA73: .val x 2 -- update the list
Linje 1.111:
end
end
if param_val.val:match (' %- ') then -- MGA73: .val Hvis der er mellemrum omkring bindestreg ...
param_val.val, n = param_val.val:gsub (' +%- +', '-'); -- MGA73: .val ... så fjern mellemrum.
if 0 ~= n then
date_parameters_list[param_name].val = param_val.val; -- MGA73: .val -- update the list
Hentet fra "https://da.wikipedia.org/wiki/Modul:Citation/CS1/Date_validation/sandkasse"