Module:QoD

local dayBase = 'Wikiquote:Quote of the day/' local lang = mw.language.getContentLanguage local p = {}

function msg(monthName) if string.len(monthName)<=3 then return monthName..' long' end return monthName end

function p.list(frame) local s = frame.args[1] if s==nil or s=='' then s = mw.title.getCurrentTitle.subpageText end local month, year = string.match(s,'^(%w+) (%d+)$') if month==nil or year==nil then s = mw.title.new(frame:getTitle).subpageText end month, year = string.match(s,'^(%w+) (%d+)$') if month~=nil and year~=nil then local output = {} local viw = frame:preprocess('') local tlk = frame:preprocess('') local his = frame:preprocess('') for x = 1,tonumber(lang:formatDate('t','1 '..month..' '..year)) do			local page = mw.title.new(dayBase..month..' '..x..', '..year) local t = ';'..month..' '..x..'\n' if page.exists then t = t..frame:preprocess(page:getContent) else t = t....page.fullText.. end t = t..' \n' t = t..''..viw..' - '			t = t..tlk..' - ['..page:fullUrl{action = 'history'}..' '..his..']' table.insert(output,t) end output = table.concat(output,'\n\n') output = output..'\ntr:Vikisöz:Günün sözü/Arşiv/'..mw.message.new(msg(month)):inLanguage('tr'):plain..' '..year..'' return output end end

return p