Module:Infobox road/color/testcases

-- Unit tests for [[Module:Infobox road/color]]. Click talk page to run tests.
local p = require('Module:UnitTests')

function p:test_General()
    self:preprocess_equals('{{Infobox road/meta/colors|country=USA|header_type=hist}}', 'background:#704214; color:white;')
    self:preprocess_equals('{{Infobox road/meta/colors|country=USA|header_type=former}}', 'background:#AAA;')
end

function p:test_Albania()
    self:preprocess_equals('{{Infobox road/meta/colors|country=ALB}}', 'background:#00408B; color:#fff;')
    self:preprocess_equals('{{Infobox road/meta/colors|country=ALB|type=A}}', 'background:#08842C; color:#fff;')
end

function p:test_Australia()
    self:preprocess_equals('{{Infobox road/meta/colors|country=AUS|type=Metroad}}', 'background:#D2E2F9;')
    self:preprocess_equals('{{Infobox road/meta/colors|country=AUS|type=A}}', 'background:#E9F9D2;')
    self:preprocess_equals('{{Infobox road/meta/colors|country=AUS|type=road}}', 'background:#FFFFE0;')
    self:preprocess_equals('{{Infobox road/meta/colors|country=AUS|type=street}}', 'background:#F9E2D2;')
    self:preprocess_equals('{{Infobox road/meta/colors|country=AUS|type=NH}}', 'background:#3A7119; color:#FFE133;')
    self:preprocess_equals('{{Infobox road/meta/colors|country=AUS}}', 'background:#ccc;')
end

function p:test_Austria()
    self:preprocess_equals('{{Infobox road/meta/colors|country=AUT|type=A}}', 'background:#276FB7; color:#fff;')
    self:preprocess_equals('{{Infobox road/meta/colors|country=AUT}}', 'background:#fff; border:1px solid #000;')
end

function p:test_Belgium()
    self:preprocess_equals('{{Infobox road/meta/colors|country=BEL}}', 'background:#0071B3; color:#fff;')
end

function p:test_Bangladesh()
    self:preprocess_equals('{{Infobox road/meta/colors|country=BGD}}', 'background:#2C6700; color:white;')
end

function p:test_Bulgaria()
    self:preprocess_equals('{{Infobox road/meta/colors|country=BGR|type=A}}', 'background:#006A4D; color:white;')
    self:preprocess_equals('{{Infobox road/meta/colors|country=BGR}}', 'background:#003F87; color:white;')
end

--Canada

function p:test_China()
    self:preprocess_equals('{{Infobox road/meta/colors|country=CHN}}', 'background:#006A4D; color:white;')
end

function p:test_USA()
    self:preprocess_equals('{{Infobox road/meta/colors|country=USA}}', 'background:#006A4D; color:white;')
    self:preprocess_equals('{{Infobox road/meta/colors|country=USA|type=Park}}', 'background:#704214; color:white;')
    self:preprocess_equals('{{Infobox road/meta/colors|country=USA|type=FFH}}', 'background:#704214; color:white;')
end

return p