پودمان:Pagelist

    از ویکی‌نور
    (تفاوت) → نسخهٔ قدیمی‌تر | نمایش نسخهٔ فعلی (تفاوت) | نسخهٔ جدیدتر ← (تفاوت)

    توضیحات این پودمان می‌تواند در پودمان:Pagelist/توضیحات قرار گیرد.

    local p = {}
    
    local separators = {
    	dot = true,
    	pipe = true,
    	comma = true,
    	['tpt-languages'] = true
    }
    
    local function getSeparator(sep)
    	if type(sep) ~= 'string' then
    		return nil
    	end
    	if separators[sep] then
    		return mw.message.new(sep .. '-separator'):plain()
    	else
    		return sep
    	end
    end
    
    local function generateLink(page, nspace, delim, endDelim)
    	if not page then
    		return nil
    	end
    	local pagename = mw.title.new(page)
    	if not pagename then
    		-- Default to the args we were passed if our page
    		-- object was nil.
    		pagename = page
    	else
    		pagename = pagename.text
    	end
    	delim = delim or ''
    	endDelim = endDelim or delim
    	nspace = nspace or ''
    	if nspace == 'all' then
    		nspace = ''
    		pagename = page
    	end
    	local outStr = mw.ustring.gsub( 
    		string.format( 
    			'%s[[:%s:%s|%s]]%s',
    			delim, nspace, pagename, page, endDelim
    		),
    		 ':+',
    		 ':' 
    	)
    	return outStr
    end
    
    function p._main(args)
    	local t = {}
    	local separator = getSeparator(args.separator)
    	local conjunction = getSeparator(args.conjunction)
    	for i, v in ipairs(args) do
    		table.insert(t, generateLink(
    			v, args.nspace, args.delim, args.edelim
    		))
    	end
    	return mw.text.listToText(t, separator, conjunction)
    end
    
    function p.main(frame)
    	local origArgs = require('Module:Arguments').getArgs(frame, {
    		trim = false,
    		removeBlanks = false,
    		wrappers = 'Template:Pagelist'
    	})
    
    	-- Process integer args. Allow for explicit positional arguments that are
    	-- specified out of order, e.g. {{br separated entries|3=entry3}}.
    	-- After processing, the args can be accessed accurately from ipairs.
    	local args = {}
    	for k, v in pairs(origArgs) do
    		if type(k) == 'number' and 
    			k >= 1 and
    			math.floor(k) == k and
    			string.match(v, '%S') then -- Remove blank or whitespace values.
    			table.insert(args, k)
    		end
    	end
    	table.sort(args)
    	for i, v in ipairs(args) do
    		args[i] = origArgs[v]
    		-- Trim whitespace.
    		if type(args[i]) == 'string' then
    			args[i] = mw.text.trim(args[i])
    		end
    	end
    
    	-- Get old named args. We don't need to remove blank values
    	-- as for the nspace and edelim parameters the behaviour is different
    	-- depending on whether the parameters are blank or absent, and for
    	-- the delim parameter the default should be the blank string anyway.
    	args.delim = origArgs.delim
    	args.edelim = origArgs.edelim
    	args.nspace = origArgs.nspace
    
    	-- Get new named args, "separator" and "conjunction", and strip blank values.
    	if origArgs.separator and origArgs.separator ~= '' then
    		args.separator = origArgs.separator
    	end
    	if origArgs.conjunction and origArgs.conjunction ~= '' then
    		args.conjunction = origArgs.conjunction
    	end
    
    	return p._main(args)
    end
    
    return p