Module:Asbox stubtree

From Zoophilia Wiki
Revision as of 00:00, 26 February 2013 by meta>WOSlinker
Jump to navigationJump to search

Documentation for this module may be created at Module:Asbox stubtree/doc

local i = {}

function i.exists(pagename)
    return 1
end

function i._subtree(pagename)
    local out = {"",pagename}
    local tt
    local temppage
    local temppageexists
    local r = 0
    local t = {}
    
    -- split items on dash into table
    for token in mw.ustring.gmatch(pagename, "[^-]+") do
        -- don't add numbered items to list
        if tonumber(mw.ustring.sub(token,1,1)) == nil then
            table.insert(t,token)
            r = 1
        end
    end
    table.remove(t, #t)

    while (#t > 1) do
        if r == 1 then
            r = 0
        else
            table.remove(t, 1)
            temppage = table.concat(t, "-") .. "-stub"
            temppageexists = i.exists(temppage)
            if temppageexists == 0 then
                --TODO
            end
        end
        table.insert(out,temppage)
    end

    return table.concat(out, "\n* ")
end

function i.subtree(frame)
    return i._subtree(frame.args["pagename"])
end

return i