Revision 24028292 of "Modul:Testmodul/Lavallen/start" on svwiki

p = {}
 
function p.huvudkategori(frame)
    local text = ''
    local table entity = mw.wikibase.getEntity()
    if entity then
        if entity.claims.p910 then
            local i = 0
            while entity.claims.p910[i] do
                if entity.claims.p910[i].mainsnak.snaktype == 'value' then
                    local id = entity.claims.p910[i].mainsnak.datavalue.value['entity-type']
                    local sort = entity.claims.p910[i].mainsnak.datavalue.value['entity-type']
                    if sort == 'item' then 
                        id = 'q' .. id
                    elseif sort == 'property' then
                        id = 'p' .. id
                    else
                        return ''
                    end
                    local u = mw.wikibase.sitelink( id )
                    if string.sub(u, 1, 9) == 'Kategori:' then
                        text = text .. '[[:' .. u .. ']]'
                    end
                end
                i = i + 1
            end
        end
    end
    return text
end
 
return p