Module:Lang/documentor tool/testcases

විකිපීඩියා වෙතින්
-- Unit tests for [[Module:Lang/documentor tool]]. Click talk page to run tests.
local p = require('Module:UnitTests')


function p:test_01_non_english_language_text_category_valid()
	self:preprocess_equals_preprocess_many('{{#invoke:Lang/documentor_tool/sandbox|non_english_language_text_category|', '}}', '{{#invoke:Lang/documentor_tool|non_english_language_text_category|', '}}',
		{
			{'test=Category:Articles containing German-language text'},
			{'test=Category:Articles with text in Berber languages'},
			{'test=Category:Articles containing explicitly cited English-language text'},
		}, {stripmarker=true})
end


function p:test_02_non_english_language_text_category_optional_parameters()
	self:preprocess_equals_preprocess_many('{{#invoke:Lang/documentor_tool/sandbox|non_english_language_text_category|', '}}', '{{#invoke:Lang/documentor_tool|non_english_language_text_category|', '}}',
		{
			{'test=Category:Articles containing German-language text|script=Ogham'},
			{'test=Category:Articles containing German-language text|example=test example text'},
			{'test=Category:Articles containing German-language text|script=Ogham|example=test example text'},
		}, {stripmarker=true})
end


function p:test_03_non_english_language_text_category_errors()
	self:preprocess_equals_preprocess_many('{{#invoke:Lang/documentor_tool/sandbox|non_english_language_text_category|nocat=yes|', '}}', '{{#invoke:Lang/documentor_tool|non_english_language_text_category|nocat=yes|', '}}',
		{
			{'test=Category:Articles with text in Artificial languages'},
			{'test=Category:Articles with text from the South Slavic languages collective'},
		}, {stripmarker=true})
end


function p:test_04_non_english_language_sources_category_valid()
	self:preprocess_equals_preprocess_many('{{#invoke:Lang/documentor_tool/sandbox|non_english_language_sources_category|', '}}', '{{#invoke:Lang/documentor_tool|non_english_language_sources_category|', '}}',
		{
			{'test=Category:Articles with German-language sources (de)'},
			{'test=Category:Articles with Berber languages-collective sources (ber)'},
		}, {stripmarker=true})
end


function p:test_05_non_english_language_sources_category_errors()
	self:preprocess_equals_preprocess_many('{{#invoke:Lang/documentor_tool/sandbox|non_english_language_sources_category|nocat=yes|', '}}', '{{#invoke:Lang/documentor_tool|non_english_language_sources_category|nocat=yes|', '}}',
		{
			{'test=Category:Articles with German-language sources (gem)'},
			{'test=Category:Articles with Germanic languages-collective sources (zzzz)'},
		}, {stripmarker=true})
end

return p
"https://si.wikipedia.org/w/index.php?title=Module:Lang/documentor_tool/testcases&oldid=583584" වෙතින් සම්ප්‍රවේශනය කෙරිණි