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

function p:test_langSwitch_without_default()
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |en = English |co = Corsu |lang = ', '}}', {{'en', 'English'},  {'fr', 'English'}, {'co', 'Corsu'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |en = English |de = German |lang = ', '}}', {{'en', 'English'},  {'de', 'German'},  {'gsw', 'German'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |en = English |gsw = Alemannic |lang = ', '}}', {{'en', 'English'},  {'de', 'English'},  {'gsw', 'Alemannic'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |en = English |no = Norwegian |lang = ', '}}', {{'en', 'English'},  {'no', 'Norwegian'},  {'de', 'English'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |de = Grün |es,it,pt = Verde |fr = Vert |en = Green |lang = ', '}}', {{'fr', 'Vert'},  {'it', 'Verde'},  {'de', 'Grün'}})
end

function p:test_langSwitch_with_default()
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |it = Italian |default = default |lang = ', '}}', {{'en', 'default'},  {'it', 'Italian'}, {'co', 'Italian'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |en = English |co = Corsu |default = default |lang = ', '}}', {{'en', 'English'},  {'it', 'default'}, {'co', 'Corsu'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |en = ~ |it = Italian |default = default |lang = ', '}}', {{'en', ''},  {'it', 'Italian'}, {'co', 'Italian'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |en = English |it = ~|co = Corsu |default = default |lang = ', '}}', {{'en', 'English'},  {'it', ''}, {'co', 'Corsu'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |en = English |it = |co = Corsu |default = default |lang = ', '}}', {{'en', 'English'},  {'it', 'default'}, {'co', 'Corsu'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |bn = English |default = default |lang = ', '}}', {{'en', 'default'}})
end

function p:test_langSwitch_with_default_in_group()
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |default,bn = Bengali |en = English |lang = ', '}}', {{'en', 'English'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |default,bn = Bengali |en = English |lang = ', '}}', {{'fr', 'Bengali'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |default,bn = Bengali |en = English |lang = ', '}}', {{'bn', 'Bengali'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |default,bn = Bengali |en = English |lang = ', '}}', {{'as', 'Bengali'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |default,bn = Bengali |as = Assamese |en = English |lang = ', '}}', {{'as', 'Assamese'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |default,gsw = Alemannic |en = English |lang = ', '}}', {{'en', 'English'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |default,gsw = Alemannic |en = English |lang = ', '}}', {{'gsw', 'Alemannic'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |default,gsw = Alemannic |en = English |lang = ', '}}', {{'de', 'Alemannic'}})
    self:preprocess_equals_many('{{#invoke:LangSwitch/sandbox|langSwitch |default,gsw = Alemannic |en = English |lang = ', '}}', {{'fr', 'Alemannic'}})
end

return p