Modul:Genitiv: Forskjell mellom sideversjoner
Hopp til navigering
Hopp til søk
(bugfix +comments) |
Ingen redigeringsforklaring |
||
Linje 11: | Linje 11: | ||
return "<strong class='error'>Malen «genitiv» må ha ett argument</strong>" |
return "<strong class='error'>Malen «genitiv» må ha ett argument</strong>" |
||
end |
end |
||
-- get the determiner |
|||
local det = frame.args['det'] |
|||
-- try to rewrite, but note that this could fail |
-- try to rewrite, but note that this could fail |
||
local status, str = pcall(function() return p._genitiv(ord) end) |
local status, str = pcall(function() return p._genitiv(ord, det) end) |
||
-- rewrite is done, should happen in most cases |
-- rewrite is done, should happen in most cases |
||
if status == true then |
if status == true then |
||
Linje 21: | Linje 23: | ||
end |
end |
||
function p._genitiv(ord) |
function p._genitiv(ord, det) |
||
-- fallback for multiword, use determinative for genitive |
-- fallback for multiword, use determinative for genitive |
||
if mw.ustring.find(ord, '%A$') -- trailing non-letter |
if mw.ustring.find(ord, '%A$') -- trailing non-letter |
||
or mw.ustring.find(ord, '%s%l+$') -- can be name, but can't be sure |
or mw.ustring.find(ord, '%s%l+$') -- can be name, but can't be sure |
||
then |
then |
||
return ord .. " sin" -- can be an additional trailing space on 'ord' |
return ord .. " " .. (det or "sin") -- can be an additional trailing space on 'ord' |
||
end |
end |
||
-- single word, prepare to rewrite special cases |
-- single word, prepare to rewrite special cases |
Sideversjonen fra 24. okt. 2016 kl. 01:00
Formål
Denne modulen returnerer et ord i riktig genitivsform, avhengig av hvilken bokstav ordet slutter på. Se Mal:Genitiv for nærmere dokumentasjon.
Funksjoner
genitiv
: Brukes i {{genitiv}}_genitiv
: For bruk i andre moduler.
Brukes av
local p = {} function p.genitiv(frame) -- get the argument local ord = frame.args[1] if ord == nil then ord = frame:getParent().args[1] end -- check if an argument is found if ord == nil then return "<strong class='error'>Malen «genitiv» må ha ett argument</strong>" end -- get the determiner local det = frame.args['det'] -- try to rewrite, but note that this could fail local status, str = pcall(function() return p._genitiv(ord, det) end) -- rewrite is done, should happen in most cases if status == true then return str end -- rewrite is not done, this is a fallback but is probably an error return ord end function p._genitiv(ord, det) -- fallback for multiword, use determinative for genitive if mw.ustring.find(ord, '%A$') -- trailing non-letter or mw.ustring.find(ord, '%s%l+$') -- can be name, but can't be sure then return ord .. " " .. (det or "sin") -- can be an additional trailing space on 'ord' end -- single word, prepare to rewrite special cases local sv = "sxzşŝșšśßžżź" -- a few letters that needs special treatment local sb = mw.ustring.toNFC(mw.ustring.lower(mw.ustring.sub(ord, -1))) if mw.ustring.find(sv, sb, nil, true) then -- use modifier letter apostrophe as genitive marker return ord .. "ʼ" else -- just add the 's' genitive marker return ord .. "s" end end return p