Module:Gutenberg/sandbox - Revision history

Zyxw: add "Edit At Wikidata" link if using ID from Wikidata

2022-04-01T08:38:16Z

add "Edit At Wikidata" link if using ID from Wikidata

← Previous revision		Revision as of 08:38, 1 April 2022
Line 22:		Line 22:
	if bestP1938 and bestP1938.mainsnak.snaktype == 'value' then		if bestP1938 and bestP1938.mainsnak.snaktype == 'value' then
	id = bestP1938.mainsnak.datavalue.value		id = bestP1938.mainsnak.datavalue.value
			local entity = mw.wikibase.getEntityObject() or {}
			tagline = tagline .. " [[File:OOjs UI icon edit-ltr-progressive.svg \|frameless \|text-top \|10px \|alt=Edit this at Wikidata \|link=https://www.wikidata.org/wiki/" .. entity.id .. "#P1938\|Edit this at Wikidata]]"
	else		else
	error("Parameter id is missing. See [[Template:" .. tname .. "]] documentation")		error("Parameter id is missing. See [[Template:" .. tname .. "]] documentation")

Uzume: simplify

2021-08-11T21:00:12Z

simplify

← Previous revision		Revision as of 21:00, 11 August 2021
Line 19:		Line 19:
	id = trimArg(args[1]) or trimArg(args.id)		id = trimArg(args[1]) or trimArg(args.id)
	if not id then		if not id then
	local ~~claimsP1938~~ = mw.wikibase.getBestStatements(mw.wikibase.getEntityIdForCurrentPage(), 'P1938')		local bestP1938 = mw.wikibase.getBestStatements(mw.wikibase.getEntityIdForCurrentPage(), 'P1938')[1]
	if ~~claimsP1938[1]~~ and ~~claimsP1938[1]~~.mainsnak.snaktype == 'value' then		if bestP1938 and bestP1938.mainsnak.snaktype == 'value' then
	id = ~~claimsP1938[1]~~.mainsnak.datavalue.value		id = bestP1938.mainsnak.datavalue.value
	else		else
	error("Parameter id is missing. See [[Template:" .. tname .. "]] documentation")		error("Parameter id is missing. See [[Template:" .. tname .. "]] documentation")

Uzume: fix snak access

2021-08-11T20:46:48Z

fix snak access

← Previous revision		Revision as of 20:46, 11 August 2021
Line 20:		Line 20:
	if not id then		if not id then
	local claimsP1938 = mw.wikibase.getBestStatements(mw.wikibase.getEntityIdForCurrentPage(), 'P1938')		local claimsP1938 = mw.wikibase.getBestStatements(mw.wikibase.getEntityIdForCurrentPage(), 'P1938')
	if claimsP1938[0] and claimsP1938[0].mainsnak.~~datavalue.~~value then		if claimsP1938[1] and claimsP1938[1].mainsnak.snaktype == 'value' then
	id = claimsP1938[0].mainsnak.datavalue.value		id = claimsP1938[1].mainsnak.datavalue.value
	else		else
	error("Parameter id is missing. See [[Template:" .. tname .. "]] documentation")		error("Parameter id is missing. See [[Template:" .. tname .. "]] documentation")

Uzume: default to d:Special:EntityPage/P1938

2021-08-11T20:26:22Z

default to d:Special:EntityPage/P1938

← Previous revision		Revision as of 20:26, 11 August 2021
Line 19:		Line 19:
	id = trimArg(args[1]) or trimArg(args.id)		id = trimArg(args[1]) or trimArg(args.id)
	if not id then		if not id then
			local claimsP1938 = mw.wikibase.getBestStatements(mw.wikibase.getEntityIdForCurrentPage(), 'P1938')
⚫	error("Parameter id is missing. See [[Template:" .. tname .. "]] documentation")
			if claimsP1938[0] and claimsP1938[0].mainsnak.datavalue.value then
⚫	else
			id = claimsP1938[0].mainsnak.datavalue.value
⚫	if tonumber(id) then -- it's a number
⚫	urlhead = urlheadnumb
	else		else
		⚫	error("Parameter id is missing. See [[Template:" .. tname .. "]] documentation")
⚫	urlhead = urlheadname
⚫	id = mw.ustring.gsub(id," ", "+")
	end		end
	end		end
		⚫	if tonumber(id) then -- it's a number
		⚫	urlhead = urlheadnumb
		⚫	else
		⚫	urlhead = urlheadname
		⚫	id = mw.ustring.gsub(id," ", "+")
			end

	-- Argument \|name=		-- Argument \|name=
Line 107:		Line 111:
	local author = nil -- flag if an author (default: no)		local author = nil -- flag if an author (default: no)
	local url = nil		local url = nil
	local urlhead = "~~http~~://fadedpage.com/"		local urlhead = "https://fadedpage.com/"
	local urlbook = "showbook.php?pid="		local urlbook = "showbook.php?pid="
	local urlauth = "csearch.php?author="		local urlauth = "csearch.php?author="

GreenC: refresh sandbox

2017-01-31T04:02:06Z

refresh sandbox

← Previous revision		Revision as of 04:02, 31 January 2017
Line 12:		Line 12:
	local url = nil		local url = nil
	local tagline = "at [[Project Gutenberg]]"		local tagline = "at [[Project Gutenberg]]"
	local urlheadname = "~~http~~://www.gutenberg.org/author/" ~~-- SSL problems with certain browsers. See [[Template_talk:Gutenberg_author#https_problem]]~~		local urlheadname = "https://www.gutenberg.org/author/"
	local urlheadnumb = "~~http~~://www.gutenberg.org/ebooks/author/"		local urlheadnumb = "https://www.gutenberg.org/ebooks/author/"
	local urlhead = nil		local urlhead = nil

EncyclopediaUpdaticus: final version

2017-01-30T15:12:55Z

final version

← Previous revision		Revision as of 15:12, 30 January 2017
Line 102:		Line 102:
	local tname = "FadedPage" -- name of calling template. Change if template is renamed.		local tname = "FadedPage" -- name of calling template. Change if template is renamed.

	local id = nil -- ID. eg. http://~~gutenberg~~.~~net.au~~/~~plusfifty-n-z~~.~~html#shanks~~ .. the ID = ~~plusfifty-n-z.html#shanks~~		local id = nil -- ID for author, eg. http://fadedpage.com/csearch.php?author=Shortt%2C%20Adam .. the id = Shortt, Adam
	-- ID ~~is the same~~ for ~~linking an individual~~ book ~~title~~, or ~~all~~ ~~books by~~ the ~~author.~~		-- ID for book titles, eg. http://fadedpage.com/showbook.php?pid=20160704 .. the id = 20160704
	local name = nil -- display name on Wikipedia (default: article title)		local name = nil -- display name on Wikipedia (default: article title)
	local author = nil -- flag if an author (default: no)		local author = nil -- flag if an author (default: no)
Line 130:		Line 130:
	if author then		if author then
	if mw.ustring.lower(author) == "yes" then		if mw.ustring.lower(author) == "yes" then
	id = mw.uri.encode( id, "PATH" )		id = mw.uri.encode( id, "PATH" ) -- handle spaces within id argument string
	prefix = "Works by "		prefix = "Works by "
	italic = ""		italic = ""
Line 142:		Line 142:
	return url		return url

	end

	function urlencode(str)
	if (str) then
	str = string.gsub (str, "\n", "\r\n")
	str = string.gsub (str, "([^%w ])",
	function (c) return string.format ("%%%02X", string.byte(c)) end)
	str = string.gsub (str, " ", " ")
	end
	return str
	end		end

EncyclopediaUpdaticus at 14:37, 30 January 2017

2017-01-30T14:37:27Z

← Previous revision		Revision as of 14:37, 30 January 2017
Line 130:		Line 130:
	if author then		if author then
	if mw.ustring.lower(author) == "yes" then		if mw.ustring.lower(author) == "yes" then
	--id = ~~urlencode~~(id)		id = mw.uri.encode( id, "PATH" )
	prefix = "Works by "		prefix = "Works by "
	italic = ""		italic = ""

EncyclopediaUpdaticus at 16:36, 29 January 2017

2017-01-29T16:36:14Z

← Previous revision		Revision as of 16:36, 29 January 2017
Line 111:		Line 111:
	local urlauth = "csearch.php?author="		local urlauth = "csearch.php?author="
	local prefix = ""		local prefix = ""
	local tagline = "at [[Distributed Proofreaders Canada\|Faded Page]]"		local tagline = "at [[Distributed Proofreaders Canada\|Faded Page]] (Canada)"
	local italic = "''"		local italic = "''"

EncyclopediaUpdaticus at 16:28, 29 January 2017

2017-01-29T16:28:08Z

← Previous revision		Revision as of 16:28, 29 January 2017
Line 108:		Line 108:
	local url = nil		local url = nil
	local urlhead = "http://fadedpage.com/"		local urlhead = "http://fadedpage.com/"
			local urlbook = "showbook.php?pid="
			local urlauth = "csearch.php?author="
	local prefix = ""		local prefix = ""
	local tagline = "at [[Distributed Proofreaders Canada\|Faded Page]]"		local tagline = "at [[Distributed Proofreaders Canada\|Faded Page]]"
Line 131:		Line 133:
	prefix = "Works by "		prefix = "Works by "
	italic = ""		italic = ""
		⚫	url = "[" .. urlhead .. urlauth .. id .. " " .. prefix .. italic .. name .. italic .. "] " .. tagline
			return url
	end		end
	end		end

			url = "[" .. urlhead .. urlbook .. id .. " " .. prefix .. italic .. name .. italic .. "] " .. tagline
	-- Argument \|coda=
	if trimArg(args.coda) then
	tagline = tagline .. " " .. trimArg(args.coda)
	end

⚫	url = "[" .. urlhead .. id .. " " .. prefix .. italic .. name .. italic .. "] " .. tagline

	return url		return url

EncyclopediaUpdaticus at 18:03, 28 January 2017

2017-01-28T18:03:40Z

← Previous revision		Revision as of 18:03, 28 January 2017
Line 128:		Line 128:
	if author then		if author then
	if mw.ustring.lower(author) == "yes" then		if mw.ustring.lower(author) == "yes" then
	id = urlencode(id)		--id = urlencode(id)
	prefix = "Works by "		prefix = "Works by "
	italic = ""		italic = ""