Module:Yesno: Difference between revisions

    From Nonbinary Wiki
    m>Mr. Stradivarius
    (more accurate default value for "no")
    m>Mr. Stradivarius
    (back to the old "no" value, per talk)
    Line 6: Line 6:
         local retvals = {
         local retvals = {
             yes  = "yes",
             yes  = "yes",
             no    = "<!-- null -->",
             no    = "",
             ["¬"] = ""
             ["¬"] = ""
         }
         }

    Revision as of 03:01, 24 March 2013

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

    local p = {}
    
    function p.yesno(frame)
    
        -- defaults
        local retvals = {
            yes   = "yes",
            no    = "",
            ["¬"] = ""
        }
    
        -- Allow arguments to override defaults.
        -- 'any' tracks the presence of any arguments at all.
        local args = frame.args
        local any = false
        for k,v in pairs(args) do
            any = true
            retvals[k] = v
        end
        -- If there are no arguments, try and get them from the parent frame.
        if any == false then
            local pframe = frame:getParent()
            args = pframe.args
            for k,v in pairs(args) do
                retvals[k] = v
            end
        end    
    
        val = args[1]
    
        -- First deal with the case if val is nil, then deal with other cases.
        if val == nil then
            return retvals['¬']
        end
    
        val = val:lower()          -- Make lowercase.
        val = val:match'^%s*(.*%S)' or ''  -- Trim whitespace.
    
        if val == '' then
            return retvals['blank'] or retvals['no']
        elseif val == 'n' or val == 'no'  or tonumber(val) == 0 then
            return retvals['no']
        elseif val == 'y' or val == 'yes' or tonumber(val) == 1 then
            return retvals['yes']
        elseif val == '¬' then
            return retvals['¬']
        else
            return retvals['def'] or retvals['yes']
        end
    end
    
    return p