Jump to content

Module:TaxonItalics/testcases

From Wikipedia, the free encyclopedia
This is an old revision of this page, as edited by Erutuon (talk | contribs) at 07:03, 18 August 2018 (Created page with 'local p = require('Module:UnitTests') function p:test_italicizeTaxonName() local examples = { { "Pinus subg. Pinus", "''Pinus'' subg. ''Pinus''" }, { "Pinu...'). The present address (URL) is a permanent link to this revision, which may differ significantly from the current revision.
(diff) ← Previous revision | Latest revision (diff) | Newer revision → (diff)
local p = require('Module:UnitTests')

function p:test_italicizeTaxonName()
	local examples = {
		{ "Pinus subg. Pinus", "''Pinus'' subg. ''Pinus''" },
		{ "Pinus subgenus Pinus", "''Pinus'' subg. ''Pinus''" },
		{ "P. subg. Pinus", "''P.'' subg. ''Pinus''" },
		{ "Pinus sect. Pinus", "''Pinus'' sect. ''Pinus''" },
		{ "Pinus section Pinus", "''Pinus'' sect. ''Pinus''" },
		{ "P. sect. Pinus", "''P.'' sect. ''Pinus''" },
		{ "Acer tataricum subsp. ginnala", "''Acer tataricum'' subsp. ''ginnala''" },
		{ "Aster ericoides var. ericoides", "''Aster ericoides'' var. ''ericoides''" },
		{ "A. ericoides varietas ericoides", "''A. ericoides'' var. ''ericoides''" },
		{ "A. e. subvar. ericoides", "''A. e.'' subvar. ''ericoides''" },
		"Incorrect strings",
		{
			"Fragaria vesca subsp. vesca f. semperflorens",
			"Fragaria vesca subsp. vesca f. semperflorens"
		},
	}
	
	local italicizeTaxonName = require "MOdule:TaxonItalics".italicizeTaxonName
	
	self:iterate(examples,
		function (self, input, expected)
			self:equals(example, italicizeTaxonName(input), expected)
		end)
end

return p