Module:Library citation - Revision history

Forte: Removed more useless functions. Not even sure why they were there.

2025-09-19T03:35:12Z

Removed more useless functions. Not even sure why they were there.

← Older revision		Revision as of 03:35, 19 September 2025
Line 2:		Line 2:

	require("Module:Auxiliary functions")		require("Module:Auxiliary functions")

	~~local function removeApostrophes(str)~~
	~~return str:gsub("[\"'%`]", "")~~
	~~end~~

	~~local function compareStrings(a,b)~~
	~~local stringA = removeApostrophes(a):lower()~~
	~~local stringB = removeApostrophes(b):lower()~~
	~~return stringA < stringB~~
	~~end~~

	function getDataFromTitle(title)		function getDataFromTitle(title)

Forte: removed useless function

2025-09-19T03:34:25Z

removed useless function

← Older revision		Revision as of 03:34, 19 September 2025
Line 2:		Line 2:

	require("Module:Auxiliary functions")		require("Module:Auxiliary functions")

	~~local function checkset(var)~~
	~~local rtn = nil~~
	~~if not (var == nil or var == '') then~~
	~~rtn = var~~
	~~end~~
	~~return rtn~~
	~~end~~

	local function removeApostrophes(str)		local function removeApostrophes(str)

Forte: Added case when there's no year

2025-09-19T03:33:50Z

Added case when there's no year

← Older revision		Revision as of 03:33, 19 September 2025
Line 10:		Line 10:
	return rtn		return rtn
	end		end

	~~-- local function is_set(var)~~
	~~-- return not (var == nil or var == '')~~
	~~-- end~~

	local function removeApostrophes(str)		local function removeApostrophes(str)
Line 72:		Line 68:
	local parentFrame = frame:getParent()		local parentFrame = frame:getParent()
	-- get arguments from "args" table pre-defined by MediaWiki/Scribunto		-- get arguments from "args" table pre-defined by MediaWiki/Scribunto
	local link = ~~checkset(~~parentFrame.args.link)		local link = parentFrame.args.link
	local author = nil		local author = nil
	local quote = ~~checkset(~~parentFrame.args.quote)		local quote = parentFrame.args.quote
	if is_set(link) then		if is_set(link) then
	title,author,year,source = getDataFromLink(link)		title,author,year,source = getDataFromLink(link)
Line 83:		Line 79:
	if is_set(author) then		if is_set(author) then
	render = render .. wikilinkFromAuthor(author)		render = render .. wikilinkFromAuthor(author)
			if not is_set(year) then
			render = render .. "."
			end
	end		end
	if is_set(year) then		if is_set(year) then

Forte: using decode directly

2025-09-19T03:09:36Z

using decode directly

← Older revision		Revision as of 03:09, 19 September 2025
Line 23:		Line 23:
	local stringB = removeApostrophes(b):lower()		local stringB = removeApostrophes(b):lower()
	return stringA < stringB		return stringA < stringB
	~~end~~

	~~local function urlencode(str)~~
	~~if str then~~
	~~return mw.uri.encode(str)~~
	~~else~~
	~~return ""~~
	~~end~~
	end		end

Line 45:		Line 37:
	function getDataFromLink(link)		function getDataFromLink(link)
	-- In case it's in URL format		-- In case it's in URL format
	local str = link		local str = mw.uri.decode(link)
	local result = str:match("https?://[^/]+/wiki/(.*)")		local result = str:match("https?://[^/]+/wiki/(.*)")
	if result then		if result then

Forte: Reverted edit, I inadvertently broke all citations lol

2025-09-19T03:07:58Z

Reverted edit, I inadvertently broke all citations lol

← Older revision		Revision as of 03:07, 19 September 2025
Line 45:		Line 45:
	function getDataFromLink(link)		function getDataFromLink(link)
	-- In case it's in URL format		-- In case it's in URL format
	local str = ~~urlencode(~~link)		local str = link
	local result = str:match("https?://[^/]+/wiki/(.*)")		local result = str:match("https?://[^/]+/wiki/(.*)")
	if result then		if result then

Forte: removing unused function + added function for url encoding, trying an implementation

2025-09-19T03:05:30Z

removing unused function + added function for url encoding, trying an implementation

← Older revision		Revision as of 03:05, 19 September 2025
Line 25:		Line 25:
	end		end

	function ~~listOfWorks(author)~~		local function urlencode(str)
	~~local newMethod = mw.getCurrentFrame():callParserFunction("#dpl","namespace=Library","titleregexp=" .. author .. "/[^/]+$","format=,%TITLE%\\n")~~		if str then
	~~local catMethod = mw.getCurrentFrame~~(~~):callParserFunction("#dpl","namespace=Library","category=Library works by " .. author ,"format=,%TITLE%\\n"~~)		return mw.uri.encode(str)
	~~local list = ""~~		else
	~~-- Picks whatever method of recovering pages has the higher count, usually categories~~		return ""
	if ~~string.len(newMethod) > string.len(catMethod)~~ then		end
	~~list = newMethod~~
	~~else~~
	~~list = catMethod~~
	~~end~~
	~~titleTable = mw.text.split(string.gsub(~~mw.~~text~~.~~trim~~(~~list),author .. "/",""),"\n"~~)
	~~linkTable=mw.text.split(mw.text.trim(list),"\n")~~
	~~for i,v in ipairs(linkTable) do~~
	~~linkTable[i] =~~ "~~Library:~~" ~~.. v~~
	end
	~~table.sort(linkTable,compareStrings)~~
	~~table.sort(titleTable,compareStrings)~~
	~~return {links=linkTable,titles=titleTable}~~
	end		end

Line 57:		Line 45:
	function getDataFromLink(link)		function getDataFromLink(link)
	-- In case it's in URL format		-- In case it's in URL format
	local str = link		local str = urlencode(link)
	local result = str:match("https?://[^/]+/wiki/(.*)")		local result = str:match("https?://[^/]+/wiki/(.*)")
	if result then		if result then
Line 123:		Line 111:
	render = italics(tostring(div)) .. tostring(br) .. render		render = italics(tostring(div)) .. tostring(br) .. render
	end		end
	~~-- error("error message") to send error messages~~
	return render		return render
	end		end

	return p		return p

CriticalResist: reverting, will need to look at this differently

2025-07-13T15:16:26Z

reverting, will need to look at this differently

Show changes

CriticalResist: test fix 2

2025-07-13T15:14:03Z

test fix 2

← Older revision		Revision as of 15:14, 13 July 2025
Line 11:		Line 11:
	end		end

	-- local function is_set(var)		local function is_set(var)
	-- return not (var == nil or var == '')		return not (var == nil or var == '')
	-- end		end

	local function removeApostrophes(str)		local function removeApostrophes(str)
Line 61:		Line 61:
	end		end
	str = str:gsub("^Library:", "")		str = str:gsub("^Library:", "")
	~~str = str:gsub(" ", "_") -- Ensure underscores for page names~~

	return getDataFromTitle(str), ~~str~~		-- Extract chapter from fragment identifier
			local base, chapter = str:match("^([^#])#?(.)$")
			base = base:gsub("_", " ") -- Convert underscores to spaces for display

			return getDataFromTitle(str), base, chapter
	end		end

	local function wikilinkFromAuthor(author)		local function wikilinkFromAuthor(author)
	if mw.getCurrentFrame():callParserFunction('#ifexist',author,true) == "1" then		if mw.getCurrentFrame():callParserFunction('#ifexist', author, true) == "1" then
	return "[[" .. author .. "]]"		return "[[" .. author .. "]]"
	end		end
Line 77:		Line 80:
	local link = checkset(parentFrame.args.link)		local link = checkset(parentFrame.args.link)
	local author = nil		local author = nil
			local title = nil
			local year = nil
			local source = nil
			local pageName = nil
			local chapter = nil
	local quote = checkset(parentFrame.args.quote)		local quote = checkset(parentFrame.args.quote)
	~~local pageName = nil~~
	~~local source = nil~~

	if is_set(link) then		if is_set(link) then
	title, author, year, source, ~~pageName~~ = getDataFromLink(link)		title, author, year, source, base, chapter = getDataFromLink(link)
	end		end

	local render = ""		local render = ""

			-- Format author
	if is_set(author) then		if is_set(author) then
	render = render .. wikilinkFromAuthor(author)		render = render .. wikilinkFromAuthor(author)
	end		end

			-- Format year in parentheses if available
	if is_set(year) then		if is_set(year) then
	render = render .. " (" .. year .. ")."		render = render .. " (" .. year .. ")"
	end		end

			-- Format title with chapter
	if is_set(title) and is_set(pageName) then		if is_set(title) and is_set(pageName) then
	render = render .. " ~~''[[~~Library:" .. pageName .. "\|" .. ~~title~~ .. "]]~~''.~~"		-- Add period after author/year section
			if render ~= "" then
			render = render .. ". "
			end

			-- Create Library link
			local displayTitle = pageName
			local linkTarget = "Library:" .. pageName:gsub(" ", "_")

			-- Add chapter if present
			if is_set(chapter) then
			-- Replace underscores with spaces in chapter name
			chapter = chapter:gsub("_", " ")
			displayTitle = displayTitle .. ", " .. chapter
			linkTarget = linkTarget .. "#" .. chapter:gsub(" ", "_")
			end

			render = render .. "[[" .. linkTarget .. "\|" .. displayTitle .. "]]"
	end		end
	if is_set (quote) then
	quote = string.gsub(quote,"\n","<br>")		-- Handle quotes
			if is_set(quote) then
			quote = string.gsub(quote, "\n", "<br>")
	quote = "“" .. quote .. "”"		quote = "“" .. quote .. "”"
	local div = mw.html.create ('div')		local div = mw.html.create('div')
	div		div:attr("style", "width:80%; margin-left:10%;")
	:attr("style", "width:80%; margin-left:10%;")		:wikitext(quote)
	:wikitext(quote)		render = italics(tostring(div)) .. "<br>" .. render
	~~local br = mw.html.create ('br', selfClosing~~)
	render = italics(tostring(div)) .. ~~tostring(~~br) .. render
	end		end

	-- ~~Store~~ source in hidden ~~metadata~~		-- Preserve source in hidden element
	if is_set(source) then		if is_set(source) then
	render = render .. '<span style="display:none">Source: ' .. source .. '</span>'		render = render .. '<span style="display:none">Source: ' .. source .. '</span>'

CriticalResist: attempting to fix link to library page. It will also hide source link, can always be changed.

2025-07-13T14:55:25Z

attempting to fix link to library page. It will also hide source link, can always be changed.

Show changes

Forte: Soft-coding "year" variable in case of trouble

2024-10-08T11:43:29Z

Soft-coding "year" variable in case of trouble

← Older revision		Revision as of 11:43, 8 October 2024
Line 48:		Line 48:
	local rawString = mw.getCurrentFrame():callParserFunction("#dpl","namespace=Library","title=" .. title,"mode=userformat","include={Library work}:title:author:published_date:source")		local rawString = mw.getCurrentFrame():callParserFunction("#dpl","namespace=Library","title=" .. title,"mode=userformat","include={Library work}:title:author:published_date:source")
	local title,author,published_date,source = rawString:match("^(.-)%s\|(.-)%s\|(.-)%s\|(.-)$")		local title,author,published_date,source = rawString:match("^(.-)%s\|(.-)%s\|(.-)%s\|(.-)$")
	local year = published_date:match("%d%d%d%d")		local year = ""
			if is_set(published_date) then
			year = published_date:match("%d%d%d%d")
			end
	return title,author,year,source		return title,author,year,source
	end		end