Difference between revisions of "Module:TaxonItalics/testcases"
Jump to navigation
Jump to search
blackwiki>Tom.Reding m (Append \n to log) |
blackwiki>Erutuon (update) |
||
| Line 4: | Line 4: | ||
local orig = input | local orig = input | ||
local result = input:gsub("''( ?)(.-)( ?)''", "%1''%2''%3") | local result = input:gsub("''( ?)(.-)( ?)''", "%1''%2''%3") | ||
| + | result = mw.text.decode(result) | ||
if orig ~= result then | if orig ~= result then | ||
mw.log(orig, result, "\n") | mw.log(orig, result, "\n") | ||
| Line 13: | Line 14: | ||
local examples = { | local examples = { | ||
"Below genus", | "Below genus", | ||
| − | { "Pinus subg. Pinus", "''Pinus | + | { "Pinus subg. Pinus", "''Pinus <span style=\"font-style:normal;\">subg.</span> Pinus''" }, |
| − | { "Pinus subgenus Pinus", "''Pinus | + | { "Pinus subgenus Pinus", "''Pinus <span style=\"font-style:normal;\">subg.</span> Pinus''" }, |
| − | { "P. subg. Pinus", "''P. | + | { "P. subg. Pinus", "''P. <span style=\"font-style:normal;\">subg.</span> Pinus''" }, |
| − | { "Pinus sect. Pinus", "''Pinus | + | { "Pinus sect. Pinus", "''Pinus <span style=\"font-style:normal;\">sect.</span> Pinus''" }, |
| − | { "Pinus section Pinus", "''Pinus | + | { "Pinus section Pinus", "''Pinus <span style=\"font-style:normal;\">sect.</span> Pinus''" }, |
| − | { "P. sect. Pinus", "''P. | + | { "P. sect. Pinus", "''P. <span style=\"font-style:normal;\">sect.</span> Pinus''" }, |
| − | { "Pinus subsect. Pinus", "''Pinus | + | { "Pinus subsect. Pinus", "''Pinus <span style=\"font-style:normal;\">subsect.</span> Pinus''" }, |
| − | { "P. subsect. Pinus", "''P. | + | { "P. subsect. Pinus", "''P. <span style=\"font-style:normal;\">subsect.</span> Pinus''" }, |
| − | { "Quercus series Virentes", "''Quercus | + | { "Quercus series Virentes", "''Quercus <span style=\"font-style:normal;\">ser.</span> Virentes''" }, |
| − | { "Banksia subser. Banksia", "''Banksia | + | { "Banksia subser. Banksia", "''Banksia <span style=\"font-style:normal;\">subser.</span> Banksia''" }, |
| − | { "Banksia subseries Banksia", "''Banksia | + | { "Banksia subseries Banksia", "''Banksia <span style=\"font-style:normal;\">subser.</span> Banksia''" }, |
"Below species", | "Below species", | ||
| − | { "Acer tataricum subsp. ginnala", "''Acer tataricum | + | { "Acer tataricum subsp. ginnala", "''Acer tataricum <span style=\"font-style:normal;\">subsp.</span> ginnala''" }, |
| − | { "Aster ericoides var. ericoides", "''Aster ericoides | + | { "Aster ericoides var. ericoides", "''Aster ericoides <span style=\"font-style:normal;\">var.</span> ericoides''" }, |
| − | { "A. ericoides varietas ericoides", "''A. ericoides | + | { "A. ericoides varietas ericoides", "''A. ericoides <span style=\"font-style:normal;\">var.</span> ericoides''" }, |
| − | { "A. e. subvar. ericoides", "''A. e. | + | { "A. e. subvar. ericoides", "''A. e. <span style=\"font-style:normal;\">subvar.</span> ericoides''" }, |
"Hybrid symbol", | "Hybrid symbol", | ||
{ | { | ||
| Line 69: | Line 70: | ||
self:iterate(examples, | self:iterate(examples, | ||
function (self, input, expected) | function (self, input, expected) | ||
| − | + | output = clean(italicizeTaxonName(input)) | |
| + | |||
| + | --[[ | ||
| + | if output ~= expected then | ||
| + | mw.log(expected, output) | ||
| + | end | ||
| + | --]] | ||
| + | |||
| + | self:equals(input, output, expected) | ||
end) | end) | ||
end | end | ||
return p | return p | ||
Revision as of 20:33, 24 August 2018
Documentation for this module may be created at Module:TaxonItalics/testcases/doc
local p = require('Module:UnitTests')
local function clean(input)
local orig = input
local result = input:gsub("''( ?)(.-)( ?)''", "%1''%2''%3")
result = mw.text.decode(result)
if orig ~= result then
mw.log(orig, result, "\n")
end
return result
end
function p:test_italicizeTaxonName()
local examples = {
"Below genus",
{ "Pinus subg. Pinus", "''Pinus <span style=\"font-style:normal;\">subg.</span> Pinus''" },
{ "Pinus subgenus Pinus", "''Pinus <span style=\"font-style:normal;\">subg.</span> Pinus''" },
{ "P. subg. Pinus", "''P. <span style=\"font-style:normal;\">subg.</span> Pinus''" },
{ "Pinus sect. Pinus", "''Pinus <span style=\"font-style:normal;\">sect.</span> Pinus''" },
{ "Pinus section Pinus", "''Pinus <span style=\"font-style:normal;\">sect.</span> Pinus''" },
{ "P. sect. Pinus", "''P. <span style=\"font-style:normal;\">sect.</span> Pinus''" },
{ "Pinus subsect. Pinus", "''Pinus <span style=\"font-style:normal;\">subsect.</span> Pinus''" },
{ "P. subsect. Pinus", "''P. <span style=\"font-style:normal;\">subsect.</span> Pinus''" },
{ "Quercus series Virentes", "''Quercus <span style=\"font-style:normal;\">ser.</span> Virentes''" },
{ "Banksia subser. Banksia", "''Banksia <span style=\"font-style:normal;\">subser.</span> Banksia''" },
{ "Banksia subseries Banksia", "''Banksia <span style=\"font-style:normal;\">subser.</span> Banksia''" },
"Below species",
{ "Acer tataricum subsp. ginnala", "''Acer tataricum <span style=\"font-style:normal;\">subsp.</span> ginnala''" },
{ "Aster ericoides var. ericoides", "''Aster ericoides <span style=\"font-style:normal;\">var.</span> ericoides''" },
{ "A. ericoides varietas ericoides", "''A. ericoides <span style=\"font-style:normal;\">var.</span> ericoides''" },
{ "A. e. subvar. ericoides", "''A. e. <span style=\"font-style:normal;\">subvar.</span> ericoides''" },
"Hybrid symbol",
{
"Fragaria × ananassa",
[[''Fragaria <span style="font-style:normal;">×</span> ananassa'']]
},
{
"Fragaria × ananassa",
[[''Fragaria <span style="font-style:normal;">×</span> ananassa'']]
},
{
"Fragaria × ananassa",
[[''Fragaria <span style="font-style:normal;">×</span> ananassa'']]
},
{
"× Sorbopyrus",
[[''<span style="font-style:normal;">×</span> Sorbopyrus'']]
},
{
"× Sorbopyrus auricularis",
[[''<span style="font-style:normal;">×</span> Sorbopyrus auricularis'']]
},
"Already italicized",
{ "''Pinus'' subsp. ''Pinus''", "''Pinus'' subsp. ''Pinus''" },
{ "''Pinus sylvestris''", "''Pinus sylvestris''" },
{ "<i>Pinus</i> subsp. <i>Pinus</i>", "''Pinus'' subsp. ''Pinus''" },
{ "<i>Pinus sylvestris</i>", "''Pinus sylvestris''" },
"Easy examples",
{ "Pinus", "''Pinus''" },
{ "Pinus sylvestris", "''Pinus sylvestris''" },
"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)
output = clean(italicizeTaxonName(input))
--[[
if output ~= expected then
mw.log(expected, output)
end
--]]
self:equals(input, output, expected)
end)
end
return p