Module:Autovirusbox/sandbox - Revision history

Artoria2e5: Multi-infra experiment, destroyed by how taxobox/core works.

2023-01-25T11:10:29Z

Multi-infra experiment, destroyed by how taxobox/core works.

← Previous revision		Revision as of 11:10, 25 January 2023
Line 40:		Line 40:
	-- set the taxobox parameters determined by this function		-- set the taxobox parameters determined by this function
	-- ------------------------------------------------------		-- ------------------------------------------------------
	local autoTaxon, autoTaxonType, ~~infraTaxon~~, ~~infraTaxonRank~~, targetTaxon, targetTaxonRank = l.paramChk(frame, taxon, parent, species, strain, serotype, virus)		local autoTaxon, autoTaxonType, infraTaxa, infraTaxaRanks, targetTaxon, targetTaxonRank = l.paramChk(frame, taxon, parent, species, strain, serotype, virus)
	-- set default taxobox name/title		-- set default taxobox name/title
	local italicsRequired = frame:expandTemplate{ title = 'Is italic taxon', args = {targetTaxonRank, virus='yes'} } == 'yes'		local italicsRequired = frame:expandTemplate{ title = 'Is italic taxon', args = {targetTaxonRank, virus='yes'} } == 'yes' and args["italic_title"] ~= "no"
	if name == '' then		if name == '' then
	if autoTaxonType == 'ERROR' then		if autoTaxonType == 'ERROR' then
Line 71:		Line 71:
	end		end
	-- embolden lowest rank		-- embolden lowest rank
			-- oops, here goes the problem
	if infraTaxon ~= '' then		if infraTaxon ~= '' then
	infraTaxon = "'''"..infraTaxon.."'''"		infraTaxon = "'''"..infraTaxon.."'''"
Line 88:		Line 89:
	-- now call Taxobox/core with all of its parameters		-- now call Taxobox/core with all of its parameters
	-- ------------------------------------------------		-- ------------------------------------------------
	local res = frame:expandTemplate{ title = 'Taxobox/core~~/sandbox~~', args =		local res = frame:expandTemplate{ title = 'Taxobox/core', args =
	{ ['edit link'] = 'e',		{ ['edit link'] = 'e',
	virus = 'yes',		virus = 'yes',
Line 147:		Line 148:
	function l.paramChk(frame, taxon, parent, species, strain, serotype, virus)		function l.paramChk(frame, taxon, parent, species, strain, serotype, virus)
	-- set target taxon and infra-taxon		-- set target taxon and infra-taxon
	local ~~infraTaxon~~ = ''		local infraTaxa = {}
	local ~~infraTaxonRank~~ = ''		local infraTaxaRanks = {}
	local targetTaxon		local targetTaxon = ''
	local targetTaxonRank		local targetTaxonRank

			-- populate infraTaxa
		⚫	if virus ~= '' then
			infraTaxa[#infraTaxa+1] = virus
			infraTaxaRanks[#infraTaxaRanks+1] = 'virus'
			end
		⚫	if serotype ~= '' then
			infraTaxa[#infraTaxa+1] = serotype
			infraTaxaRanks[#infraTaxaRanks+1] = 'serotype'
			end
	if strain ~= '' then		if strain ~= '' then
	~~infraTaxon~~ = strain		infraTaxa[#infraTaxa+1] = strain
	~~infraTaxonRank~~ = 'strain'		infraTaxaRanks[#infraTaxaRanks+1] = 'strain'
⚫	targetTaxon = ~~infraTaxon~~
	targetTaxonRank = infraTaxonRank
⚫	~~elseif~~ serotype ~= '' then
	infraTaxon = serotype
	infraTaxonRank = 'serotype'
	targetTaxon = infraTaxon
	targetTaxonRank = infraTaxonRank
⚫	~~elseif~~ virus ~= '' then
	infraTaxon = virus
	infraTaxonRank = 'virus'
	targetTaxon = infraTaxon		targetTaxon = infraTaxon
	targetTaxonRank = infraTaxonRank		targetTaxonRank = infraTaxonRank
			end
			-- populate targetTaxon using lowest
			if #infraTaxa > 1 then
		⚫	targetTaxon = infraTaxa[#infraTaxa]
			targetTaxonRank = infraTaxaRanks[#infraTaxaRanks]
	elseif species ~= '' then		elseif species ~= '' then
	targetTaxon = species		targetTaxon = species
Line 178:		Line 184:
	local autoTaxonType = 'ERROR'		local autoTaxonType = 'ERROR'
	if taxon ~= '' then		if taxon ~= '' then
	if parent..species..~~infraTaxon~~ == '' then		if parent..species..(table.concat(infraTaxa, '')) == '' then
	autoTaxon = taxon		autoTaxon = taxon
	autoTaxonType = 'TAXON'		autoTaxonType = 'TAXON'
	end		end
	elseif parent ~= '' and (species ~='' or ~~infraTaxon~~ ~= '') then		elseif parent ~= '' and (species ~='' or #infraTaxa > 1) then
	autoTaxon = parent		autoTaxon = parent
	autoTaxonType = 'PARENT'		autoTaxonType = 'PARENT'
	end		end
		⚫	return autoTaxon, autoTaxonType, infraTaxa, infraTaxaRanks, targetTaxon, targetTaxonRank
	-- check for multiple infra-taxa
	local count = 0
	if strain ~= '' then count = count + 1 end
	if serotype ~= '' then count = count + 1 end
	if virus ~= '' then count = count + 1 end
	if count > 1 then autoTaxonType = 'ERROR' end
⚫	return autoTaxon, autoTaxonType, ~~infraTaxon~~, ~~infraTaxonRank~~, targetTaxon, targetTaxonRank
	end		end

WOSlinker: use require('strict') instead of require('Module:No globals')

2022-10-21T10:06:34Z

use require('strict') instead of require('Module:No globals')

← Previous revision		Revision as of 10:06, 21 October 2022
Line 1:		Line 1:
	require('~~Module:No globals~~')		require('strict')
	local ItalicTitle = require('Module:Italic title')		local ItalicTitle = require('Module:Italic title')
	local p = {} -- functions made public		local p = {} -- functions made public

Peter coxhead: sync'd with live

2021-06-04T05:54:44Z

sync'd with live

← Previous revision		Revision as of 05:54, 4 June 2021
Line 118:		Line 118:
	type_genus = args['type_genus'] or '',		type_genus = args['type_genus'] or '',
	--type_genus_authority = args['type_genus_authority'] or '',		--type_genus_authority = args['type_genus_authority'] or '',
	type_species = args['type_species'] or '',		--type_species = args['type_species'] or '',
	--type_species_authority = args['type_species_authority'] or ''		--type_species_authority = args['type_species_authority'] or ''
	subdivision_ranks = subdivisionRanks,		subdivision_ranks = subdivisionRanks,

Peter coxhead: pass on subdivision_ref parameter

2019-11-07T16:41:31Z

pass on subdivision_ref parameter

← Previous revision		Revision as of 16:41, 7 November 2019
Line 35:		Line 35:
	local subdivision = args['subdivision'] or ''		local subdivision = args['subdivision'] or ''
	local subdivisionRanks = args['subdivision_ranks'] or ''		local subdivisionRanks = args['subdivision_ranks'] or ''
			local subdivisionRef = args['subdivision_ref'] or args['subdivision ref'] or ''

	-- ------------------------------------------------------		-- ------------------------------------------------------
	-- set the taxobox parameters determined by this function		-- set the taxobox parameters determined by this function
Line 119:		Line 121:
	--type_species_authority = args['type_species_authority'] or ''		--type_species_authority = args['type_species_authority'] or ''
	subdivision_ranks = subdivisionRanks,		subdivision_ranks = subdivisionRanks,
			subdivision_ref = subdivisionRef,
	subdivision = subdivision,		subdivision = subdivision,
	type_strain = args['type_strain'] or '',		type_strain = args['type_strain'] or '',

Peter coxhead: removed debugging code no longer needed

2019-11-07T16:39:07Z

removed debugging code no longer needed

← Previous revision		Revision as of 16:39, 7 November 2019
Line 51:		Line 51:
	end		end
	end		end
	-- name = name .. "/" .. targetTaxonRank -- debugging output
	-- the page name (title) should be italicized if it's the same as the target taxon and that is italicized		-- the page name (title) should be italicized if it's the same as the target taxon and that is italicized
	local currentPage = mw.title.getCurrentTitle()		local currentPage = mw.title.getCurrentTitle()

Peter coxhead at 21:26, 1 February 2019

2019-02-01T21:26:59Z

← Previous revision		Revision as of 21:26, 1 February 2019
Line 51:		Line 51:
	end		end
	end		end
	name = name .. "/" .. targetTaxonRank		-- name = name .. "/" .. targetTaxonRank -- debugging output
	-- the page name (title) should be italicized if it's the same as the target taxon and that is italicized		-- the page name (title) should be italicized if it's the same as the target taxon and that is italicized
	local currentPage = mw.title.getCurrentTitle()		local currentPage = mw.title.getCurrentTitle()

Peter coxhead: corrections and clarifications to comments

2019-02-01T20:49:31Z

corrections and clarifications to comments

← Previous revision		Revision as of 20:49, 1 February 2019
Line 40:		Line 40:
	local autoTaxon, autoTaxonType, infraTaxon, infraTaxonRank, targetTaxon, targetTaxonRank = l.paramChk(frame, taxon, parent, species, strain, serotype, virus)		local autoTaxon, autoTaxonType, infraTaxon, infraTaxonRank, targetTaxon, targetTaxonRank = l.paramChk(frame, taxon, parent, species, strain, serotype, virus)
	-- set default taxobox name/title		-- set default taxobox name/title
	local italicsRequired = frame:expandTemplate{ title = 'Is italic taxon', args = {targetTaxonRank, virus='yes'} }		local italicsRequired = frame:expandTemplate{ title = 'Is italic taxon', args = {targetTaxonRank, virus='yes'} } == 'yes'
	if name == '' then		if name == '' then
	if autoTaxonType == 'ERROR' then		if autoTaxonType == 'ERROR' then
Line 51:		Line 51:
	end		end
	end		end
			name = name .. "/" .. targetTaxonRank
	-- the page name (title) should be italicized if it's the same as the target taxon and that is italicized		-- the page name (title) should be italicized if it's the same as the target taxon and that is italicized
	local currentPage = mw.title.getCurrentTitle()		local currentPage = mw.title.getCurrentTitle()
Line 168:		Line 169:
	else		else
	targetTaxon = taxon		targetTaxon = taxon
	targetTaxonRank = frame:expandTemplate{ title = 'Taxon info', args = {~~taxon~~, 'rank' } }		targetTaxonRank = frame:expandTemplate{ title = 'Taxon info', args = {targetTaxon, 'rank' } }
	end		end
	-- set the autotaxon (entry into the automated taxobox system) if the		-- set the autotaxon (entry into the automated taxobox system) if the

Peter coxhead: corrected logic for italicising

2019-02-01T20:44:52Z

corrected logic for italicising

← Previous revision		Revision as of 20:44, 1 February 2019
Line 40:		Line 40:
	local autoTaxon, autoTaxonType, infraTaxon, infraTaxonRank, targetTaxon, targetTaxonRank = l.paramChk(frame, taxon, parent, species, strain, serotype, virus)		local autoTaxon, autoTaxonType, infraTaxon, infraTaxonRank, targetTaxon, targetTaxonRank = l.paramChk(frame, taxon, parent, species, strain, serotype, virus)
	-- set default taxobox name/title		-- set default taxobox name/title
			local italicsRequired = frame:expandTemplate{ title = 'Is italic taxon', args = {targetTaxonRank, virus='yes'} }
	if name == '' then		if name == '' then
	if autoTaxonType == 'ERROR' then		if autoTaxonType == 'ERROR' then
	name = '<span class="error">ERROR: parameter(s) specifying taxon are incorrect; see [[Template:Virusbox/doc#Usage\|documentation]]</span>'		name = '<span class="error">ERROR: parameter(s) specifying taxon are incorrect; see [[Template:Virusbox/doc#Usage\|documentation]]</span>'
	else		else
		⚫	name = targetTaxon
	if targetTaxon == infraTaxon then
			if italicsRequired then
⚫	name = targetTaxon
			name = "''" .. targetTaxon .. "''"
	else
	name = "''" .. targetTaxon .. "''" -- names of virus taxa at the rank of species and above are italicized
	end		end
	end		end
Line 54:		Line 54:
	local currentPage = mw.title.getCurrentTitle()		local currentPage = mw.title.getCurrentTitle()
	local pagename = currentPage.text		local pagename = currentPage.text
	if pagename == targetTaxon ~~and pagename ~= infraTaxon~~ then		if pagename == targetTaxon then
	ItalicTitle._main({})		if italicsRequired then ItalicTitle._main({}) end
	end		end
	-- is the auto-taxon name bold or linked (i.e. will it be the last row in the taxobox or not)?		-- is the auto-taxon name bold or linked (i.e. will it be the last row in the taxobox or not)?

Peter coxhead: added decision about italic title

2019-02-01T20:28:45Z

added decision about italic title

← Previous revision		Revision as of 20:28, 1 February 2019
Line 1:		Line 1:
	require('Module:No globals')		require('Module:No globals')
			local ItalicTitle = require('Module:Italic title')
	local p = {} -- functions made public		local p = {} -- functions made public
	local l = {} -- internal functions, kept separate		local l = {} -- internal functions, kept separate
Line 16:		Line 17:
	-- most are passed on unchanged		-- most are passed on unchanged
	-- ---------------------------------------------------------------------		-- ---------------------------------------------------------------------
	local pagename = args['pagename'] or '' -- used in testing and debugging
	local name = args['name'] or ''		local name = args['name'] or ''
	local taxon = args['taxon'] or ''		local taxon = args['taxon'] or ''
Line 47:		Line 47:
	name = targetTaxon		name = targetTaxon
	else		else
	name = "''" .. targetTaxon .. "''"		name = "''" .. targetTaxon .. "''" -- names of virus taxa at the rank of species and above are italicized
	end		end
	end		end
			end
			-- the page name (title) should be italicized if it's the same as the target taxon and that is italicized
			local currentPage = mw.title.getCurrentTitle()
			local pagename = currentPage.text
			if pagename == targetTaxon and pagename ~= infraTaxon then
			ItalicTitle._main({})
	end		end
	-- is the auto-taxon name bold or linked (i.e. will it be the last row in the taxobox or not)?		-- is the auto-taxon name bold or linked (i.e. will it be the last row in the taxobox or not)?

Peter coxhead at 19:54, 1 February 2019

2019-02-01T19:54:10Z

← Previous revision		Revision as of 19:54, 1 February 2019
Line 1:		Line 1:

	require('Module:No globals')		require('Module:No globals')
	local p = {} -- functions made public		local p = {} -- functions made public