Module:XfD old/AfD and MfD and Module:XfD old/AfD and MfD/sandbox: Difference between pages

(Difference between pages)
Page 1
Page 2
imported>Pppery
Add RfD
 
imported>RAN1
mNo edit summary
 
Line 1: Line 1:
-- Various hacky solutions to allow AfD and MfD to show up on [[Template:XFD Backlog]]
-- AfD is easy, as [[User:Mathbot]] already summarizes the total on each day
local p = {}
local p = {}
local lang = mw.getContentLanguage()
-- RfD is even worse, since we have to manually parse all log pages
function p.afd(frame)
local month = frame.args.month
local pat
if month == "total" then
pat = "%(([0-9]+) open"
else
month = lang:formatDate("Y F", month)
pat = "%[%[Wikipedia:Articles for deletion/Log/" .. month .. "[^%]]*%]%] %(([0-9]+) open /"
end
local content = mw.title.new("Wikipedia:Articles for deletion/Old"):getContent()
local count = 0
for daycount in content:gmatch(pat) do
count = count + daycount
end
return count
end
-- MfD is much harder, because the only list of all active MfDs is the main
-- [[Wikipedia:Miscellany for deletion]] page itself
function p.mfd(frame)
local month = frame.args.month
local content = mw.title.new("Wikipedia:Miscellany for deletion"):getContent()
local rightmonth = true
local pat;
if month ~= "total" then
pat = lang:formatDate("^=== ?F [0-9]*, Y ?===$", month)
rightmonth = false
end
local _, endindex = content:find("==Old business==")
local count = 0
for line in mw.text.gsplit(content:sub(endindex,#content), "\n") do
if line:find("{{Wikipedia:Miscellany for deletion/") and rightmonth then
count = count + 1
elseif month == "total" then
-- don't worry about month section headers
elseif line:find(pat) then
rightmonth = true
elseif line:find("=== ?.* ?===") then
-- A section header for the wrong month
if rightmonth then
-- We're now looking at MfDs before the month in question
break
end
-- We still haven't reached the month in question yet
end
end
return count
end
-- RfD is even worse, since I have to manually parse all log pages
-- and "Old" discussions aren't displayed separately from "Current" ones
-- and "Old" discussions aren't displayed separately from "Current" ones
function p.rfd(frame)
function p.rfd(frame)
local month = frame.args.month
local month = frame.args.month
local content = mw.title.new("Wikipedia:Redirects for discussion"):getContent()
local rfd = "Wikipedia:Redirects for discussion"
-- First find the daily pages
local logprefix = "Wikipedia:Redirects for discussion/Log/"
-- threshold is 7 days ago
local threshold = os.date("%F",os.time() - (86400*7))
local ymd = require("Module:YMD to ISO")._main
local ymd = require("Module:YMD to ISO")._main
local lang = mw.getContentLanguage()
local lang = mw.getContentLanguage()
local threshold = os.date("%F",os.time() - (86400*7))
-- Find the daily pages
local content = mw.title.new(rfd):getContent()
local dayPattern = "{{" .. logprefix .. "(.-)}}";
local total = 0
local total = 0
for line in content:gmatch("{{Wikipedia:Redirects for discussion/Log/.-}}") do
local lastTitle
local datestamp = ymd(line:match("{{Wikipedia:Redirects for discussion/Log/(.-)}}"))
for day in content:gmatch(dayPattern) do
local datestamp = ymd(day)
if datestamp >= threshold then
if datestamp >= threshold then
-- These dicussions aren't seven days old yet
-- These discussions aren't seven days old yet
elseif month == "total" or month == lang:formatDate("F Y", datestamp) then
elseif month == "total" or month == lang:formatDate("F Y", datestamp) then
local dayContent = mw.title.new(line:match("{{(.*)}}")):getContent()
local dayTitle = logprefix .. day;
-- unreliable but performance is important
local dayContent = mw.title.new(dayTitle):getContent()
local _, sectionHeads = dayContent:gsub("==== ?[^\n]- ?====", "")
-- Match only title sections starting with lists or templates
local _, closeBoxes = dayContent:gsub("boilerplate rfd vfd xfd%-closed", "")
local titlePattern = "==== ?([^\n]-) ?====%s+[%*#{]";
local _, relisted = dayContent:gsub("%[%[File:Symbol move vote.svg|16px|link=|alt=%]%] '''Relisted'''", "")
for title in dayContent:gmatch(titlePattern) do
total = total + (sectionHeads - closeBoxes - relisted)
total = total + 1
-- else discussion is wrong month
lastTitle = title
end
end
end
 
if month == "total" then
if total > 0 then
return "[[" .. rfd .. "#" .. lastTitle .. "|" .. total .. "]]"
else
return "[[" .. rfd .. "|0]]"
end
end
else
return total
end
end
return total
end
end
return p
return p
Retrieved from "https://enwiki.freddythechick.net/wiki/Special:ComparePages"