Sysop: 1 version importerades

2025-10-31T11:57:57Z

1 version importerades

← Äldre version		Versionen från 31 oktober 2025 kl. 11.57
(Ingen skillnad)

sv>MikaelLindmark: fixing comments

2014-04-25T11:00:55Z

fixing comments

Ny sida

-- Testing with the Debug console:
-- frame = {}
-- frame.args = {"April 2014"}
-- =p.str2num(frame)

local p = {}
-- Months in English and Swedish
months = {"January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December"}
manader = {"januari", "februari", "mars", "april", "maj", "juni", "juli", "augusti", "september", "oktober", "november", "december"}

function p.num2str(frame)
local arguments = frame.args
local datestr = arguments[1]
-- Assume ISO 8601 format
local year,month,day = string.match(datestr,"(%d%d%d%d)-(%d?%d)-(%d?%d)")
if not year then
year,month = string.match(datestr,"(%d%d%d%d)-(%d?%d)")
if not year then
-- No clue what the input is. Return unchanged.
return datestr
end
end
month = tonumber(month)
if month < 1 or month > 12 then
-- Not a month. Return unchanged.
return datestr
end
datestr = manader[month] .. " " .. year
if day then
datestr = day .. " " .. datestr
end
return datestr
end

function p.str2num(frame)
local year = 0
local arguments = frame.args
local datestr = arguments[1]
-- Search for matching month
local s = string.match(datestr, "%a+")
for i = 1, (#months-1) do
if s == months[i] or s == manader[i] then
-- Also need the year
year = string.match(datestr, "%d%d%d%d")
if year then
-- OK, replace it
day = string.match(datestr, "%d%d? ")
-- Fix leading zero
if i > 9 then
mon = i
else
mon = "0" .. i
end
datestr = year .. "-" .. mon
if day then
if tonumber(day) < 10 then
day = "0" .. day
end
datestr = datestr .. "-" .. day
end
end
end
end
return datestr
end

return p

Modul:Convertdate - Versionshistorik

Sysop: 1 version importerades

sv>MikaelLindmark: fixing comments