Jump to content

Module:Category pair/testcases: Difference between revisions

From Wikipedia, the free encyclopedia
Content deleted Content added
got the test backward
missing colons
 
Line 10: Line 10:
function suite:test()
function suite:test()
self:assertStringContains(
self:assertStringContains(
"See also the preceding [[Category:1934 FIFA World Cup]] and the succeeding [[Category:1950 FIFA World Cup]]",
"See also the preceding [[:Category:1934 FIFA World Cup]] and the succeeding [[:Category:1950 FIFA World Cup]]",
catPair._pair(makeCat("1934 FIFA World Cup"),makeCat("1950 FIFA World Cup")),
catPair._pair(makeCat("1934 FIFA World Cup"),makeCat("1950 FIFA World Cup")),
true,"Pair exists failure")
true,"Pair exists failure")
Line 18: Line 18:
true,"Missing seealso class")
true,"Missing seealso class")
self:assertStringContains(
self:assertStringContains(
"See also the preceding [[Category:1934 FIFA World Cup]]",
"See also the preceding [[:Category:1934 FIFA World Cup]]",
catPair._pair(makeCat("1934 FIFA World Cup"),nil),
catPair._pair(makeCat("1934 FIFA World Cup"),nil),
true,"Preceding exists failure")
true,"Preceding exists failure")
self:assertStringContains(
self:assertStringContains(
"See also the succeeding [[Category:1950 FIFA World Cup]]",
"See also the succeeding [[:Category:1950 FIFA World Cup]]",
catPair._pair(nil,makeCat("1950 FIFA World Cup")),
catPair._pair(nil,makeCat("1950 FIFA World Cup")),
true,"Succeeding exists failure")
true,"Succeeding exists failure")
self:assertStringContains(
self:assertStringContains(
"See also the preceding [[Category:1934 British Empire Games]]",
"See also the preceding [[:Category:1934 British Empire Games]]",
catPair._pair(makeCat("1934 British Empire Games"),makeCat("1942 British Empire Games")),
catPair._pair(makeCat("1934 British Empire Games"),makeCat("1942 British Empire Games")),
true,"Only preceding exists failure")
true,"Only preceding exists failure")
self:assertStringContains(
self:assertStringContains(
"See also the succeeding [[Category:1954 British Empire and Commonwealth Games]]",
"See also the succeeding [[:Category:1954 British Empire and Commonwealth Games]]",
catPair._pair(makeCat("1946 British Empire Games"),makeCat("1954 British Empire and Commonwealth Games")),
catPair._pair(makeCat("1946 British Empire Games"),makeCat("1954 British Empire and Commonwealth Games")),
true,"Succeeding exists failure")
true,"Succeeding exists failure")

Latest revision as of 07:56, 17 December 2021

local catPair = require('Module:Category pair') -- the module to be tested
local ScribuntoUnit = require('Module:ScribuntoUnit')
local suite = ScribuntoUnit:new()

local function makeCat(s)
	return mw.title.new(s,"Category")
end

function suite:test()
	self:assertStringContains(
		"See also the preceding [[:Category:1934 FIFA World Cup]] and the succeeding [[:Category:1950 FIFA World Cup]]",
		catPair._pair(makeCat("1934 FIFA World Cup"),makeCat("1950 FIFA World Cup")),
		true,"Pair exists failure")
	self:assertStringContains(
		"seealso",
		catPair._pair(makeCat("1934 FIFA World Cup"),makeCat("1950 FIFA World Cup")),
		true,"Missing seealso class")
	self:assertStringContains(
		"See also the preceding [[:Category:1934 FIFA World Cup]]",
		catPair._pair(makeCat("1934 FIFA World Cup"),nil),
		true,"Preceding exists failure")
	self:assertStringContains(
		"See also the succeeding [[:Category:1950 FIFA World Cup]]",
		catPair._pair(nil,makeCat("1950 FIFA World Cup")),
		true,"Succeeding exists failure")
	self:assertStringContains(
		"See also the preceding [[:Category:1934 British Empire Games]]",
		catPair._pair(makeCat("1934 British Empire Games"),makeCat("1942 British Empire Games")),
		true,"Only preceding exists failure")
	self:assertStringContains(
		"See also the succeeding [[:Category:1954 British Empire and Commonwealth Games]]",
		catPair._pair(makeCat("1946 British Empire Games"),makeCat("1954 British Empire and Commonwealth Games")),
		true,"Succeeding exists failure")
	self:assertEquals(catPair._pair(makeCat("AD 10 FIFA World Cup"),makeCat("1AD 18 FIFA World Cup")),"",
		"Both missing failure")
end

return suite